View Single Post
  #8  
Old 07-05-2014, 08:58
Logrim Logrim is offline
Registered User
 
Join Date: Jun 2009
Location: Spain
Posts: 153
Thanks: 116
Thanked 72 Times in 44 Posts
Logrim is on a distinguished road
i have a little problem.. i want the destock shorcut checked in the setup, but i dont find a way to work..

this is my shorcut procedures:

Quote:
procedure DesktopClick(hBtn:HWND);
begin
sndPlaySound(ExpandConstant('{tmp}\Click.wav'), $0001);
if BtnGetChecked(hBtn) then CreateDLabel.Font.Color:=$20A5DA else CreateDLabel.Font.Color:=$008CFF;
end;

procedure DesktopLabelClick(Sender:TObject);
begin
BtnSetChecked(DesktopCheck, not BtnGetChecked(DesktopCheck));
DesktopClick(DesktopCheck);
end;
Thanks

P.D. Problem solved,, was easy... ains.. only adding " BtnSetChecked(DesktopCheck,True)" to wpwelcome in CurPageChanged..

Last edited by Logrim; 08-05-2014 at 15:49. Reason: solved
Reply With Quote