Form-Felder in eigene Procedure integrieren

[ap_computers]

Delphi-Quellcode:

procedure TForm1.Button1.Click(Sender: TObject);
var
  bt: TButton;
begin
  bt:= TButton(Sender);  // ermittelt auf welchen Button geklickt wurde
  if bt.Text =  '0' then // wenn du auf "0" geklickt hast
  begin
    Edit1.Text := '0';     // dann  überschreiben
  end
  else
  begin
    Edit1.Text := Edit1.Text + bt.Text; // sonst Zeichen anhängen
  end; 
end;

reicht dir das so als erklärung ???