Thanks!!!

I got it working :-)

fGas := fGas - 1 * UpdateGas;

NewGas := TimeGetTime;
UpdateGas := (NewGas - OldGas) * OneMSec;
OldGas := NewGas;

dxfont1.TextOut(dxdraw1.surface,470,10,FloatToStrF (Car.gas / 10, ffFixed,15,0));

I changed the type of fGas from integer to Extended to work with the FloatToStrF :-)