"Bob Darlington" wrote in message
news:5520888b$0$64303$c3e8da3$b280...@news.astraweb.com...
>Using the Inno wizard, if I install all the files I need for my application
>and add AccessRuntime_x86_en-us.exe (Access 2013) in the Additional Files
>panel, I presume that I need to manually edit the script to tell it to
>check to see if the runtime is needed and if necessary, run it.
>That is where I get stuck. Can you help me out or point me to a tutorial
>covering it?
>Bob Darlington
There nothing much on the internet specific to Access. However Inno allows
one to grab or check for registrery values.
So the REAL question is how to check if Access is installed.
This function will work:
Function Has2010() : Boolean;
Var
strRes : string;
begin
if RegQueryStringValue(HKEY_LOCAL_MACHINE,
'SOFTWARE\Microsoft\Office\14.0\Access\InstallRoot\', 'path', strRes) then
result := True
else
result := False;
end;
So the above is a function that returns true or false if the 2010 access in
insalled (full or runtime).
And often I used this code:
[Code]
function InitializeSetup(): Boolean;
var
strRes: string;
begin
result := False
if RegQueryStringValue(HKEY_LOCAL_MACHINE,
'SOFTWARE\Microsoft\Office\14.0\Access\InstallRoot\', 'path', strRes) then
result := True;
// ;HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\11.0\Access\InstallRoot
if Result = False then
MsgBox('Rides support Files MUST be installed BEFORE' #13#13 'Installing
this Program. - setup will stop', mbInformation, MB_OK);
end;
Of course in above, I checking for 2003 runtime, and give the user a message
to install the runtime. As stated, since runtime is about 175 megs in size,
then your install file becomes rather large.