OnFormCreate DXDraw geht nicht

[cylon]

Hi,
ich hab hier ne einfaches programm geproggt, das mir in DXDraw nen bild ausgibt. Ich habs auch mit der DXImageList und sowas kombiniert aber es geht nur beimOnClick aber beimOnFormCreate gehts nich...
Hier mal der Code:

Delphi-Quellcode:

procedure TFormZero.FormCreate(Sender: TObject);
begin
 if not DXDrawGround.CanDraw then
  Exit;
 DXImageListStart.Items[0].draw(DXDrawGround.Surface, 0, 0, 0);
 DXDrawGround.Flip;
end;

bzw.

Delphi-Quellcode:

procedure TFormZero.DXDrawGroundClick(Sender: TObject);
begin
 if not DXDrawGround.CanDraw then
  Exit;
 DXImageListStart.Items[0].draw(DXDrawGround.Surface, 0, 0, 0);
 DXDrawGround.Flip;
end;