nonVCL Fenster erstellen-> fensterklasse wurde nicht gefuden

[Viktorii]

Hallo zusammen.

Ich möchte ein nonVCL Fenster erstellen. Dazu habe ich mich hier und bei google durchgesucht und folgenden Code erstellt:

Delphi-Quellcode:

procedure ShownonVCLWindow();
var
  FHandle : Cardinal;

begin
  with nonVCLWindow do
  begin
    cbSize := SizeOf(TWndClassEx);
    style := CS_VREDRAW or CS_VREDRAW;
    lpfnWndProc := @DefWindowProc;
    hIcon := LoadIcon(0, IDI_WINLOGO);
    lpszClassName := 'myClass';
  end;

  if RegisterClassEx(nonVCLWindow) = 0 then
    MessageBox(0, PChar(SysErrorMessage(GetLastError)), 'Error', MB_ICONSTOP or MB_OK);

  FHandle := CreateWindowEx(0,nonVCLWindow.lpszClassName,'myWindow',
                            WS_VISIBLE, 100,100,50,50,0,0,hInstance,nil);

  if FHandle = 0 then
    MessageBox(0, PChar(SysErrorMessage(GetLastError)), 'Error', MB_ICONSTOP or MB_OK);
end;

Allderings erzeugt CreateWindowEx den Fehler "Fensterklasse wurde nicht gefunden"?
Was mache ich flasch?
Vielen Dank