[gelöst]
Hallo!
Ich bin gerade dabei für mich als Übung einen Taschenrechner zu realisieren. Ich halte mich dabei an den Windows-Taschenrechner. Nun, die 4 Rechenarten funktionieren einwandfrei. Nur, wenn es jetzt an das Feintuning geht, haperts leider. Im Moment geht es darum, es zu schaffen, dass die 0 nicht mehrfach eingegeben wird, wenn sie gedrückt wird, und als einzige Ziffer im Display steht.
Nun, ich hoffe ihr könnt mir helfen. Alle "Zahlenbuttons" nehmen die Button1 Prozedur, da so ja der Aufwand veringert wird. Doch hier haperts jetzt mit der "nicht-nochmal-eingeben" null:
Delphi-Quellcode:
procedure TTaschenrechner.Button1Click(Sender: TObject);
begin
if Eingabe.Text[1]=0 then
begin
Button16.Enabled:= false;
end
else
Button16.Enabled:=true;
Eingabe.Text:= Eingabe.Text+TButton(Sender).Caption[1];
end;
Ich hoffe ihr könnt mir helfen.
