Скрипты Inno Setup. Помощь и советы [часть 8]

[Dodakaedr]

sergey3695, еще раз Спасибо! Все работает. Сам бы я до такого вряд ли дошел.

[solopavel]

ZVSRus, спасибо за оперативный ответ.

Сейчас попробую.

[AlekseyPopovv]

Цитата habib2302:



завершить процесс

Скрипты Inno Setup. Помощь и советы [часть 8]

если это будет делаться принудительно, то не думаю что будет хорошо для пользователя. а что за файлы?

[El Sanchez]

Добрый день. В резделе RЕGISTRY, при компиляции, жалуется на символы { }. Можно это исправить ?

[vovann01]

Цитата Serjione:



при компиляции, жалуется на символы { }. Можно это исправить ?

Скрипты Inno Setup. Помощь и советы [часть 8]

Вторую фигурную скобку добавьте, пример:



Код:

Код: Выделить всё

Root: HKLM; SubKey: SOFTWARE\test\{{12345}

[ZVSRus]

Цитата vovann01:



Мне нужно, что бы установщик СНАЧАЛА сохранял в архив файлы, которые уже лежат на компе, а только потом производилась установка



Другими словами, перед установкой нужно сделать Backup файлов которые лежат на компе.

В справке как сделать Backup (Создать резервную копию оригинальных файлов) я насчитал около 10 примеров.

Где искать смотри на картинке.

[Naomi]

Цитата Serjione:



после второй скобки }, тоже надо еще одну скобку ставить ?

Скрипты Inno Setup. Помощь и советы [часть 8]

Нет, только после первой

.

[El Sanchez]

Благодарю за помошь.

Другой момент. Жалуется на ковычки в скобкаx



ValueData: "[open("%1")]"



Можно исправить это ?

[vovann01]

Имеется примерный код. Вывод описания компонента в лейбл. При выставлении компоненту флага fixed ему в описании прибавляется текст "Временно недоступно", который нигде не прописан. Как этот текст убрать? Во всем этом я профан, пытался прогуглить - не нашел





Код:

Код: Выделить всё

[Components]
Name: "name"; Description: "Фывфыв:"; Types: full; Flags: fixed
[Код]
Var 
BoxForDescription: TListBox
DescriptionLabel : TLabel
Procedure Descriptions(Sender: TObject; Index: Integer; var DescriptionLabel: TLabel);
var
 Description: String;
begin
 case TNewCheckListBox(Sender).Tag of
  WizardForm.ComponentsList.Tag:
   case WizardForm.ComponentsList.ItemCaption[Index] of
    'Фывфыв:': Description := 'описание.';
     end;  
 end;
DescriptionLabel.Caption := Description;
end;
Procedure CreateObjects();
begin
BoxForDescription := TListBox.Create(WizardForm);
 with BoxForDescription do
 begin
  Parent := WizardForm;
  SetBounds(ScaleX(BoxForImage.Left), ScaleY(BoxForImage.Top + BoxForImage.Height + 2), ScaleX(BoxForImage.Width - 2), ScaleY(93));
  DescriptionLabel := TLabel.Create(BoxForDescription);
  with DescriptionLabel do
  begin
   Parent := BoxForDescription;
   SetBounds(ScaleX(3), ScaleY(1), ScaleX(BoxForDescription.Width - 7), ScaleY(BoxForDescription.Height - 2));
   AutoSize := False;
   WordWrap := True;
   Caption := 'Наведите на компонент в списке, чтобы увидеть его описание';
   Font.Color := clWhite;
   Font.Size := 9;
  end;
 end;

[ZVSRus]

Цитата Serjione:



Жалуется на ковычки в скобкаx

Можно исправить это ?

Скрипты Inno Setup. Помощь и советы [часть 8]

Да, можно. Тут схожий принцип (и в справке он также описан).

Нужно просто продублировать каждую кавычку:



Код:

Код: Выделить всё

ValueData: "[open(""%1"")]"

Цитата Phorcis:



Имеется примерный код. Вывод описания компонента в лейбл. При выставлении компоненту флага fixed ему в описании прибавляется текст "Временно недоступно", который нигде не прописан. Как этот текст убрать?

Скрипты Inno Setup. Помощь и советы [часть 8]

Прописан, просто скрипт с ним лежит

чуть глубже

.

ListBox тут был совсем не в тему, поэтому в новых обновлениях вместо DescriptionLabel будет DescriptionMemo. А ListBox будет убран, как и надо было с самого начала делать Ну это я так, к слову.