Hi
Ich will wissen wie ich die Zahl
16.25 herrausnehmen kann aus:
Delphi-Quellcode:
if Memo2.Lines.Strings[0]='55' then
Memo2.Lines[1]:='Bitte zahlen Sie '+FloatToStr([b]16.25[/b])+' Euro';
end;
Ich habe es mit folgenden Befehlen versucht es geht aber nicht (vermute darf nicht die ganze Memo Line eingeben:
Delphi-Quellcode:
procedure TForm1.LeinEuroClick(Sender: TObject);
var einEuro: Real;
Preis:String;
Preisx:Real;
Rueckgabe:Real;
begin
einEuro:=1;
Preis:=Memo2.Lines.Strings[1];
Preisx:=StrtoFloat(Preis);
Rueckgabe := Preisx-einEuro;
Memo2.Lines.Strings[1]:=FloattoStr(Rueckgabe); // hier
end;
Bitte gibt mir eine Antwort
[edit=Matze][delphi]Tags gesetzt und anstelle des [b]-Codes die Zeile mit einem Kommantar gekennzeichnet.
Bitte füge die [delphi]-Tags zukünftig ein. MfG, Matze[/edit]