DelphiX funktioniert nicht mehr!

[fes]

ich habe es mit folgendem code getestet:

Delphi-Quellcode:

procedure TForm1.DXDraw1Click(Sender: TObject);
begin
  if not DXDraw1.CanDraw then
    Exit;
  DXImageList1.Items[0].draw(DXDraw1.Surface, 0, 0, 0);
  DXDraw1.Flip;
close;
end;

Das Programm wurde geschlossen, d.h. es kommt bis zum

Delphi-Quellcode:

  DXImageList1.Items[0].draw(DXDraw1.Surface, 0, 0, 0);
  DXDraw1.Flip;

Noch ne Idee?