this slowpoke moves

Programm als Administrator ausführen


Dieser Schritt ist etwas aufwendiger, doch wenn ihr alles richtig macht, wird euer Programm immer mit administrativen Rechten auf jedem Windows-Konto ausgeführt, auch wenn dieser eingeschränkt ist.



Schritt 1:
Erstellt ein neues Projekt und speichert es.

Schritt 2:
Kopiert die "brcc32.exe" aus dem ..\Borland\Delphi7\Bin\.. Ordner in euren Projektordner.
Falls ihr eine andere Version benutzt, müsst ihr die Datei per Hand suchen.

Schritt 3:
Erstellt per Hand in eurem Projekt Ordner folgende Dateien.

"admin.manifest"
"admin.rc"

Diese werden zum Kompilieren benötigt.

Schritt 4:
Nun kopiert ihr folgenden Code in die  "admin.manifest" Datei und speichert es.

<assembly manifestversion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1"> <assemblyidentity name="MyAppAssemblyNameHere" processorarchitecture="*" type="win32" version="1.0.0.0"> <description>My App Description</description> <!--uncomment this to enable ComCtl v6 Visual Styles... <dependency> <dependentAssembly> <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" language="*"/> </dependentAssembly> </dependency>--> <trustinfo xmlns="urn:schemas-microsoft-com:asm.v2"> <security> <requestedprivileges> <requestedexecutionlevel level="requireAdministrator" uiaccess="false"> </requestedexecutionlevel></requestedprivileges> </security> </trustinfo> </assemblyidentity></assembly> Schritt 5:
Nun kopiert ihr diese Codezeile in die  "admin.rc" Datei und speichert es.


1 24 "admin.manifest"


Schritt 6:
Jetzt müsst ihr die  "admin.rc" Datei per Drag&Drop auf die  "brcc32.exe" Datei ziehen damit eine "admin.res" Datei erzeugt wird.

Schritt 7:
Als Letztes müsst ihr nur noch diese Zeile unter den "implementation" in eure Unit mit einbauen.


{$R 'admin.res'}


Wenn ihr alles richtig gemacht habt, wird euer Programm ab jetzt immer mit Admin$ Rechten ausführen.





Keine Kommentare:

Kommentar veröffentlichen

Beliebte Posts

Translate