blob: 2312474b0b43023b9f9b6f585e9bc6e546d58e9c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
; Installer script for wxWebKit for wxPython
[Setup]
AppName=wxWebKit
AppId=wxWebKit
AppVersion=<<VERSION>>
AppVerName=wxWebKit <<VERSION>>
AppCopyright=LGPL
DefaultDirName={code:GetInstallDir|c:\DoNotInstallHere}
AppPublisher=wxWebKit Project
AppPublisherURL=http://wxwebkit.wxcommunity.com/pmwiki/
AppSupportURL=http://wxwebkit.wxcommunity.com/pmwiki/
AppUpdatesURL=http://wxwebkit.wxcommunity.com/pmwiki/
UninstallDisplayName=wxWebKit <<VERSION>>
UninstallFilesDir={app}\Uninstall
Compression=bzip/9
SourceDir=<<ROOTDIR>>
OutputDir=win-installer
OutputBaseFilename=wxWebKit-wx<<WXVERSION>>-Py<<PYTHONVER>>-<<VERSION>>
DisableStartupPrompt=yes
AllowNoIcons=yes
DisableProgramGroupPage=yes
DisableReadyPage=yes
[Files]
<<FILES>>
[Messages]
WelcomeLabel1=Welcome to the wxWebKit for wxPython Setup Wizard
[Code]
program Setup;
var
PythonDir : String;
InstallDir : String;
function InitializeSetup(): Boolean;
begin
(* -------------------------------------------------------------- *)
(* Figure out what to use as a default installation dir *)
if not RegQueryStringValue(HKEY_LOCAL_MACHINE,
'Software\Python\PythonCore\<<PYTHONVER>>\InstallPath',
'', PythonDir) then begin
if not RegQueryStringValue(HKEY_CURRENT_USER,
'Software\Python\PythonCore\<<PYTHONVER>>\InstallPath',
'', PythonDir) then begin
MsgBox('No installation of Python <<PYTHONVER>> found in registry.' + #13 +
'Be sure to enter a pathname that places wxPython on the PYTHONPATH',
mbConfirmation, MB_OK);
PythonDir := 'C:\Put a directory on PYTHONPATH here\';
end;
end;
InstallDir := PythonDir + '\Lib\site-packages\wx-<<WXVERSION>>-msw-unicode\wx\';
Result := True;
end;
function GetPythonDir(Default: String): String;
begin
Result := PythonDir;
end;
function GetInstallDir(Default: String): String;
begin
Result := InstallDir;
end;
begin
end.
|
