Übersetzung Class MagneticWindow

[xaromz]

Hallo,

Du hast hier

Delphi-Quellcode:

        // Add info
        With m_uWndInfo[m_lWndCount -1] do
          begin
            hwnd := Handle;
            hWndParent := hWndParent; <---------
          end;

ein Problem. Deine Variable im Record heißt genauso wie die Variable, die Du zuweisen willst. Delphi benutzt dann zwei mal den Record-Member (geringste Sichtbarkeit).
Meist ist es sowieso besser, with zu vermeiden, dann spart man sich viel Ärger beim Debuggen (der Debugger kann innerhalb eines solchen Blocks Variableninhalte nicht anzeigen ).
Also so:

Delphi-Quellcode:

// Add info
m_uWndInfo[m_lWndCount -1].hwnd := Handle;
m_uWndInfo[m_lWndCount -1].hWndParent := hWndParent;

Gruß
xaromz