[SatHan]

просто удали эту структуру, когда писался этот скрипт, инно еще не содержала TMSG »

спасибо. убрал

Код:

  TMSG = record
    hwnd:    HWND;
    msg:     LongWord;
    wParam:  Word;
    lParam:  LongWord;
    MsgTime: LongWord;
    pt:      TPOINT;
  end;

похоже работает. тока мне всё равно не понятен код.
нужно http://forum.oszone.net/post-1993713-1015.html

покажи секцию ярлыков. »

Код:

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

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

нужно чтоб заместо [Tasks] всплывало.

[Gnom_aka_Lexander]

SatHan,
Вариант номер один, мне не нравится, но соответствует поставленому тобой условию:

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

Код:

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

[Icons]
Name: "{commondesktop}\Application"; Filename: "{app}\MyProg.exe"; Check: desktopicon

[*code]
var
  Desctop : Boolean; // опорный флаг, исходя из которого будем создавать или не создавать ярлык
  
function desktopicon: Boolean;
begin
  Result := Desctop;
end;

function InitializeSetup(): Boolean;
begin
  Desctop := False; // Изначально говорим, что не нужно создавать ярлык.
  Result := True;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
  if CurPageID = wpReady then // Спрашиваем на странице готовности
    Desctop := MsgBox(ExpandConstant('{cm:CreateDesktopIcon}'), mbConfirmation, MB_YESNO)= IDYES;
end;

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

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

Код:

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

[Icons]
Name: "{commondesktop}\Application"; Filename: "{app}\MyProg.exe"; Check: desktopicon

[*code]
function desktopicon: Boolean;
begin
  Result := MsgBox(ExpandConstant('{cm:CreateDesktopIcon}'), mbConfirmation, MB_YESNO)= IDYES;
end;

естественно, задачу на создания ярлыка нужно удалить.

[R.i.m.s.k.y.]

там, где нолик - порядковый номер твоего компонента. и учитывай, что нумерация начинается с нуля. »

Ога, а потом в дистрах постоянно выскакивает "out of bounce"

_____________

Tco 03,
вот так можно узнать номер компонента по его имени или наоборот - по номеру узнать название

Код:

...
# define SVP "SmoothVideo Project 3.1"
...
SVPname := WizardForm.ComponentsList.Items.IndexOf(ExpandConstant('{#SVP}')); // номер по названию
SVPappname := WizardForm.ComponentsList.ItemCaption[SVPname]; //название по номеру
if SVPname >= 0 then begin
 твои действия
end;

[apozlevich]

А как сделать так, что бы на 32-битной системе установился один файл, а на 64-битной другой?

[Gnom_aka_Lexander]

apozlevich, встроенная функция IsWin64 на файле, который под 64 стравишь Check : IsWin64 , который под 32 - Check : not IsWin64

[apozlevich]

Gnom_aka_Lexander, спасибо! Многого же нет в официальном FAQ о_О

А как сделать так, что бы если выбран компонент, менялась директива Setup (например Uninstallable) и запрещались иконки и записи в реестр?

Еще вопрос: как сделать так, что в зависимости от разрядности процессора (32-bit или 64-бит) меняется путь к файлу для ярлыков? Можно ли поступить так же, как и с файлами?

[R.i.m.s.k.y.]

А как сделать так, что бы если выбран компонент, менялась директива Setup (например Uninstallable) и запрещались иконки и записи в реестр? »

Не все директивы Setup можно менять

Еще вопрос: как сделать так, что в зависимости от разрядности процессора (32-bit или 64-бит) меняется путь к файлу для ярлыков? »

Точно так же как и выше Check: IsWin64 один путь, Check: not IsWin64 другой путь
_______
У каждой секции, кроме кода, есть свойство Components
Можно комбинировать, к примеру Components: not a; или Components: a and (not b);

Ты бы код выложил так проще будет хелпать чем сферические примеры рисовать

[Gnom_aka_Lexander]

менялась директива Setup »

Встроенная функция IsComponentSelected тут поможет. но не везде - некоторые свойства секции Setup не могут управляться внешними функциями.

и запрещались иконки и записи в реестр? »

в каждой секции есть свойство Components : имя компонента.

Странно, этого нет в официальном FAQ о_О »

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

в зависимости от разрядности процессора (32-bit или 64-бит) »

Процессора или ОС ? Это разные вещи.

[t16bz]

Здравствуйте. Нужно сделать чтобы перед появлением WizardForm появлялась, например Forma1, и только после ее закрытия появлялась WizardForm

[apozlevich]

официальный фак »

Вот FAQ, Knowledge Base и референс от автора. До этого момента я смотрел только в референс, теперь буду смотреть все И втроенный хелп гляну.

Процессора или ОС ? Это разные вещи. »

Торможу, конечно ОС

Ты бы код выложил так проще будет хелпать чем сферические примеры рисовать »

Вот напишу по вашим примерам - выложу