|
Registriert seit: 21. Dez 2002
Ort: Lenzburg
861 Beiträge
Delphi 6 Professional
|
Re: Effekt wie beim Windows Media Player
4. Apr 2004, 11:21
 etwa so ?
Delphi-Quellcode:
procedure TMainForm.ButtonDoMinClick(Sender: TObject);
begin
while Height > SmallH do
begin
Height := Height - 3;
end;
end;
mfg Tobias
Tobias
Die Physik ist für die Physiker eigentlich viel zu schwer.
|