Icon mit CreateIconFromResourceEx aus Quelltext laden

[Luckie]

Das Icon habe ich jett als Byte-Array:

Delphi-Quellcode:

ByteArray: array[0..3261] of Byte = (
    $00,$00,$01,$00,$01,$00,$20,$20,$00,$00,$01,$00,$18,$00,$A8,$0C,$00,$00,$16,$00,$00,$00,$28,$00,$00,$00,$20,$00,$00,
    $00,$40,$00,$00,$00,$01,$00,$18,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,
    $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,
    $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,
    $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,
    $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,
    $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$C2,$C2,$C2,$A8,$A8,$A8,$A8,$A8,$A8,$C2,$C2,$C2,$00,$00,$00,$00,$00,$00,
    $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,
    $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,
    ...);

Aber hIcon ist leider null:
hIcon := CreateIconFromResource(PByte(@ByteArray[0]), SizeOf(ByteArray), True, $00030000); GetLastError liefert auch null.

PS: Der Icon-Header ist da noch drinne, aber das sollte nichts machen, dann ist das Icon eben kaputt, was angezeigt wird, aber das sollte ihm egal sein.