Разъясните пожалуйста ситуацию, можно ли заскинировать через ISSkin.dll всю область "Выбора языка установки"
http://forum.oszone.net/attachment.p...1&d=1362698177 . Вот код который я стыбзил с кринкелса
Код:
[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application
DefaultGroupName=My Application
UninstallDisplayIcon={app}\MyProg.exe
SolidCompression=yes
Compression=lzma/ultra
OutputDir=.
[Files]
Source: ISSkin.dll; DestDir: {app}; Flags: dontcopy
Source: Skin.cjstyles; DestDir: {tmp}; Flags: dontcopy
[Icons]
Name: {group}\my application; Filename: {app}\MyProg.exe
[Code ]
procedure LoadSkin(lpszPath: String; lpszIniFileName: String); external 'LoadSkin@files:ISSkin.dll stdcall';
procedure UnloadSkin(); external 'UnloadSkin@files:ISSkin.dll stdcall';,
function CallWindowProc(lpPrevWndFunc: Longint; hWnd: HWND; Msg: UINT; wParam, lParam: Longint): Longint;
external 'CallWindowProc@user32.dll stdcall delayload';
function SetWindowLong(hWnd: HWND; nIndex: Integer; dwNewLong: Longint): Longint;
external 'SetWindowLong@user32.dll stdcall delayload';
function InitializeLanguageDialog(): Boolean;
begin
ExtractTemporaryFile('Skin.cjstyles');
LoadSkin(ExpandConstant('{tmp}\Skin.cjstyles'), '');
Result := True;
end;
procedure DeinitializeSetup();
begin
UnloadSkin();
end;
Спасибо.