[mash]

Эх, Serega, я подумал об этом и читал инструкцию. Вписал скрипт точь в точь как на сайте, вложив Office2007.cjstyles и ISSkin.dll в так сказать {app}. Ну не проходит скин с этой версией. Я не спец конечно по Inno, но вроде бы все что я делаю мне понятно, но не получается хоть тресни, не думаю что со скинами не тестилась версия 5.3.7 unocode. Целый день сижу и так и сяк кручу, не получается, досадно, ужас.
Может еще надо вписывать в какую то секцию, я вписал как на сайте, только в две секции [Files] и [code].
В секции [code] сейчас у меня вот так:
[code]

Код:

// Importing LoadSkin API from ISSkin.DLL
procedure LoadSkin(lpszPath: String; lpszIniFileName: String);
external 'LoadSkin@files:isskin.dll stdcall';

// Importing UnloadSkin API from ISSkin.DLL
procedure UnloadSkin();
external 'UnloadSkin@files:isskin.dll stdcall';

// Importing ShowWindow Windows API from User32.DLL
function ShowWindow(hWnd: Integer; uType: Integer): Integer;
external 'ShowWindow@user32.dll stdcall';
function InitializeSetup(): Boolean;
begin
  ExtractTemporaryFile('Office2007.cjstyles');
  LoadSkin(ExpandConstant('{tmp}\Office2007.cjstyles'), 'NormalBlack.ini');
  Result := True;
end;
procedure DeinitializeSetup();
begin
  // Hide Window before unloading skin so user does not get
  // a glimpse of an unskinned window before it is closed.
  ShowWindow(StrToInt(ExpandConstant('{wizardhwnd}')), 0);
  UnloadSkin();
end;