Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- [Files]
- Source: "c:Folder00ISSkin.dll"; DestDir: {tmp}; Flags: dontcopy; Attribs: hidden system
- [Code]
- procedure LoadSkin(lpszPath: String; lpszIniFileName: String); external 'LoadSkin@c:Folder00ISSkin.dll cdecl';
- procedure UnloadSkin();
- external 'UnloadSkin@c:Folder00ISSkin.dll cdecl'
- [Files]
- Source: ISSkin.dll; DestDir: {app}; Flags: dontcopy
- Source: Office2007.cjstyles; DestDir: {tmp}; Flags: dontcopy
- [Code]
- procedure LoadSkin(lpszPath: String; lpszIniFileName: String); external 'LoadSkin@files:isskin.dll stdcall';
- function InitializeSetup(): Boolean;
- begin
- ExtractTemporaryFile('Office2007.cjstyles');
- LoadSkin(ExpandConstant('{tmp}Office2007.cjstyles'), '');
- Result := True;
- end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement