Im Zusammenhang mit deiner anderen Frage ist dein Konzept schlecht.
Lagere alle Routinen die "was mach" (addieren, subtrahierten, ...) in eigene Routinen aus und rufe diese nur noch durch den Klick auf die entsprechende Schaltfläche aus.
Pseudocode:
Code:
procedure Form1.addiere()
begin
//...;
end;
procedure Form1.subtrahiere()
begin
//...;
end;
procdedure Form1.Button1lick(Sender: TObject)
begin
addiere;
end;
procedure Form1.Button2Click(Sender: TObject)
begin
subtrahiere(;
end;
Das ist zum einem übersichtlicher. Du trennst Funktionalität von der Oberfläche. Und die Routinen können von überall aus aufgerufen werden.
Und du solltest dir ganz schnell angewöhnen die Elemente deiner Oberfläche sinnvoll zu benennen: btnAddiere, btnSubtrahieren, usw.