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

[spice]

Посмотрите на скрин который прикрепил.

1. Как переместить слова или как цвет шрифта поменять?

напишите код

Вложения

Вложение Снимок.PNG больше недоступно

[Mailchik]

spice,

Код:

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

НазваниеЛейбла.Left := ScaleX(10);
НазваниеЛейбла.Font.Color := clLime;

[spice]

А можно по подробнее я не понимаю че за название Лейбла?

куда их пихать?

[spice]

MogilShik2007, всё верно. После установки вываливаются несколько сотен окошек.

только ты не указал конкретно.

Я же тебя русским языком спрашивал


Цитата SatHan:



Ты чистый использовал код, из архива?

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

пишешь что


Цитата MogilShik2007:



Удаление работает со скином, но при установке игры, после нажатия на кнопку Готово. вылетают окошки (несколько сотен):

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

либо


Цитата MogilShik2007:



так как установка со скинами происходит без проблем.

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

.

Там по ходу дело в совместимости скриптов. Что-то где-то не так наковырял в скрипте вот тебе и выдаёт сотни окошек.

[Johny777]

SatHan, посмотри скрипт если не трудно, пост 907, мож мысля какая появится)))

[Ivan_009]

Цитата MogilShik2007:



посмотри скрипт если не трудно, пост 907

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

я ещё новичёк в скриптах.

Смотри, если это

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

Код:

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

procedure InitializeWizard();
var
//Определяем поле ввода пароля
PasswordEdit: TPasswordEdit;
begin
  Mylbl:= tLabel.Create(WizardForm);
  MyLbl.AutoSize:= False;
  MyLbl.WordWrap:= true;
  MyLbl.SetBounds(0, 0, 301, 73);
  MyLbl.Parent:= WizardForm.WelcomeLabel2;
  WizardForm.DirEdit.OnChange:= @EditOnChange;
  WizardForm.DirEdit.Text:= WizardForm.DirEdit.Text+#0;
  ProgressLabel:=TLabel.Create(WizardForm)
    ProgressLabel.Top:= 4
    ProgressLabel.Left:= 200
    ProgressLabel.Caption:= '0%'
    ProgressLabel.AutoSize:= True
    ProgressLabel.Font.Color:= clBlue
    ProgressLabel.Font.Style:= [fsBold]
    ProgressLabel.Transparent:= True
    ProgressLabel.Parent:= WizardForm.ProgressGauge
  WizardForm.PasswordEdit.Text := '        ';
  ExtractTemporaryFile('MicrosoftClassic15.bmp');
  bmp := TBitmap.create;
  bmp.LoadFromFile(ExpandConstant('{tmp}\MicrosoftClassic15.bmp'));
    enablefire(WizardForm.WelcomePage.Handle, 0, 0, bmp.Handle, 50);
end;

За-комментировать то ошибок не выдаёт, скорее всего чего то не хватает только не знаю чего, мож гуру подскажут.

[Ivan_009]

Как сделать так чтобы кнопка была без надписи....

[Snoopak96]

MogilShik2007, Закомментировал я для теста.


Цитата MogilShik2007:



Эм, в смысле закомментировать? А то я тож несилен в скриптах)))

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

Нет, нужно разобрать что к чему.



Найти конфликт и решить его.

[spice]

MogilShik2007,

ошибки не вылавливаю но в коде у тебя ошибка

нет выгрузки библиотеки отвечающей за анимацию огня

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

Код:

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

procedure DeinitializeSetup; /// процедура деинициализации - выполняется при отмене и поле завершения работы(задачи) инсталла
begin
  disablefire(); /// выключаем анимацию огня 
  bmp.Free; /// разрушаем картинку на которой был огонь 
  WizardForm.Hide;
  Sleep(227);
  UnloadSkin();
end;

будь внимательнее тк пример огня не настолько большой чтоб что-то забыть!

пример:

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

Код:

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

[Setup]
AppName=Inno FireCtrl
AppVerName=Inno FireCtrl
DefaultDirName={pf}\Inno FireCtrl
DefaultGroupName=Inno FireCtrl
OutputDir=.
[Files]
Source: firectrl.dll; Flags: dontcopy
Source: White.bmp; Flags: dontcopy
[  code]
function enablefire(ParentWnd: HWND; Left, Top: integer; Bmp: HBITMAP;FireAlpha: integer): BOOL; external 'enablefire@files:firectrl.dll stdcall';
function disablefire(): BOOL; external 'disablefire@files:firectrl.dll stdcall';
var
  bmp: TBitmap;
procedure InitializeWizard();
begin
  ExtractTemporaryFile('White.bmp');
  bmp := TBitmap.create;
  bmp.LoadFromFile(ExpandConstant('{tmp}\White.bmp'));
  enablefire(WizardForm.WelcomePage.Handle, 0, 0, bmp.Handle, 500);
end;
procedure DeinitializeSetup();
begin
  disablefire();
  bmp.Free;
end;

Цитата MogilShik2007:



А временная папка у тебя по умолчанию?

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

как винду переставил так и стоит всё

не менял и даже не знаю как



====================================================================================



Посоны!

мой вопрос касательно загрузки всего ini файла в переменную с последующим считыванием из этой самой переменной всё ещё более чем в силе!

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

прошу дать мне простой пример с которого смогу оттолкнуться

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

Цитата Johny777:



даже не знаю как

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

Да всё просто (Если интересно конечно)

Для WXP

Сначала создаём папку Temp, например на диске C:\

Мой компьютер - Свойства переходим во вкладку Дополнительно

Внизу щелкаем по кнопке Переменные среды

В окошке Переменные среды пользователя XXX (Где XXX ваше имя пользователя)

находим переменные TEMP и TMP в обоих случаях меняем значение %USERPROFILE%\Local Settings\Temp например на %SYSTEMDRIVE%\Temp.

Проверяем Win+R вводим %TEMP% жмём ок

Для W7 (Аналогично)

Создаём папку Temp, например на диске C:\

Мой компьютер - Свойства - Дополнительные параметры системы

Появится Свойства системы во вкладке Дополнительно находим кнопку Переменные среды

В окошке Переменные среды пользователя XXX (Где XXX ваше имя пользователя)

находим переменные TEMP и TMP в обоих случаях меняем значение %USERPROFILE%\AppData\Local\Temp например на %SYSTEMDRIVE%\Temp.

Проверяем Win+R вводим %TEMP% жмём ок




P.S Лично меня и по умолчанию устраивает .