HtmlHelp-API - HH_Get_Win_Type

[taaktaak]

Hihihihi,
noch ein (letzter) Nachtrag - der wiederum zeigt, wie sehr das jetzt ein "Basteln" war. Es geht offenbar noch kürzer:

Delphi-Quellcode:

function ~~.GetHtmlWindowPos(var iLeft, 
                                 iTop, 
                                 iWidth, 
                                 iHeight:Integer):Boolean; // Ermittelt NUR die aktuell 
                                                           // gültige "Startposition/-größe" 
var pWT : ^HH_WinType;                                     // Werte eines von Anwender 
    Hnd : HWND;                                            // verschobenen/in der Größe veränderten 
begin                                                      // Fensters werden NICHT zurückgeliefert! 
  Result:=false; 
                                             // v- Name des FensterTyps an DIESER Stelle übergeben! 
  Hnd:=HtmlHelp(0,PChar(Application.HelpFile+'>MainWindow'),HH_Get_Win_Type,DWord(@pWT)); 

  if Hnd>0 then 
    with pWT^.rcWindowPos do begin 
      iLeft  :=Left; 
      iTop   :=Top; 
      iWidth :=succ(Right-Left); 
      iHeight:=succ(Bottom-Top); 
      Result:=true; 
      end; 
end;

Zu beachten ist aber folgender Hinweis aus der Html Help, wenn man das Ergebnis verändern will ...

Zitat:

"Deep copy the structure to which dwData points before modifying the structure"

Gruß Ralph

//edit: Tippfehler beseitigt