Kotyarko_O 1,906 #178778 Posted April 28, 2014 Вариант "3" тухлый! Так точно. Он только для того случая, если нужно установить только один звуковой мод. Quote Share this post Link to post Short link Share on other sites
-zav- 188 #178782 Posted April 28, 2014 В общем меня тут начали уже хренами на раковом обкладывать по этому поводу, За что? За то что помогаеш тем кто пытается расширить свой кругозор и хоть что то сделать своими руками? Quote Share this post Link to post Short link Share on other sites
XXX_MUTANT 76 #178784 Posted April 28, 2014 (edited) Когда убираеш общюю галочку с пункта "17. Звуковой мод" то никаких копирований звуков не происходит. Обратите внимание на конец строки: Source: "{app}\res\audio\*"; DestDir: "{app}\res_mods\{#MyAppVer}\audio\"; Flags: external recursesubdirs skipifsourcedoesntexist; Components: KMP\OZ; Name: KMP\OZ; Description: 17. Звуковой мод.; Types: viborochnaya; Flags: checkablealone dontinheritcheck Приму на вооружение! За что? За то что помогаеш тем кто пытается расширить свой кругозор и хоть что то сделать своими руками? Вот именно! Я только для личного пользования и понимания работы на уровне ламера! Я в ахе, давление оказывают.... Edited April 28, 2014 by SuperXcool 1 Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #178791 Posted April 28, 2014 Сладкое - полный код моего пака: Можете пользоваться. 2 1 Quote Share this post Link to post Short link Share on other sites
aCHIVKA 6 #178794 Posted April 28, 2014 Сладкое - полный код моего пака: Можете пользоваться. большое спасибо Quote Share this post Link to post Short link Share on other sites
XXX_MUTANT 76 #178796 Posted April 28, 2014 Сладкое - полный код моего пака: Можете пользоваться. В глазах от радости поплыло! Quote Share this post Link to post Short link Share on other sites
aCHIVKA 6 #178798 Posted April 28, 2014 Мне бы именно тот код который я просил Только вот это мне нужно КТО ТО ДАСТ? 4 Quote Share this post Link to post Short link Share on other sites
liked 19 #178833 Posted April 28, 2014 Варианты ешё будут с отображение картинки мода... Нужен пример скрипта чтоб картинка была с боку а не появлялась именно возле указателя мыши, Quote Share this post Link to post Short link Share on other sites
aCHIVKA 6 #178837 Posted April 28, 2014 Варианты ешё будут с отображение картинки мода... Нужен пример скрипта чтоб картинка была с боку а не появлялась именно возле указателя мыши, я вот тоже этот скрипт прошу,нее кто не дает все жадины такие Quote Share this post Link to post Short link Share on other sites
liked 19 #178846 Posted April 28, 2014 (edited) Да и в обще кто бы выложил готовый скрипт хорошего инсталятора, по примеру проще делать. меня например заинтересовал вот такой вот инсталятор я вот тоже этот скрипт прошу,нее кто не дает все жадины такие Шас сижу леплю простенький как на 1 варианте который дали, но хотело бы вариант такой как на скрине выше Edited April 28, 2014 by liked Quote Share this post Link to post Short link Share on other sites
Kotyarko_O 1,906 #178865 Posted April 28, 2014 (edited) @aCHIVKA, @liked, вы уже тупо как дети начинаете клянчить.. Вам не кажется, что если автора этих скриптов не делают OpenSource - значит они не горят желанием раздавать свою работу кому-попало.. Ведь вы даже не можете просто погуглить (открою вам секрет, в инете столько всего можно найти..). Edited April 28, 2014 by Kotyarko_O 1 Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #178881 Posted April 28, 2014 Kotyarko_O, ну вот как раз насчёт aCHIVKA у меня сложилось такое мнение. Клянчание стало напрягать, вот и свернул "аттракцион щедрости". Люди не просто не хотят думать, они хотят что бы их дали всё на блюде с голубой каёмочкой. Quote Share this post Link to post Short link Share on other sites
aCHIVKA 6 #178888 Posted April 28, 2014 Да и в обще кто бы выложил готовый скрипт хорошего инсталятора, по примеру проще делать. меня например заинтересовал вот такой вот инсталятор 542c0538.jpg Шас сижу леплю простенький как на 1 варианте который дали, но хотело бы вариант такой как на скрине выше я тоже такой хочу,но тут не кто не хочет просто дать скрипт скажите мне по какому запросу искать и я найду я не знаю как написать в гугле это мне не нужен весь скрипт,мне нужен именно скрипт этого вида (вывода изображения в блоке) Quote Share this post Link to post Short link Share on other sites
liked 19 #178904 Posted April 28, 2014 @aCHIVKA, @liked, вы уже тупо как дети начинаете клянчить.. Вам не кажется, что если автора этих скриптов не делают OpenSource - значит они не горят желанием раздавать свою работу кому-попало.. Ведь вы даже не можете просто погуглить (открою вам секрет, в инете столько всего можно найти..). Рыл не нашол, именно того что хотел, есть хороший сайтик? подскажи буду только благодарен Kotyarko_O, ну вот как раз насчёт aCHIVKA у меня сложилось такое мнение. Клянчание стало напрягать, вот и свернул "аттракцион щедрости". Люди не просто не хотят думать, они хотят что бы их дали всё на блюде с голубой каёмочкой. Не видел не чего дельно именно от вас, только от автора темы Вот что нашёл, только именно того что мне нужно я не увидел http://innoultra.ru/?page_id=18 Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #179049 Posted April 29, 2014 (edited) liked, автор темы тут сам практически ничего не написал. Ну а я в свою очередь "путные вещи" (хотя опять же не понимаю что для вас это) просто не выкладываю. Шибко жирно будет. Edited April 29, 2014 by AtotIK Quote Share this post Link to post Short link Share on other sites
liked 19 #179054 Posted April 29, 2014 (edited) liked, автор темы тут сам практически ничего не написал. Ну а я в свою очередь "путные вещи" (хотя опять же не понимаю что для вас это) просто не выкладываю. Шибко жирно будет. я не так выразился по поводу вас, не чего путного именно для меня, то что прошу помочь вы не хотите, я хочу увидеть вашу работу, я её переделаю просто легче видеть как работает и уже отталкиваясь от вашего кода например, изменять дизайн и скрипт. Так что без обид если обидел Отлично будет нарыть тот код который я выкинул скрин с верху, в нете нахожу хорошие работы но они 2010-2011г и в фаил обменниках файлов тех уже нет Edited April 29, 2014 by liked Quote Share this post Link to post Short link Share on other sites
san4o 5 #179060 Posted April 29, 2014 случаем не это ищите? [Setup] AppName=My Program AppVerName=My Program v.1.2 DefaultDirName={pf}\My Program Compression=none [Components] Name: ZK1; Description: Звуковой мод звонок при крите модуля1.; Flags: disablenouninstallwarning exclusive Name: ZK2; Description: Звуковой мод звонок при крите модуля2.; Flags: disablenouninstallwarning exclusive [Files] //------- ваши картинки ------------ Source: image\1.bmp; Flags: dontcopy nocompression Source: image\2.bmp; Flags: dontcopy nocompression [code] const UNDEF_INDEX = -777; function GetCursorPos(var lpPoint: TPoint): BOOL; external '[email protected] stdcall'; var InfoPic: TBitmapImage; LastIndex: Integer; TempPath: String; procedure ShowPicHint(const PicFilePath: String); var pt: TPoint; begin if not GetCursorPos(pt) then Exit; InfoPic.Bitmap.LoadFromFile(PicFilePath); InfoPic.SetBounds(ScaleX(245), ScaleY(42), ScaleX(166), ScaleY(165)); InfoPic.Show; end; procedure CompOnItemMouseMove(Sender: TObject; X, Y: Integer; Index: Integer; Area: TItemArea); var UndefPic: String; begin if Index = -1 then Exit; if Index = LastIndex then Exit; try case TNewCheckListBox(Sender).ItemCaption[Index] of 'Звуковой мод звонок при крите модуля1.': UndefPic := '1.bmp'; // пишем точно так же, как прописано в компонентах 'Звуковой мод звонок при крите модуля2.': UndefPic := '2.bmp'; else begin LastIndex := UNDEF_INDEX; InfoPic.Hide; Exit; end; end; if not FileExists(TempPath + UndefPic) then ExtractTemporaryFile(UndefPic); ShowPicHint(TempPath + UndefPic); finally LastIndex := Index; end; end; procedure CompOnMouseLeave(Sender: TObject); begin InfoPic.Hide; LastIndex := -1; end; procedure InitInfo(); begin WizardForm.TypesCombo.Hide; WizardForm.ComponentsList.SetBounds(ScaleX(0), ScaleY(37), ScaleX(225), ScaleY(176)); WizardForm.ComponentsList.OnItemMouseMove := @CompOnItemMouseMove; WizardForm.ComponentsList.OnMouseLeave := @CompOnMouseLeave; TempPath := AddBackslash(ExpandConstant('{tmp}')); LastIndex := UNDEF_INDEX; with TBevel.Create(WizardForm) do begin Parent := WizardForm.SelectComponentsPage; SetBounds(ScaleX(240), ScaleY(37), ScaleX(177), ScaleY(176)); Shape := bsFrame; end; InfoPic := TBitmapImage.Create(WizardForm) with InfoPic do begin Parent := WizardForm.SelectComponentsPage; AutoSize := True; end; end; procedure InitializeWizard(); begin InitInfo(); end; 1 Quote Share this post Link to post Short link Share on other sites
liked 19 #179079 Posted April 29, 2014 (edited) случаем не это ищите? [Setup] AppName=My Program AppVerName=My Program v.1.2 DefaultDirName={pf}\My Program Compression=none [Components] Name: ZK1; Description: Звуковой мод звонок при крите модуля1.; Flags: disablenouninstallwarning exclusive Name: ZK2; Description: Звуковой мод звонок при крите модуля2.; Flags: disablenouninstallwarning exclusive [Files] //------- ваши картинки ------------ Source: image\1.bmp; Flags: dontcopy nocompression Source: image\2.bmp; Flags: dontcopy nocompression [code] const UNDEF_INDEX = -777; function GetCursorPos(var lpPoint: TPoint): BOOL; external '[email protected] stdcall'; var InfoPic: TBitmapImage; LastIndex: Integer; TempPath: String; procedure ShowPicHint(const PicFilePath: String); var pt: TPoint; begin if not GetCursorPos(pt) then Exit; InfoPic.Bitmap.LoadFromFile(PicFilePath); InfoPic.SetBounds(ScaleX(245), ScaleY(42), ScaleX(166), ScaleY(165)); InfoPic.Show; end; procedure CompOnItemMouseMove(Sender: TObject; X, Y: Integer; Index: Integer; Area: TItemArea); var UndefPic: String; begin if Index = -1 then Exit; if Index = LastIndex then Exit; try case TNewCheckListBox(Sender).ItemCaption[Index] of 'Звуковой мод звонок при крите модуля1.': UndefPic := '1.bmp'; // пишем точно так же, как прописано в компонентах 'Звуковой мод звонок при крите модуля2.': UndefPic := '2.bmp'; else begin LastIndex := UNDEF_INDEX; InfoPic.Hide; Exit; end; end; if not FileExists(TempPath + UndefPic) then ExtractTemporaryFile(UndefPic); ShowPicHint(TempPath + UndefPic); finally LastIndex := Index; end; end; procedure CompOnMouseLeave(Sender: TObject); begin InfoPic.Hide; LastIndex := -1; end; procedure InitInfo(); begin WizardForm.TypesCombo.Hide; WizardForm.ComponentsList.SetBounds(ScaleX(0), ScaleY(37), ScaleX(225), ScaleY(176)); WizardForm.ComponentsList.OnItemMouseMove := @CompOnItemMouseMove; WizardForm.ComponentsList.OnMouseLeave := @CompOnMouseLeave; TempPath := AddBackslash(ExpandConstant('{tmp}')); LastIndex := UNDEF_INDEX; with TBevel.Create(WizardForm) do begin Parent := WizardForm.SelectComponentsPage; SetBounds(ScaleX(240), ScaleY(37), ScaleX(177), ScaleY(176)); Shape := bsFrame; end; InfoPic := TBitmapImage.Create(WizardForm) with InfoPic do begin Parent := WizardForm.SelectComponentsPage; AutoSize := True; end; end; procedure InitializeWizard(); begin InitInfo(); end; Вот вот) именно такое а ешё примеры есть? а за этот огромное спасибо Кто бы объяснил как менять дизайн кнопок и всего исталятора, не могу разобраться и подскажи как визуально редактировать положение окна картинки? или нужен какой то плагин или что? зарание спасибо InnoUltra визуальная редактирование очень хромает не даёт размеры изменять окон, не отображает прям всё как в инсталяторе, то есть показывает одно копилируеш расположения другие Edited April 29, 2014 by liked Quote Share this post Link to post Short link Share on other sites
AtotIK 580 #179094 Posted April 29, 2014 (edited) Запомните: картинки, свистелки и перделки в инсталляторе далеко не главное. Главное - его функционал, что он может сделать в процессе установки. В плане дизайна нужно придерживаться минимализма и не перегружать интерфейс ненужными вещами. Для себя давным давно выбрал именно это, дизайн - всё просто, доступно и со вкусом, функционал - начиная от бэкапа, заканчивая редактированием на лету по средствам инсталлятора конфигов XVM и модов, автоматическим сохранением/восстановлением токена доступа к статистике XVM и т.д. Edited April 29, 2014 by AtotIK 1 Quote Share this post Link to post Short link Share on other sites
liked 19 #179103 Posted April 29, 2014 да так работает та всё, но хотелось бы дизайна, и информативности при выборе и установки модов, моя сборка вот - http://forum.worldoftanks.ru/index.php?/topic/1111250- XVM сборка моя, да и остальные моды переделанные потому что часто баги и лаги (конфликты) с другими модами, а вот инталятор не получается, мне проше сайт сделать чем эти инсталяторы :) по этому сижу учусь (мучаюсь) в 1 очередь добавить картинки вот скрипт скинули работает, только не пойму как визуально отредактировать раположение картинки Quote Share this post Link to post Short link Share on other sites