GetUserNameEx

[ste_ett]

Zwei "Fehler" sind drin.

#1
Size := MAX_COMPUTERNAME_LENGTH + 1; MAX_COMPUTERNAME_LENGTH ist definiert mit 15.
Benutzernamen können länger sein.
Size muss die Länge deines Char-Arrays ohne #0 sein.
Bei deinem Beispiel 1024.

#2
Result := GetLastError; Den Rückgabewert solltest du von dem true/false von GetUserNameExA abhänig machen, da es mir auch schon passiert ist, dass die Funktion erfolgreich war, GetLasError aber trotzdem <> 0 war.

-edit-

Das Phänomen mit der langen Antwortzeit habe ich bei mir auch, ich denke mal, dass das Problem hierbei bei Domänen-controller liegt.