Gut
aber ich muss vorher viele images zuerst erstellen
Nummer :=Bild.Images.count;
und dann alle Bilder drin laden
Ich weiß nicht genau wie ich am besten tun kann?
Delphi-Quellcode:
var
Bild : TGifImage;
zahl : Integer;
begin
//
Bild := TGifImage.Create;
Bild.LoadFromFile(FileName);
zahl:=Bild.Images.count;
with.TImage.Create(Self) do begin
width:=Bild.picture.Bitmap.width;
Height:=Bild.picture.Bitmap.Height;
Top:=10;
Left:= ... // hier muss man überlegen
parent:=ScrollBox1;
...
//Image1.Picture.Bitmap := Bild.Images.SubImages[0].Bitmap;
bild.free;
end;
wie mache ich weiter?