Die ursprüngliche Variante ist so schon ok, aber mit begin und end sicherlich "schöner" (verständlicher). Es würde aber auch so ausreichen:
Delphi-Quellcode:
procedure TForm1.PanelNumberClick(Sender: TObject);
begin
if Sender is TPanel then resultedit.Text := resultedit.Text + TPanel(Sender).Caption;
end;
Die Caption des Panels muss nicht erst in eine Variabel übernommen werden, die dann an den Text angehängt wird.