Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi 1 Button

**Salomon**

Wo liegt das Problem, ist doch nur eine Zeile:

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

begin

if form1.Height = 100 then form1.Height := 200 else form1.Height := 100;

end;

Salomon Registriert seit: 9. Jun 2002 453 Beiträge	#2 1. Jun 2003, 22:07 Wo liegt das Problem, ist doch nur eine Zeile: markieren Delphi-Quellcode: procedure TForm1.Button1Click(Sender: TObject); begin if form1.Height = 100 then form1.Height := 200 else form1.Height := 100; end; 01001000 01100001 01101100 01101100 01101111 01010111 01100101 01101100 01110100 00100001 http://www.it-adviser.net
	Zitat