[MogilShik2007]

2 SatHan, Johny777:

Системе все хватает, временная папка изменена на C:\Temp, но не думаю, что это должно сильно влиять, так как установка со скинами происходит без проблем. А скрипт конечно объединял со своим.

[MogilShik2007]

2 Johny777, вот со всеми приблудами)))

[MogilShik2007]

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

[SatHan]

MogilShik2007, всё верно. После установки вываливаются несколько сотен окошек.
только ты не указал конкретно.
Я же тебя русским языком спрашивал

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

пишешь что

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

либо

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

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

[MogilShik2007]

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

[SatHan]

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

я ещё новичёк в скриптах.
Смотри, если это

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

Код:

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;

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

[MogilShik2007]

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

[SatHan]

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

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

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

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

[Johny777]

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;

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

как винду переставил так и стоит всё
не менял и даже не знаю как

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

Посоны!
мой вопрос касательно загрузки всего ini файла в переменную с последующим считыванием из этой самой переменной всё ещё более чем в силе!
http://forum.oszone.net/post-1984015-858.html
прошу дать мне простой пример с которого смогу оттолкнуться

[SatHan]

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

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

Для 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 Лично меня и по умолчанию устраивает .