[doctor_allcome]

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

[habib2302]

Доброе время суток. Можно ли как-то организовать определение занятых процессом файлов перед установкой и перед деинсталяцией программы и потом завершить процесс?

[sergey3695]

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

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

[Serjione]

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

[Nordek]

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

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

Код:

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

[Serjione]

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

[kotyarko@fb]

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

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

[Serjione]

Благодарю за помошь.
Другой момент. Жалуется на ковычки в скобкаx

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

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

[Phorcis]

Имеется примерный код. Вывод описания компонента в лейбл. При выставлении компоненту флага 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;

[kotyarko@fb]

Жалуется на ковычки в скобкаx Можно исправить это ?»

Да, можно. Тут схожий принцип (и в справке он также описан).
Нужно просто продублировать каждую кавычку:

Код:

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

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

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