Wenn Du dem Bitmap noch eine Größe gibst, dann sollte es eigentlich klappen, z.B.:
Delphi-Quellcode:
...
ABitmap.width := 32;
ABitmap.height := 32;
ABitmap.PixelFormat := pf24bit; // um auch ggf. alle Farben richtig zu sehen
...
Um mehrere Icons aus einem einzigen Icon-File herauszuholen, würde ich die
Api-Funktion
ExtractIconEx benutzen (habe das selbst bisher aber noch nicht gemacht). Irgendwo in der Funktionsbeschreibung wird dann auch deine Frage beantwortet.