-zav- 188 #247162 Posted February 1, 2015 Подскажите причину, очень долго запускается мой "ехе" , после запуска и выбора языка проходит минуты 3, в чем причина? Пробовал менять степень сжатия не помогло. Скорей всего изза SolidCompression=true попробуй отключить или закоментить 1 Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #247178 Posted February 1, 2015 Можно ли на кнопку поставить звук или же музыку? То есть когда ты нажимаешь на неё то будет звучать один звук,а если нажмешь на другую,то другой. Возможно ли так сделать? да Quote Share this post Link to post Short link Share on other sites
МаксNK_42 0 #247192 Posted February 1, 2015 Спасибо, стал быстрей загружаться почти без задержки Скорей всего изза SolidCompression=true попробуй отключить или закоментить Спасибо, стал быстрей загружаться почти без задержки Quote Share this post Link to post Short link Share on other sites
young G 23 #247258 Posted February 1, 2015 Можно ли на кнопку поставить звук или же музыку? То есть когда ты нажимаешь на неё то будет звучать один звук,а если нажмешь на другую,то другой. Возможно ли так сделать? Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #247260 Posted February 1, 2015 Можно ли на кнопку поставить звук или же музыку? То есть когда ты нажимаешь на неё то будет звучать один звук,а если нажмешь на другую,то другой. Возможно ли так сделать? Да. Quote Share this post Link to post Short link Share on other sites
young G 23 #247261 Posted February 1, 2015 Да. не мог бы ты подсказать,как это можно сделать? Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #247276 Posted February 1, 2015 не мог бы ты подсказать,как это можно сделать? Да. 1 1 Quote Share this post Link to post Short link Share on other sites
young G 23 #247300 Posted February 2, 2015 Да. и как же сделать? Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #247302 Posted February 2, 2015 и как же сделать? Да. 1 Quote Share this post Link to post Short link Share on other sites
woole 5 #247303 Posted February 2, 2015 Да.Да? Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #247306 Posted February 2, 2015 (edited) и как же сделать?Берёшь и делаешь. Есть такая магическая штука как Гугл... [Files] Source: "ButtonOnEnter.wav"; DestDir: {tmp}; Flags: dontcopy solidbreak nocompression; [~~~Code~~~] function sndPlaySound(lpszSoundName: string; uFlags: cardinal):integer; external '[email protected] stdcall'; function InitializeSetup:boolean; begin ExtractTemporaryFile('ButtonOnEnter.wav'); Result:=True; end; procedure ButtonOnMouseEnter(Sender: TObject); begin sndPlaySound(ExpandConstant('{tmp}\ButtonOnEnter.wav'),$0001); end; procedure InitializeWizard(); begin WizardForm.NextButton.OnMouseEnter:=@ButtonOnMouseEnter; end; Особо не копал, но на OnClick мне делать нет времени: там нужно хукать действия кнопок. Edited February 2, 2015 by AtotIK Quote Share this post Link to post Short link Share on other sites
justdj 13 #247346 Posted February 2, 2015 Да. Можешь скинуть ссылку на твой скрипт бэкапа файлов? Я один раз перечитал все 134 страницы и находил, но потерял потом. Хелп =) Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #247349 Posted February 2, 2015 Можешь скинуть ссылку на твой скрипт бэкапа файлов? Я один раз перечитал все 134 страницы и находил, но потерял потом. Хелп =) 7-я страница темы, сам пост. Хотя этот скрипт уже давно приведён в человеческий вид: 1 Quote Share this post Link to post Short link Share on other sites
justdj 13 #247355 Posted February 2, 2015 (edited) 7-я страница темы, сам пост. Хотя этот скрипт уже давно приведён в человеческий вид: #9.png Человеческим с народом не поделитесь?)) Прикрутил бекап - 5.5.1 не копирует файлы. Ставлю последнюю версию. Еще не подскажете? Почему в 5.5.1 работают скины, а в 5.5.5 нет? Вот код //====={ СКИН }=====\\ // Import the LoadVCLStyle function from VclStylesInno.DLL procedure LoadVCLStyle(VClStyleFile: String); external 'LoadVCLStyleW@files:VclStylesInno.dll stdcall'; // Import the UnLoadVCLStyles function from VclStylesInno.DLL procedure UnLoadVCLStyles; external 'UnLoadVCLStyles@files:VclStylesInno.dll stdcall'; function InitializeSetup(): Boolean; begin ExtractTemporaryFile('Amakrits.vsf'); LoadVCLStyle(ExpandConstant('{tmp}\Amakrits.vsf')); Result := True; end; procedure DeinitializeSetup(); begin UnLoadVCLStyles; end; //====={ СКИН }=====\\ Edited February 2, 2015 by justdj Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #247364 Posted February 2, 2015 Сижу на 5.5.1 - всё работает. 1 Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #247365 Posted February 2, 2015 Прикрутил бекап - 5.5.1 не копирует файлы. Ставлю последнюю версию. Юникод, анси? 1 Quote Share this post Link to post Short link Share on other sites
justdj 13 #247376 Posted February 2, 2015 (edited) Юникод, анси? Понял. Спасибо. Работает =) Edited February 2, 2015 by justdj Quote Share this post Link to post Short link Share on other sites
justdj 13 #247673 Posted February 4, 2015 Все сделал. 1) Как убрать мигание окна при наведении на компонент и отображения картинки под курсором? Если быстро передвигать по компонентам - можно в припадок упасть)) 2) Как сделать перемещение картинки вместе с курсором по всей длине описания компонента? 3) И как воткнуть бекап файлов в страницу выбора папки? (что-то не могу понять) Ткните носом, если обсуждалось или в мануал, буду благодарен. Могу пополнить мобилку за разжевывание, если надо. Quote Share this post Link to post Short link Share on other sites
Ekspoint 2,122 #247682 Posted February 4, 2015 Все сделал. 1) Как убрать мигание окна при наведении на компонент и отображения картинки под курсором? Если быстро передвигать по компонентам - можно в припадок упасть)) 2) Как сделать перемещение картинки вместе с курсором по всей длине описания компонента? 3) И как воткнуть бекап файлов в страницу выбора папки? (что-то не могу понять) Ткните носом, если обсуждалось или в мануал, буду благодарен. Могу пополнить мобилку за разжевывание, если надо. все это в первых двадцати стр Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #247684 Posted February 4, 2015 все это в первых двадцати стр Не всё, а только 3-й пункт. Quote Share this post Link to post Short link Share on other sites