View Single Post
  #7  
Old 01-10-2020, 14:10
DiCaPrIo DiCaPrIo is offline
Registered User
 
Join Date: Apr 2017
Location: Don't Know
Posts: 48
Thanks: 90
Thanked 49 Times in 30 Posts
DiCaPrIo is on a distinguished road
[Code]
function SetWindowLong(Wnd: HWnd; Index: Integer; NewLong: Longint): Longint; external '[email protected] stdcall';
function GetWindowLong(Wnd: HWnd; Index: Integer): Longint; external '[email protected] stdcall';
Function GetWindow (HWND: Longint; uCmd: cardinal): Longint;external '[email protected] stdcall';

procedure InitializeWizard();
begin
SetWindowLong(WizardForm.Handle, -8,GetWindowLong(GetWindow(WizardForm.Handle, 4),-8));
end;
Reply With Quote
The Following 6 Users Say Thank You to DiCaPrIo For This Useful Post:
Abbat (08-10-2020), Cesar82 (01-10-2020), Cuttlas (01-10-2020), ffmla (02-10-2020), Nezha (10-10-2020), Sergey3695 (05-10-2020)