This code does show the screensaver in the small preview box in display properties.. but it does not scale the form.. How can I achieve this?Code:GetClientRect GetHwndFromCmd(cmd), SDim Style = GetWindowLong(Form2.hwnd, GWL_STYLE) ' ** Get current window style Style = Style Or WS_CHILD ' ** Append "WS_CHILD" style To the hWnd window style SetWindowLong Form2.hwnd, GWL_STYLE, Style ' ** Add New style To window SetParent Form2.hwnd, GetHwndFromCmd(cmd) ' ** Set preview window As parent window SetWindowLong Form2.hwnd, GWL_HWNDPARENT, GetHwndFromCmd(cmd) ' ** Save the hWnd Parent In hWnd's window struct. SetWindowPos Form2.hwnd, HWND_TOP, 0&, 0&, SDim.Right, SDim.Bottom, SWP_SHOWWINDOW
Also can i draw directly into the preview box..?
GetDC(GetHwndFromCmd) doesn't seem to be working!![]()




Reply With Quote