Форум программистов, компьютерный форум, киберфорум
Инсталляторы
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/15: Рейтинг темы: голосов - 15, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 05.09.2016
Сообщений: 1
1

Inno Setup. Работа с файлами

05.09.2016, 05:51. Просмотров 3005. Ответов 2

Здравствуйте. Необходимо в скопированном файле File.txt найти значение "FromStr" и поменять его на "ToStr" Нагуглил следующий код, но почему-то он не работает, пробовал экспериментировать. Пожалуйста помогите найти ошибку. Дистрибутив inno setup v5.5.8-unicode.exe, ос windows 7

Код (Text):
[Setup]
AppName=My Program
AppVerName=My Program v.1.2
DefaultDirName={pf}\My Program

[Files]
Source: "File.txt"; DestDir: "{app}\Files"; Flags: ignoreversion;

[Code]
var
UnicodeStr: string;
ANSIStr: AnsiString;
begin
LoadStringFromFile(ExpandConstant('{app}\Files\File.txt'), ANSIStr)
UnicodeStr := String(ANSIStr);
StringChangeEx(UnicodeStr, ExpandConstant('"FromStr"'), ExpandConstant('"ToStr"'), False)
SaveStringToFile('{app}\Files\File.txt', AnsiString(UnicodeStr), True);
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.09.2016, 05:51
Ответы с готовыми решениями:

Inno Setup ИНСТАЛЯЦИЯ
Кто знает как работать с программой Inno Setup? Очень нужно сделать електронную книжку с...

Inno setup DefaultDirName
Всем привет. Почему при выборе директории добавляется директори "Новая папка" ??? Как...

Inno setup sfx архив
Доброго времени суток! Каким образом можно создать экзешник аналогичный sfx архиву? Т.е который...

Inno Setup несколько ярлыков
Доброго времени суток! Подскажите пожалуйста, возможно ли средствами InnoSetup реализовать такую...

2
769 / 418 / 137
Регистрация: 03.06.2009
Сообщений: 1,223
Записей в блоге: 4
13.09.2016, 12:29 2
jason32, Вам надо, в секции [Code] описать функцию, которую Вы будете запускать в определенный момент.

Что-то вроде этого
[CODE]
Код
[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{A37A6544-0ED5-4D53-B01F-88F308AC23F8}
AppName=My Program
AppVersion=1.5
;AppVerName=My Program 1.5
AppPublisher=My Company, Inc.
AppPublisherURL=http://www.example.com/
AppSupportURL=http://www.example.com/
AppUpdatesURL=http://www.example.com/
AppendDefaultDirName=no
DefaultDirName={code:MyConst}
DisableDirPage=yes
DefaultGroupName=My Program
OutputBaseFilename=setup
Compression=lzma
SolidCompression=yes

[Code]
const
  DefaultDrive1='D:\';
  DefaultDrive2='C:\';
  AppFolder = 'Base\';
function MyConst(Param: string): String;

begin
    if DirExists(DefaultDrive1 + AppFolder)then begin
    result:=DefaultDrive1 + AppFolder ;
    end;
    if DirExists(DefaultDrive2 + AppFolder)then begin
    result:=DefaultDrive2 + AppFolder;
    end;

end;





[Languages]
Name: "english"; MessagesFile: "compiler:Default.isl"

[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked

[Files]
Source: "C:\Program Files\Inno Setup 5\Examples\MyProg.exe"; DestDir: "{app}"; Flags: ignoreversion
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: "{group}\My Program"; Filename: "{app}\MyProg.exe"
Name: "{commondesktop}\My Program"; Filename: "{app}\MyProg.exe"; Tasks: desktopicon

[Run]
Filename: "{app}\MyProg.exe"; Description: "{cm:LaunchProgram,My Program}"; Flags: nowait postinstall skipifsilent
[/CODE]
0
5 / 4 / 1
Регистрация: 18.11.2012
Сообщений: 97
02.01.2017, 04:15 3
Здравствуйте.
Возможен ли такой вариант распаковки, при котором перед началом
извлечения установщик согласно сценария сначала проверяет путь
и, если не находит его, то установка прекращается с заданным в
сценарии сообщением а если находит то извлекает в существующий?
Основной упор на то, чтобы НЕ извлекал, если путь не создан ранее.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.01.2017, 04:15

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

Inno Setup текст в окне
Можно ли изменить тест то что выделено красным ? Хочу вместо этого другой текст написать

Inno Setup иконка ярлыка
Name: "{group}\Counter-Stike"; Filename: "{app}\hl.exe"; WorkingDir: "{app}"; Parameters: -game...

Inno setup, ярлык в пуске
Добрый день. Я устанавливаю программу с правами администратора в локальную директорию, только для...

Inno Setup: модификация ключа реестра
Каким образом можно дописать в уже существующий ключ ещё данные? В реестре есть один ключ,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.