[diman_21Ru]

Ivan_009, попрежнему моды ставятся в любую папку (

[saurn]

Но т.к. папка Assassin's Creed Revelations содержит знак ' (кавычку), то inno setup не понимает что надо удалить эту папку. Как исправить?»

читать дальше »

Код:

[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application
OutputDir=...


[CustomMessages]
CM_DEL_SAVE=Удалить также сохранения игры и профили игроков, находящиеся в следующем расположении:%n%n


[Code]
#define SaveDir "Assassin''s Creed Revelations"


function DeleteSavedGames(): Boolean;
var
    SavingFolderPath: String;
begin
    SavingFolderPath := ExpandConstant('{userdocs}\{#SaveDir}');
    Result := DirExists(SavingFolderPath);
    if not Result then Exit;
    case MsgBox(CustomMessage('CM_DEL_SAVE') + AddQuotes(SavingFolderPath), mbConfirmation, MB_YESNO) of
        6: DelTree(SavingFolderPath, True, True, True);
    end;
end;


procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
    case CurUninstallStep of
        usPostUninstall: DeleteSavedGames();
    end;
end;

[Nightwishh]

Всем добрый вечер. Хочу спросить:
1) Можно ли сделать объект WizardForm.InfoBeforeMemo без заднего фона (т.е. прозрачным) (без ботвы) и если нет, то какой объект можно взять вместо него у которого есть прозрачность и скроллбар?
2) Чем отличается

Код:

SendMessage(WizardForm.CancelButton.Handle, $00F5, 0, 0);

от

Код:

WizardForm.Close

и что лучше?
3) С чем связана ошибка Память не может быть read. Появляется она один раз после установки когда нажимаешь на кнопку заершить и больше она не появляется, хоть сто раз устанавливай.
Спасибо!!!

[diman_21Ru]

Всем привет можно ли как у Jove в мод-паке сделать выбираешь папку с игрой если найдет ярлык игры то моды ставятся именно туда , зарание спасибо

[Tco 03]

Всем привет.
Кому не сложно подскажите, пожалуйста, какой код отвечает за фунцию вывода сообщений: "Вы действительно хотите удалить..." и "...полностью удалена с Вашего копьютера"

[dr.alexa2000@vk]

saurn

Не получилось, прикрепил весь скрипт к сообщению,исправьте,пожалуйста...
Ваш код я вставил на 1420 строке.

[saurn]

Не получилось »

Процедура CurUninstallStepChanged была объявлена дважды. Скрипт во вложении.

[Ivan_009]

Почему шрифт отображается на разных системах поразному? Как добиться идентичности отображения...
P.S Шрифт был использован "Trebuchet MS" тест на Win 7 и Win XP...

[diman_21Ru]

ответьте пожалуйста на мой вопрос кто знает , очень нужна 'та функция что писал выше, зарание спасибо

[Ivan_009]

diman_21Ru, Через реестр так:

читать дальше »

[Setup]
AppName=MyApp
AppverName=MyApp
DefaultDirName={pf}\MyApp

[Registry]
Root: HKLM; Subkey: SOFTWARE\MyApp; ValueName: InstallPath; ValueType: string; ValueData: {app}; Flags: uninsdeletekey

[code]
function InitializeSetup(): Boolean;
begin
Result:= True;
if RegValueExists(HKLM, 'SOFTWARE\MyApp', 'InstallPath') then begin
MsgBox('Копия данной программы уже установлена! Установка будет прекращена', mbConfirmation, MB_OK);
Result:= False;
end;
end;