folgendes problem : ich will bei einem taschenrechner die + / - taste einbauen nur jetzt bleib ich hängen wenn ich von - nach + machen will kann mir da jemand helfen mit delete oder so ?
hier schonmal das was ich gemacht habe:
Delphi-Quellcode:
x:=strtoint(edit1.text);
if (x > 0) then
x:=-x;
edit1.Text:=inttostr(x)
else if (x < 0) then begin
if pos( '-', Edit1.Text ) = 1 then
edit1.Text:=inttostr(x);