Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  Re: nonVCL: Handle des MainForm

    Delphi
    by Garfield, 4. Mai 2010
  Das sieht dann jetzt wie im Anhang aus. Vielleicht hat jemand doch noch eine bessere Lösung?
  
  Nachtrag: Ich habe testweise ein Formular mit fsStayOnTop erstellt. GetForegroundWindow funktioniert damit wie gewünscht und liefert das Handle zur MainForm oder zumindest zur aufrufenden Form. Je nachdem wie man die MainForm definiert.
• Forum: Win32/Win64 API (native code)

  Re: nonVCL: Handle des MainForm

    Delphi
    by Garfield, 3. Mai 2010
  Solange kein Fenster StayOnTop ist und das Öffnen des Dialogfensters nicht zu lange dauert, dürfte dies gehen:
  
  { Mittig über dem Hauptformular der Anwendung. }
  poMainFormCenter:
  begin
  GetWindowRect(GetForegroundWindow, ParentRect);
  nLeft := ParentRect.Left + ((ParentRect.Right - ParentRect.Left) - fWidth) div 2;
  nTop := ParentRect.Top + ((ParentRect.Bottom - ParentRect.Top) -...
• Forum: Win32/Win64 API (native code)

  Re: nonVCL: Handle des MainForm

    Delphi
    by Garfield, 3. Mai 2010
  Achso, das wäre dann das CreateWindowExW. Als Owner hatte ich das hwnd aus der Nachrichtenschleife mitgegeben.
• Forum: Win32/Win64 API (native code)

  Re: nonVCL: Handle des MainForm

    Delphi
    by Garfield, 3. Mai 2010
  Du musst doch jedes Fenster registrieren:
  RegisterClassEx(WndClass);
  Sonst bekommst Du es nicht zu sehen!?
  
  Wenn es nicht geht, muss ich halt die Option entfernen und das Handle verlangen.
• Forum: Win32/Win64 API (native code)

  nonVCL: Handle des MainForm

    Delphi
    by Garfield, 3. Mai 2010
  Ich portiere gerade den OpenDirDialog nach nonVCL. Die Demo ist soweit fertig. Dabei hat mir das Win32API Tutorial von Luckie und Co., insbesondere das TreeView-Sample von Matthias geholfen. Nur beim Tuning habe ich ein paar Probleme.
  
  { Mittig über dem Hauptformular der Anwendung. }
  poMainFormCenter:
  begin
  GetWindowRect(HInstance, ParentRect);
  nLeft := ParentRect.Left +...