Huhu,
versuch mal:
Delphi-Quellcode:
....
for I := 0 to btnlist.Count -1 do
begin
move( ( btnlist[i] as TButton ) );
sleep(500);
end;
oder:
Delphi-Quellcode:
....
for I := 0 to btnlist.Count -1 do
begin
move( TButton( btnlist[i] ) );
sleep(500);
end;
gruß
reli
edit:
achja und änder mal diese zeilen hier:
Delphi-Quellcode:
btnlist.Add(btnneu.Create(self)); //Erzeugte buttons in Liste schreiben
with btnNeu do
begin
Name := 'btn'+IntToStr(i);
width := 20;
height := 20;
Parent := self;
caption := '';
end;
in diese:
Delphi-Quellcode:
with btnList[ btnlist.Add(TButton.Create(self)) ] as TButton do //Erzeugte buttons in Liste schreiben
begin
Name := 'btn'+IntToStr(i);
width := 20;
height := 20;
Parent := self;
caption := '';
end;