1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

var
  a, b: Extended;
begin
  a := StrToFloat(StringGrid1.Cells[0,0]);
  b := StrToFloat(StringGrid1.Cells[1,0]);
  if a < b then
    ShowMessage('a kleiner als b.');
  // das gleiche:
  if StrToFloat(StringGrid1.Cells[0,0]) < StrToFloat(StringGrid1.Cells[1,0]) then
    ShowMessage('a kleiner als b.'); 
end;