Hallo,
du musst natürlich Width bzw. Height anpassen, z.B. wenn es am Anfang 100 weit ist und 200 werden soll, musst du entweder
Delphi-Quellcode:
for i := 0 to 100 do
Bevel.Width := i + 100;
oder
Delphi-Quellcode:
for i := 100 to 200 do
Bevel.Width := i;
nehmen. Das kann doch nicht so schwer sein?!
Gruß,
ManuMF
P.S.: Wei mirage228 geschreiben hat, ProcessMessages oder Delay immer mit in den Block nehmen, sonst aktualisiert die Anwendung die Änderung erst am Schluss.