Pues los float se comparan como números normales:
Código Delphi
[-]
if Campo1.AsFloat > Campo2.AsFloat then
ShowMessage('Campo1 mayor!')
else if Campo2.AsFloat > Campo1.AsFloat then
ShowMessage('Campo2 mayor!')
else
ShowMessage('Iguales!');
Me parece que vos los estas comparando como strings, pero entonces tenes que, por ejemplo
Código Delphi
[-]
if '9' > '1500' then
ShowMessage('la cadena "9" es mayor que la cadena "1500"');
Hasta luego.