[A1EXXX]

Tukash, всё растягивается вручную. Каждый элемент нужно либо растягивать, либо смещать. Само оно не сделается...

[Tukash]

A1EXXX
все пасибо рестол скачал там намного проще все, с простым инно и передвижением по цифрам я бы с ума сошел!!!

[Vengeance]

Tukash, попробЫвал... Наверно не то сделал или что.

Выбираю к примеру Установить модели 1. У меня ставятся обе папки. И еще, мне надо чтобы папки model1 и model2 устанавливались файлы из них в папку models.

Скрипт:

Код:

[Setup]
AppName=Ïðîâåðêà
AppVerName=Ïðîâåðêà1.5
AppPublisher=Ïðîâåðêà
AppPublisherURL=http://www.mycompany.com
AppSupportURL=http://www.mycompany.com
AppUpdatesURL=http://www.mycompany.com
DefaultDirName={pf}\Ïðîâåðêà
DefaultGroupName=Ïðîâåðêà
DisableProgramGroupPage=yes
LicenseFile=C:\ag\Ëèöåíçèÿ.txt
InfoBeforeFile=C:\ag\Èíôîðìàöèÿ.txt
OutputDir=C:\Íîâàÿ ïàïêà
OutputBaseFilename=proverka
Compression=lzma
SolidCompression=yes

[Languages]
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"

[Components]
Name: lng; Description: Âûáåðèòå:; Flags: fixed; Types: custom
Name: lng/ru; Description:Óñòàíîâèòü ìîäåëè 1; Flags: exclusive
Name: lng/en; Description: Óñòàíîâèòü ìîäåëè 2; Flags: exclusive

[Files]
Source: C:\s\a\model1\*; DestDir: {app}\; Components: lng/ru; Flags: recursesubdirs ignoreversion sortfilesbyextension createallsubdirs
Source: C:\s\a\model2\*; DestDir: {app}\; Components: lng/en; Flags: recursesubdirs ignoreversion sortfilesbyextension createallsubdirs

[Files]
Source: "C:\ag\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
; Íå èñïîëüçóéòå ôëàã "ignoreversion" äëÿ ëþáûõ ñèñòåìíûõ ôàéëîâ.

Чёрт, йероглифы... (

[Tukash]

Код:

[Files]
Source: C:\s\a\model1\*; DestDir: {app}\; Components: lng/ru; Flags: recursesubdirs ignoreversion sortfilesbyextension createallsubdirs
Source: C:\s\a\model2\*; DestDir: {app}\; Components: lng/en; Flags: recursesubdirs ignoreversion sortfilesbyextension createallsubdirs

[Files]
Source: "C:\ag\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
; Íå èñïîëüçóéòå ôëàã "ignoreversion" äëÿ ëþáûõ ñèñòåìíûõ ôàéëîâ.

соединил тебе:

Код:

[Files]
Source: C:\s\a\model1\*; DestDir: {app}\models\; Components: lng/ru; Flags: recursesubdirs ignoreversion sortfilesbyextension createallsubdirs
Source: C:\s\a\model2\*; DestDir: {app}\models\; Components: lng/en; Flags: recursesubdirs ignoreversion sortfilesbyextension createallsubdirs
Source: "C:\ag\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

вот! должно работать! главное что бы у тебя в C:\s\a\mode* в папке "а" были файлы а не твоя папка, иначе так и установится папкой, короче в папку "а" кидай файлы напрямую из папки моделс! думаю понял

[beve]

Подскажите такое. Что добавить в скрипт, чтоб перед деинсталяцией приложения был убит процесс, а уже потом происходила деинсталяция приложения.
Добавил в скрипт такой код, но не работает, процесс не закрывается и поэтому программа не удаляется:

Код:

[_Code]
function RunTask(FileName: string; bFullpath: Boolean): Boolean;
 
function KillTask(ExeFileName: string): Integer;

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
  if CurUninstallStep = usUninstall then
  begin
    if RunTask('punto.exe', false) then
     KillTask('punto.exe');
  end;
end;

[Sotonisto]

Код: NeedSize := 5600 »

Tukash, респект те!
И как я эту строку раньше не увидел?!
Кста там было 5428

[svensoft]

Какой из этих парамметров отвечает за прижименае текста ("прижимать влево", "прижимать вправо", "по середине"), или может какой-нить другой ?.. Код: PageNameLabel := TLabel.Create(WizardForm); PageNameLabel.Left := ScaleX(25); PageNameLabel.Top := ScaleY(10); PageNameLabel.Width := ScaleX(300); PageNameLabel.Height := ScaleY(14); PageNameLabel.AutoSize := False; PageNameLabel.WordWrap := True; PageNameLabel.Font.Color := clBlack; PageNameLabel.Font.Style := [fsBold]; PageNameLabel.Transparent := True; PageNameLabel.Parent := WizardForm.MainPanel;или просто, как можно сделать, чтобы текст прижимался"по середине" ?.. »

Ребят, ну помогите посередине текст отцентровать !!!

[serg aka lain]

ну помогите посередине текст отцентровать !!! »

Код:

PageNameLabel.Alignment := taCenter;

[Tukash]

Sotonisto
рад что помог

[A1EXXX]

Чёрт, йероглифы... ( »

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