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