Hallo
du könntest via TRegistry unter HKEY_USERS über die erste Unterebene iterieren und den "Logon User Name" vergleichen ...
Delphi-Quellcode:
HKEY_USERS\S-1-5-...A...\Software\Microsoft\Windows\CurrentVersion\Explorer\Logon User Name
HKEY_USERS\S-1-5-...B...\Software\Microsoft\Windows\CurrentVersion\Explorer\Logon User Name
HKEY_USERS\S-1-5-...C...\Software\Microsoft\Windows\CurrentVersion\Explorer\Logon User Name