problem beim erstellen eines API Windows

[EWeiss]

kann mir jemand sagen warum ich trotz erfolgreichen registrieren der wndClass
kein Window erzeugen kann?

Bekomme immer ein 0 Handle

gruss Emil

[1234588]

vll. hast du bei CreateWindowEX() was falsches uebergeben?

[EWeiss]

Zitat:

Zitat von 1234588

vll. hast du bei CreateWindowEX() was falsches uebergeben?

Delphi-Quellcode:

function BassBoxWndThread(glCtrW: PWord): integer;
var
  Msg      : TMsg;
  wClass   : TWndClass;
  MsgReturn: longbool;

const
  BBClassName = 'BassBoxVis';
  BBTitle     = 'BassBox';

begin

  h_Instance := GetModuleHandle(nil);
  with wClass do
  begin
    style         := CS_VREDRAW or CS_HREDRAW or CS_DBLCLKS;
    cbClsExtra    := 0;
    cbWndExtra    := 0;
    hInstance     := h_Instance;
    hIcon         := 0;
    hCursor       := LoadCursor(0, IDC_ARROW);
    hbrBackground := 0;
    lpszMenuName  := nil;
    lpszClassName := BBClassName;
    lpfnWndProc   := @VisualProc;
  end;

  if windows.RegisterClass(wClass) <> 0 then
    ClassRegistered := True;

   glCtrW^ := CreateWindowEx(WS_EX_STATICEDGE,
                            BBClassName,
                            BBTitle,
                            WS_CHILD or WS_VISIBLE,
                            0,
                            0,
                            100,
                            100,
                            BB_VisDataThread.ParentHandle,
                            0,
                            h_Instance,
                            nil);


  if (glCtrW^  <> 0) then

sehe da nichts falsches auf anhieb

gruss Emil

[turboPASCAL]

Und wie sieht die wClass aus ?
//Edit: Brille ned auf der Nase gehabt. ;)

[Medium]

Eine Unstimmigkeit, die nicht zwangsläufig der Fehler sein muss:

CreateWindowEx gibt ein HWND zurück, und

Zitat:

Zitat von Windows.pas

Delphi-Quellcode:

type
  HWND = type LongWord;

Daher dürfte ein Word nicht ausreichen.

[EWeiss]

Zitat:

Zitat von Medium

Eine Unstimmigkeit, die nicht zwangsläufig der Fehler sein muss:

CreateWindowEx gibt ein HWND zurück, und

Zitat:

Zitat von Windows.pas

Delphi-Quellcode:

type
  HWND = type LongWord;

Daher dürfte ein Word nicht ausreichen.

Danke das scheint es zu sein ...
Wenn ich allerdings einen Breakpoint auf glCtrW^ := CreateWindowEx setze
gehts nimmer ;)

Muss mal schaun was das ist.

gruss Emil

[Ghostwalker]

Mach doch einfach mal ein DWORD bzw. PDWORD draus...dann sollte es immer gehen. Speicheradressen (und ein Handle ist nix anderes) haben immer positive 32-Bit-Werte (oder natürlich 64-Bit :) )

[EWeiss]

Zitat:

Zitat von Ghostwalker

Mach doch einfach mal ein DWORD bzw. PDWORD draus...dann sollte es immer gehen. Speicheradressen (und ein Handle ist nix anderes) haben immer positive 32-Bit-Werte (oder natürlich 64-Bit :) )

Jo Danke das erleichtert mir die Arbeit mit dem Pointer.

gruss Emil