Umsetzung eines erweiterten Taschenrechners

[Jumpy]

Als weitere Erleichterung könntest du allen Button dasselbe Onclick-Event zuweisen und in diesem dann ungefähr wie folgt vorgehen:

Delphi-Quellcode:

procedure TForm1.UniversellerButtonClick(Sender: TObject);
begin
  if Sender is TButton then
    begin
    if TButton(Sender).Caption='C' then
      rechenzeileE.Caption:=''
    else
      rechenzeileE.Caption := rechenzeileE.Caption + TButton(Sender).Caption;
    end;
end;

Das nur mal als eine Anregung. Wenn du mehr programmierst wirst du auch irgendwann feststellen, dass es vllt. sinnvoll ist, die Information, die du z.Zt. in rechenzeileE.Caption (also einer Komponente der GUI) speicherst besser in einer Variablen aufgehoben wäre.