icons erzeugen

[Corpsman]

ich weis ja nicht genau was du machen willst, aber 1000 Images ???

Probier mal das :

Delphi-Quellcode:

var b:Tbitmap; // Das Icon
i,j:Integer;
begin
b := lade Bitmap
for i := 0 to 100 do 
for j := 0 to 100 do
form1.canvas.draw(i*b.width, j*b.height, b);