Usuario locales

[jfontane]

Hola a todos, lo que les queria preguntar es como puedo hacer en delphi para que mi aplicacion me de el usuario actual de la maquina, es decir que si estoy logueado como administrador, obtener el valor 'administrador' o si estoy logueado como pepe que me de 'pepe'.
Salu2 y gracias

[sanxpue]

haber si te funciona esto compañero :

Function RegresaUsuario : String;
Var
  UsuarioX : Array[0..50] of Char;
  D : LongWord;
Begin	
    D := 50; //el tamaño de tu array
    FillChar(UsuarioX,SizeOf(UsuarioX),#0);
    GetUserName(UsuarioX,D);
End;

Saludos desde Puebla Pue...
asanxt@hotmail.com

[sanxpue]

Perdon la D

la D debe ser un LongWord
y antes de llamar al GetUserName

le asignas el tamaño de tu arreglo
en el caso anterioe es
D := 50


jejejeje
saludos

[Voutarks]

La respuesta está en http://www.q3.nu/trucomania/truco.cgi?138&esp que es practicamente lo mismo que se ha posteado antes