Delphi - Format

Hola a todos de ante mano gracias...

Tengo este prble al formatear este edit

var
P,C:Extended;
begin
TEdit(Sender).color := $0099C7DD;
P:=StrToFloat('0'+Tot.Text);
C:=StrToFloat('0'+Pag.Text);
if C<=P then
Sal.Text:=FloatToStr(P-C)
else
if C>P then
Begin
Cam.Text := FormatFloat('0.00',floattostr(C-P));
Sal.AsInteger := 0;
end
else
Sal.Clear
me sale un erro que dice Icmpatible tipos Double and string

Gracias

Aunque es muy dependiente de que realmente pongas un par de números con punto flotante en Tot y Pag, que podría traerte problemas, si no lo validas antes, tu problema está en la línea 12, si no me equivoco. Debe ser:

Cam.Text := FormatFloat('0.00', C-P);

Espero que sea eso.

Saludos.