Problem mit Events

[taaktaak]

warum nicht so ...
oder habe ich da was falsch verstanden?

Delphi-Quellcode:

procedure TDialogFrame.Button1Click(Sender: TObject); 
begin 
  Mann1Lbl.Caption:='Verdammter, verschlafener Kerl, wach endlich auf!'; 
end; 

procedure TDialogFrame.Dialog1; 
begin 
  Mann1Lbl.Caption:='Hey! Du da, mach die Augen auf, es wird Zeit!'; 
  SpielerLbl.Caption:='...'; 
end;