meekrab
Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
baqzar1
Ну сейчас проверил на скрипте YURSHAT'а то именно отключить можно закоментив строку
Код:
procedure Btn1(hBtn:HWND);
begin
//sndPlaySound(ExpandConstant('{tmp}\Click.wav'), $0001);
MsgBox('{#Logo}', mbInformation, MB_OK);
end;
procedure Repackinfo;
begin
ExtractTemporaryFile('LogoButton.png');
ExtractTemporaryFile('WFEnter.wav');
hAboutBtn:=BtnCreate(WizardForm.Handle,ScaleX(20),ScaleY(320),ScaleX(36),ScaleY(36),ExpandConstant('{tmp}\LogoButton.png'),0,True);
BtnSetEvent(hAboutBtn,1,WrapBtnCallback(@Btn1,1));
BtnSetEvent(hAboutBtn,BtnClickEventID,WrapBtnCallback(@Btn1,1));
// BtnSetEvent(hAboutBtn,BtnMouseEnterEventID,WrapBtnCallback(@WFBtnEnter,1));
BtnSetVisibility(hAboutBtn,True);
BtnSetCursor(hAboutBtn,GetSysCursorHandle(32649));
ImgApplyChanges(WizardForm.Handle);
end;
|
звук при нажатие
//sndPlaySound(ExpandConstant('{tmp}\Click.wav'), $0001);
звук при наведение
// BtnSetEvent(hAboutBtn,BtnMouseEnterEventID,WrapBtnCallback(@WFBtnEnter,1));
|
Всего записей: 256 | Зарегистр. 12-10-2009 | Отправлено: 07:42 15-12-2011 | Исправлено: meekrab, 07:48 15-12-2011 |
|
.