[BaRSPRO]

vint56, Спасибо, большое, за помощь!

[BaRSPRO]

vint56, не подскажешь как изменить цвет шрифта на панельке

Код:

AutoSize:=False; SetBounds(ScaleX(357), ScaleY(96), ScaleX(114), ScaleY(20)); Transparent:=True; Font.Name:= 'Courier New'; Font.Size:= 10; Font.Style:=[fsBold]; Caption := ExpandConstant('{cm:StartMenu}'); Parent := WizardForm;

[vint56]

BaRSPRO, призапуске установшика
case CurPageID of
wpWelcome:
begin
Welcome.Font.Color := $00FFFF; цвет желтый вот здесь меняй цвет
и после переходана другую страничку

procedure CurPageChanged(CurPageID: Integer);
begin
SetStateNewButtons;
Welcome.Font.Color := $FFFFFF; вот здесь меняй цвет
и так далие

[EN130]

Как ставить комментарий в одной строке с параметром?

[qqqb]

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

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

Как запретить во время установки изменять конечную папку? Чтобы юзер мог установить в любую папку , но инсталятор сам создал бы в этой папке папку в которую будут копироваться файлы. Есть переменная обозначающая не папку куда устанавливается приложение, а папку в которой находится папка с приложением »

Догоняю краями... Как-то сумбурно написано
т.е. пользователь указывает папку а там уже инсталлер все разбрасывает по подпапкам? просто -

Код:

Source: Total Commander XP\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs

В папке Source: Total Commander XP\* есть подпапки самого тотала, приложений для него (AkelPad, IrfanView), в результате в папке, указанной пользователем, создаются папки самого тотала, и если выбрано при установке - доп. программок, в общем в папке, указанной пользователем при установке создается структура папок как в Source: Total Commander XP\*

Как ставить комментарий в одной строке с параметром? »

стандартные указатели комментариев (без кавычек): ";", "/* комментарий */", "//"
Но ";" используется для разделения параметров, так что получается вроде никак, как вариант комментировать сверху строчки. В хелпе так и написано - комментарий определяется ";" в начале строки.
В коде "//" в любом месте строки, "/* */" так же в любом месте строки кода С

[EN130]

R.i.m.s.k.y.,
Такой код выдает ошибку Системе не удается найти указанный путь.

HTML код:

WizardImageFile=C:\D1.bmp; // 164x314

Когда убираю комментарий, все компилируется.
В то-же время такой код

HTML код:

  HSTREAM = DWORD;      // тип звукового потока

Отрабатывает нормальна. Чего я не понимаю?

Хочу сделать слайд-шоу через такой код:

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

HTML код:

[Setup]
WindowVisible=yes
WindowResizable=no
WindowShowCaption=no

[Files]
Source: C:\isxbb.dll; DestDir: {tmp}; Flags: dontcopy
Source: C:\1.jpg; DestDir: {tmp}; Flags: dontcopy
Source: C:\2.jpg; DestDir: {tmp}; Flags: dontcopy
Source: C:\3.jpg; DestDir: {tmp}; Flags: dontcopy
Source: C:\4.jpg; DestDir: {tmp}; Flags: dontcopy

[code]
const
  BACKGROUND=6;
  TIMER=16;

function isxbb_AddImage(Image: PChar; Flags: Cardinal): Integer;
external 'isxbb_AddImage@files:isxbb.dll stdcall';

function isxbb_Init(hWnd: Integer): Integer;
external 'isxbb_Init@files:isxbb.dll stdcall';

function isxbb_StartTimer(Seconds: Integer; Flags: Cardinal): Integer;
external 'isxbb_StartTimer@files:isxbb.dll stdcall';

function isxbb_KillTimer(Flags: Cardinal): Integer;
external 'isxbb_KillTimer@files:isxbb.dll stdcall';

procedure InitializeWizard();
begin
    ExtractTemporaryFile('1.jpg');
    isxbb_AddImage(ExpandConstant('{tmp}')+'\1.jpg',BACKGROUND);
    isxbb_Init(StrToInt(ExpandConstant('{hwnd}')));
end;

procedure CurStepChanged(CurStep: TSetupStep);
begin
 if CurStep=ssInstall
then
begin
ExtractTemporaryFile('2.jpg');
ExtractTemporaryFile('3.jpg');
ExtractTemporaryFile('4.jpg');
isxbb_AddImage(ExpandConstant('{tmp}')+'\2.jpg',BACKGROUND or TIMER);
isxbb_AddImage(ExpandConstant('{tmp}')+'\3.jpg',BACKGROUND or TIMER);
isxbb_AddImage(ExpandConstant('{tmp}')+'\4.jpg',BACKGROUND or TIMER);
isxbb_Init(StrToInt(ExpandConstant('{hwnd}')));
//Таймер показа изображений в скундах (3?)
isxbb_StartTimer(3,BACKGROUND)
  end
//не зациклено.
  else if CurStep=ssPostInstall then
    isxbb_KillTimer(BACKGROUND);
end;

но мне на строчке
function isxbb_AddImage(Image: PChar; Flags: Cardinal): Integer;
Выдает такую ошибку
http://s14.radikal.ru/i187/1005/bd/4de13a06d6e2.jpg

Как ее исправить?

[alex2010]

но мне на строчке function isxbb_AddImage(Image: PChar; Flags: Cardinal): Integer; Выдает такую ошибку »

по пробуй написать PAnsiChar вместо PChar

[cleric1985_n]

Возможно ли как нибудь, не используя секцию [code] реализовать выбор при деинсталяции на удаление/не удаление определенной папки, как это возможно в NSIS?

[Habetdin]

cleric1985_n,

Код:

[UninstallDelete]
Name: {commonappdata}\My Program; Type: filesandordirs