Langsam grösser werdendes Fenster

[mirage228]

Hi,

Du hast den begin-end-Block nach der Zeile mit der for-schleife vergessen:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject); 
var 
  y: Cardinal; 
begin 
  for y := 0 to 109 do 
  begin
    Bevel1.Width := 136 + y; 
    Delay(5); // <- ausprobieren, welche Pause am Besten ist 
  end; 
end;

mfG
mirage228