String minus Float rechnen!

[roth]

Guten Tag!
Ich habe folgende frage/problem
ich möchte diese arrays voneinander abziehen:

Delphi-Quellcode:

total_gezahlt[i] := query1.FieldByName('TOTAL_PAID').AsFloat;
skonto[i] := query1.FieldByName('SKONTO').AsString;

habe schon mit
rechtotal[i]- strtoint(skonto[i]) oder
rechtotal[i]- strtofloat(skonto[i]) funktioniert beides nicht!

mfg roth

[Kroko1999]

Was steht denn es Skonto[I] (als Text) ?

[roth]

was es Skonto?
nein es ist eine Zahl jedoch schon i der db so deklariert!

[mkinzler]

Was ist als Dezimaltrenner eingestellt?

[roth]

wie was ist als dezimal trenner eingestellt? das format ist bis auf zwei kommastellen

[pacman1986]

poste mal deine komplette schleife.

[mkinzler]

Dezmaltrenner: . oder , vom System und dem array müssen übereinstimmen sonst kann man kurzeitig durch Setzten von DecimalSeparator ändern oder den im String durch StringReplace anpassen.

[roth]

Delphi-Quellcode:

if(rechtotal[i]- skonto[i] > total_gezahlt[i])AND(total_gezahlt[i] <> 0)then
 begin
   //Kunde hat zuwenig gezahlt
   zuwenig.Add(IntToStr(i));
 end else if (rechtotal[i] - skonto[i] < total_gezahlt[i]) then
  begin
  //Kunde hat zuviel gezahlt
  zuviel.Add(IntToStr(i));
 end;//if

[ManuMF]

Hallo,

und was funktioniert nicht? Compiler meckert? Fehlermeldung im Programm? Gar nichts?

Gruß,
ManuMF

[roth]

[Error] Unit1.pas(134): Incompatible types: 'String' and 'Real'
[Error] Unit1.pas(138): Incompatible types: 'String' and 'Real'
[Fatal Error] invoice.dpr(5): Could not compile used unit 'Unit1.pas'