Subversion Repositories spacemission

Rev

Rev 93 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 93 Rev 94
Line 59... Line 59...
59 
Name: "{autodesktop}\SpaceMission Level Editor"; Filename: "{app}\LevEdit.exe"; MinVersion: 4,4; Tasks: desktopicon
 59 
Name: "{autodesktop}\SpaceMission Level Editor"; Filename: "{app}\LevEdit.exe"; MinVersion: 4,4; Tasks: desktopicon
60 
 
 60 
 
61 
[Run]
 61 
[Run]
62 
Filename: "{app}\SpaceMission.exe"; Description: "SpaceMission starten"; Flags: nowait postinstall skipifsilent
 62 
Filename: "{app}\SpaceMission.exe"; Description: "SpaceMission starten"; Flags: nowait postinstall skipifsilent
63 
 
 63 
 
64 
[Registry]
 - 
 
65 
; We need this because of a tricky problem...
 - 
 
66 
; Our base language is German (DE), and we have a translation for English USA (ENU)
 - 
 
67 
; If the system locale is not exactly ENU (even ENG is not accepted), then the base language DE will be used.
 - 
 
68 
; But much more people are speaking English than German. So we need to force the system to use ENU instead of DE.
 - 
 
69 
; This decision if we choose DE or ENU is done by the language selected during setup.
 - 
 
70 
Root: HKA; Subkey: "Software\Embarcadero\Locales"; ValueType: string; ValueName: "{app}\SpaceMission.exe"; ValueData: "ENU"; Languages: en
 - 
 
71 
Root: HKA; Subkey: "Software\Embarcadero\Locales"; ValueType: string; ValueName: "{app}\SpaceMission.exe"; ValueData: "DE"; Languages: de
 - 
 
72 
Root: HKA; Subkey: "Software\Embarcadero\Locales"; ValueType: string; ValueName: "{app}\LevEdit.exe"; ValueData: "ENU"; Languages: en
 - 
 
73 
Root: HKA; Subkey: "Software\Embarcadero\Locales"; ValueType: string; ValueName: "{app}\LevEdit.exe"; ValueData: "DE"; Languages: de
 - 
 
74 
 
 - 
 
75 
[Code]
 64 
[Code]
76 
function InitializeSetup(): Boolean;
 65 
function InitializeSetup(): Boolean;
77 
begin
 66 
begin
78 
  if CheckForMutexes('SpaceMission11Setup')=false then
 67 
  if CheckForMutexes('SpaceMission11Setup')=false then
79 
  begin
 68 
  begin