Entwickler-Ecke

Windows API - Läuft mein Programm auf dem Systemkonto?


FriFra - Mo 24.06.02 14:43
Titel: Läuft mein Programm auf dem Systemkonto?
Wie finde ich heraus, ob mein Programm gerade auf dem Systemkonto läuft?


FriFra - Do 27.06.02 08:53

Ich habes es jetzt selbst herausgefunden...


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
function OnSystemAccount(): boolean; 
var 
sName:     string; 
dwNameLen: DWORD; 
begin 
  dwNameLen := 253; 
  SetLength(sName, 254); 
  GetUserName(PChar(sName), dwNameLen); 
  SetLength(sName, dwNameLen); 
  if UpperCase(Trim(sName))='SYSTEM' then Result:=True else Result:=FALSE; 
end;