There are a number of possibilities - for instance on Vista the Program1
could be triggering UAC.
Or there could be an error in invoking Shellexecute you are not seeing - try
some code like:
if ShellExecute(Application.Mainform.Handle, 'open', Pchar(aProgName),
PChar(aparaml), PChar(aDir), SW_SHOWNORMAL) <= 32 then
ShowMessage('Shellexecute error:' + aProgName + spc + aparaml + spc +
aDir + #13 + #10 + SysErrorMessage(GetLastError));
And see if it tells you more. I suspect there is an error message you are
not seeing.
John
_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: delphi@delphi.org.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-requ...@delphi.org.nz with Subject:
unsubscribe
