Thema: Delphi addieren

Einzelnen Beitrag anzeigen

Flare

Registriert seit: 26. Jan 2006
Ort: Leipzig
529 Beiträge
 
Delphi 7 Professional
 
#5

Re: addieren

  Alt 26. Apr 2006, 13:30
Hi Pump3r!

Es geht nicht, weil i bei dir ein String ist! Du müsstest also den String auswerten und in einer Gleitkommazahl speichern.
Delphi-Quellcode:
var
  q,p : real;
  code: integer;
  i : string;
begin
  i := ini2.ReadString('handelspreis','1','');
  Val(i, p, code);
  if code=0 then
  begin
    q := p + 0.1;
    ShowMessage('Der Handelspreis ist '+floattostr(q));
  end;
end;

Flare

//Edit: Falsche Parameter richtig getauscht.
Willy Scheibel
  Mit Zitat antworten Zitat