View Single Post
  #3  
Old 28-06-2012, 20:06
Good Man Good Man is offline
Registered User
 
Join Date: Oct 2011
Location: usa
Posts: 24
Thanks: 2
Thanked 0 Times in 0 Posts
Good Man is on a distinguished road
Quote:
Originally Posted by quake4 View Post
Edit: Setup.ini and change
MyExecutableName=satinav.exe
work good but the shortcut in the desktop not working

where i can edit iti cant find it i just find this can you fix it

thk damr15

Quote:
function GetAppName(Default:String):String;
begin
Result:=GetIniString('InstallOptions', 'ApplicationName', '', ExpandConstant('{tmp}\' + SetupInfoLoc))
end;

function GetAppPublisher(Default:String):String;
begin
Result:=GetIniString('InstallOptions', 'Publisher', '', ExpandConstant('{tmp}\' + SetupInfoLoc))
end;

function GetMyAppExeName(Default:String):String;
begin
Result:=GetIniString('InstallOptions', 'MyExecutableName', '', ExpandConstant('{tmp}\' + SetupInfoLoc))
end;

function GetMyAppExeName2(Default:String):String;
begin
Result:=GetIniString('InstallOptions', 'MyExecutableName2', '', ExpandConstant('{tmp}\' + SetupInfoLoc))
end;

function MyExecutableIconName2(Default:String):String;
begin
Result:=GetIniString('InstallOptions', 'MyExecutableIconName2', '', ExpandConstant('{tmp}\' + SetupInfoLoc))
end;

function GetMyAppExePath(Default:String):String;
begin
Result:=GetIniString('InstallOptions', 'MyExecutablePath', '', ExpandConstant('{tmp}\' + SetupInfoLoc))
end;

function GetMyAppExePath2(Default:String):String;
begin
Result:=GetIniString('InstallOptions', 'MyExecutablePath2', '', ExpandConstant('{tmp}\' + SetupInfoLoc))
end;

function SecondExecCheck1: Boolean;
begin
if (MyExecutableIconName2('') = '') or (UpperCase(MyExecutableIconName2('')) = 'CONFIG') then
REsult := False
else
Result := True;
end;
Reply With Quote