Admin-Rechte prüfen

[sakura]

Oder einfach so:

Delphi-Quellcode:

uses
  System.Security.Principal, System.Threading;

procedure TWinForm3.Button1_Click(sender: System.Object; e: System.EventArgs);
begin
  AppDomain.CurrentDomain.SetPrincipalPolicy(PrincipalPolicy.WindowsPrincipal);
  WP := WindowsPrincipal(Thread.CurrentPrincipal);
  if WP.IsInRole(WindowsBuiltInRole.Administrator) then
    MessageBox.Show('Du bist Admin')
  else
    MessageBox.Show('Du bist kein Admin');
end;

......