Einzelnen Beitrag anzeigen

Benutzerbild von Martin K
Martin K

Registriert seit: 20. Okt 2005
919 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: ImageList: Bilder untereinander?

  Alt 21. Jun 2006, 22:26
Jo, danke!

Hab jetzt aber doch die "von Hand auseinanderschnippseln"-Methode genommen.

Hier mein Code:
Delphi-Quellcode:
for i := 0 to Bitmap.Height div ImageList.Height -1 do
begin
  Bitmap.Canvas.CopyRect(
    Rect(0, 0, ImageList.Width, ImageList.Height),
    Bitmap.Canvas,
    Rect(0, i*ImageList.Height, ImageList.Width, (i+1)*ImageList.Height));
  ImageList.Add(Bitmap, nil);
end;
Funzt prima
Mit den Menschen ist es wie mit Computern -
es gibt Nullen und Einsen.
  Mit Zitat antworten Zitat