ARGH... Buttonproblem

[Michael Habbe]

Ist doch ganz einfach:

Delphi-Quellcode:

var
  beschriftung: String;

procedure TForm1.FormCreate(...);
begin
  beschriftung := 'Hallo';
end;

procedure TForm1.Button1Click(...);
begin
  Edit1.Text := beschriftung;
  beschriftung := 'Tschüss';
end;

mfg
Michael