encontrei na net esse codigo(abaixo) para garantir que aplicacoes
delphi 7 ou anterior rodem corretamente no vista com a nova UAC, sua
funcao eh garantir que uma aplicacao que precise de privilegios de
usuario administrador sempre seja pedida a senha do mesmo.
se algume puder testar isso e mandar para a lista se funciona pois
to sem tempo($$$) para comprar vista.
-----------------------------------------------
Here's an administrator.manifest for Vista
<?xml version="1.0" encoding="utf-8"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1"
manifestVersion="1.0">
<trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">
<security>
<requestedPrivileges>
<requestedExecutionLevel level="requireAdministrator" />
</requestedPrivileges>
</security>
</trustInfo>
</assembly>
Save this as VistaTheme.manifest and everything in the same
directory as your project. Then add a file named "VistaTheme.rc"
containing a single line:
1 24 "VistaTheme.manifest"
Use the delphi resource compiler to build the file administrator.res:
brcc32 VistaTheme.rc
Now, do a small pascal unit such as VistaTheme.pas and save it as
such
//****************
unit VistaTheme;
{
Based on XPTheme.pas v1.0 (2001-12-26) by Jordan Russell,
www.jrsoftware.org
}
interface
implementation
{$R VistaTheme.res}
uses
CommCtrl;
initialization
{ This call is necessary; some apps won't start without it. }
InitCommonControls;
end.
Lastly in your project file, just below Uses add VistaTheme. at the
very top, as the very first entry.
Should look like:
Program YourAppName
uses
VistaTheme,
Forms,
... and other units
Then build your project.
You can also eliminate the pas file (but this one wokrs for XP, it
just ignores the AsInvoker or AsAdministrator) you can add instead
of the VistaTheme.pas in the USes, add
{$R VistaTheme.res' 'VistaTheme.rc'}
This will rebuild that file if you cahneg the manifest.
Lastly, Vista will still ask you iof this action is OK and if you do
not have admin priveledges, then it still won't work. Vista forces
security on us now.
Hope this helped.
John
