Nowik1971

#define MyAppName "Моя программа" #define MyAppVersion "1.5" #define MyAppPublisher "Моя компания, Inc." #define MyAppURL "http://www.сайт.com/"#define MyAppExeName "MyProg.exe" [Setup] AppId={{ACF6B5AB-9DF3-43EB-B40C-633F075EC471} AppName={#MyAppName} AppVersion={#MyAppVersion} ;AppVerName={#MyAppName} {#MyAppVersion} AppPublisher={#MyAppPublisher} AppPublisherURL={#MyAppURL} AppSupportURL={#MyAppURL} AppUpdatesURL={#MyAppURL} DefaultDirName={pf}\{#MyAppName} DefaultGroupName={#MyAppName} OutputBaseFilename=setup Compression=lzma SolidCompression=yes [Components] Name: comp1; Description: "Установить ..."; Name: comp2; Description: "Удалить ..."; [code] procedure ComponentsListOnClickCheck(Sender: TObject); begin if (WizardForm.ComponentsList.ItemIndex = 0) and IsComponentSelected('comp1') then if MsgBox('вы действительно хотите поставить этот мод, мы его не рекомендуем ставить потому что ....', mbConfirmation, MB_YESNO) = IDNO then WizardForm.ComponentsList.Checked[0]:= false; end; procedure InitializeWizard; begin WizardForm.ComponentsList.OnClickCheck:=@ComponentsListOnClickCheck; end; А если у меня компоненты вот такие: 'компоненты' то мне надо как написать? к примеру к 10 компоненту [Code] procedure ComponentsListOnClickCheck(Sender: TObject); begin if (WizardForm.ComponentsList.ItemIndex = 0) and IsComponentSelected('BMP\Battle_Assistant') then if MsgBox('вы действительно хотите поставить этот мод, мы его не рекомендуем ставить потому что ....', mbConfirmation, MB_YESNO) = IDNO then WizardForm.ComponentsList.Checked[0]:= false; end; procedure InitializeWizard; begin WizardForm.ComponentsList.OnClickCheck:=@ComponentsListOnClickCheck; end; или это не правильно? я пробовал не работает... помогите разобраться что не так делаю. надо понять...

Спасибо! я уже доделал, пока вопросов нет, но ФАQ пригодится есть еще один вопрос к Kotyarko_O как он сделал проверку на модпак в ангаре вот я здесь увидел его скрин. http://www.koreanrandom.com/forum/topic/9050-инсталлятор-для-модпаков/?p=199696.. можно такой скрипт?

Смеёшься? Я по Русски и то не всегда правильно говорю, а ты мне англицкую речь даешь читать ..... спасибо Dark_Knight_MiX помог терпения хватило, он не послал как множество здесь. Ему +++ огромный!!! Вот результат прилепил .Barmaleykin_MultiPackFull.rar

я прошу помощи так ка сам не разбираюсь как вы, а вы тупо посылаете.... вот и помог блин, спасибо!

В этом примере по моему чистятся, удаляются и настройки игры, а мне такого не надо, надо чтобы настройки игры сохранялись. это во первых, а во вторых как мне прицепить не в установку, а в удаление восстановление раннего бекапа и если его нет, то просто продолжить удаление пака.?

WoT CacheCleaner.rarНу, Гуру подскажите как мне вставить этот код очистки кеша чтобы работал, а то пишет ошибку, я языка не знаю вот и прошу помощи. 'код скрипта'

подскажите в примере как этот скрипт подключить и еще вопрос... я не совсем все понимаю, вот например я выложил свежую версии. пака на яндекс диск как сделать чтобы в ангаре и при установке проверялось и выдавалось сообщение о том что есть обновление.. и гадо перейти по ссылке....Заранее спасибо за помощь...

Отлично! Кое что мне надо почерпнуть у тебя, а именно это проверка обновлений.... как до этого дойду напишу в личку может поможешь если сам не разберусь

Я учусь и за помощь все огромное спасибо! Да и не злись на меня плюсов и тебе наставлю мне не жалко, я просто подчеркнул своим минусом, что ты просто сарказм свой показываешь , а просто помочь не смог сначала, Короче всем спасибо! И не посылайте меня часто ....

Спасибо мне уже помогли, и тебе на добром слове спасибо! И ничего не путается просто руками меньше вводить. Все просто отлично работает! только вот жто скрипт надо так же чтобы на автомате сделать, и чтобы выдавал сообщение "С момента создания данной версии прошло больше 2-х недель." не на следующий день, а действительно через пару недель. #define DownloadUrl "http://l****/"; #define ExpiryDate "20160121"; //Дата в формате год-месяц-день [Code] function InitializeSetupDateTime: Boolean; var ResultCode: Integer; begin Result:=CompareStr(GetDateTimeString('yyyymmdd', #0,#0), '{#ExpiryDate}') <= 0; If not Result then begin If MsgBox('Внимание!' #13#13 'С момента создания данной версии прошло больше 2-х недель.' #10#10 'Желаете проверить наличие обновлений?', mbError, MB_YESNO)=IDYES then begin ShellExec('', '{#DownloadUrl}', '' , '', SW_SHOW, ewNoWait, ResultCode); Exit; end else Result:=True; end; end;

Имеется скрипт с этого сайта нужно максимально автоматизировать , чтобы дата и время вводилось автоматом при создании в секцию #define ExpiryDate "20160121"; //Дата в формате год-месяц-день , ,.... да и еще помогите усовершенствовать скрипт, а то он не так работает, короче если сегодняшняя дата то сообщение не выдает, а если вчерашнее число даты поставить уже выдает сообщение предупреждениянадо чтобы примерно 1-2 недели не выдавал сообщение предупреждения. 'Скрипт ' ,

Спасибо! первая часть кода работает, а вторая нет, ... скрипт копилируется, но во время установки он неубивает процесс игры танков, а танки его убивают вахаха, сам пишу сам ржу как это так и пишет: в строке отладки [17:28:06,752] *** Установка started Что не так делаю? Нажимаю нет и установка не продолжается пробовал менять труе на фальсе все равно

Как совместить эти два скрипта

Я не знаю как прикрутить архиватор, а во вторых вот такая проблемка: как это реализовать подскажите ткните носом, должен быть архив в папке с датой и временем

Спасибо все теперь работает! копирует и бекапит, но мне все же интересно а как сделать чтобы бекап упаковывался и архив был с датой и временем создания в названии архивабекапа

Не могу реализовать бекапирование пробую и в юникоде версии и в анси все равно пустые папки, если только файл кидаю в 0,9,13 то он бекапируется, а все что во вложенных папках в 0,9,13 и хвм не копируется помогите плиз. я только на 8 странице и причем здесь распаковка.... ты обещал в личке и так и не дал ответ, а я твердолобый должен так же понять все

Все папки создаются пустые и в 0.9.13. один файл создается ignoremodpackconfig.info в нем написано:Бро! Ну как так-то? Мы же просто хотим знать, какие моды пользуются наибольшей популярностью, чтобы развивать и улучшать их =( Пробовал и ansi версию и Unicode все одно и тоже.. В чем проблемка? Гуру помогите... вот код:

Вот так сделал все равно пустые папки и ничего не копируется