LPIDENT lpiOld = Server_GetServer (hDlg);
if (lpiNew != lpiOld)
{
- SetWindowLong (hDlg, DWL_USER, (LONG)lpiNew);
+ SetWindowLongPtr (hDlg, DWLP_USER, (LONG_PTR)lpiNew);
if (hDlg != g.hMain)
{
LPIDENT Server_GetServer (HWND hDlg)
{
- return (LPIDENT)GetWindowLong (hDlg, DWL_USER);
+ return (LPIDENT)GetWindowLongPtr (hDlg, DWLP_USER);
}
LPIDENT Server_GetServerForChild (HWND hChild)
}
-static LONG procTabControl = 0;
+static LONG_PTR procTabControl = 0;
LRESULT CALLBACK Server_SubclassTabControlProc (HWND hTab, UINT msg, WPARAM wp, LPARAM lp)
{
if (procTabControl == 0)
rc = DefWindowProc (hTab, msg, wp, lp);
else
- rc = CallWindowProc ((WNDPROC)procTabControl, hTab, msg, wp, lp);
+ rc = (LRESULT) CallWindowProc ((WNDPROC)procTabControl, hTab, msg, wp, lp);
switch (msg)
{
case WM_DESTROY:
if (procTabControl != 0)
- SetWindowLong (hTab, GWL_WNDPROC, procTabControl);
+ SetWindowLongPtr (hTab, GWLP_WNDPROC, procTabControl);
break;
}
// subclass the TCN_ window, so that it will start sending WM_SIZE
// messages to its child window.
//
- procTabControl = GetWindowLong (hTab, GWL_WNDPROC);
- SetWindowLong (hTab, GWL_WNDPROC, (LONG)Server_SubclassTabControlProc);
+ procTabControl = GetWindowLongPtr (hTab, GWLP_WNDPROC);
+ SetWindowLongPtr (hTab, GWLP_WNDPROC, (LONG_PTR)Server_SubclassTabControlProc);
// Since we just subclassed this control, our new wndproc wasn't around
// when the window was created. Any WM_CREATE processing we'd ordinarily