Einzelnen Beitrag anzeigen

Benutzerbild von Ultimator
Ultimator

Registriert seit: 17. Feb 2004
Ort: Coburg
1.860 Beiträge
 
FreePascal / Lazarus
 
#10

Re: [ActionScript] Betrag einer Zahl bilden

  Alt 31. Mai 2004, 13:38
Also so:
Delphi-Quellcode:
procedure TForm1.Click(Sender: TObject);
var Zahl, Betrag:integer;
begin
Zahl:=strtoint(Edit1.Text);
if Zahl <0 then
Betrag:= Zahl* (-1)
else
Betrag:=Zahl;
Müsste so gehen.
Julian J. Pracht
  Mit Zitat antworten Zitat