Delphi Bug? (for i := 1 to componente.width)

[City Light]

Hallo Maa83

Ich habe diesen Code mal getestet und läuft bei mir super! Ich habe Delphi 6 Enterprise + update 2 (Build 6.240)

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
x,y,i: Integer;
begin
  x := 0;
for i := 1 to paintbox1.width do begin
    inc(x);
end;
ShowMessage(inttostr(x));
end;

Gruß Tino