---

Hejsa.

Nogen der kender til en metode til at få oplyst af windows hvilken bruger
der er logget ind? (skal virke i både 98, 2000 og xp);

M.v.h.
Peter

---

On Wed, 22 Sep 2004 12:01:49 +0200, "Peter Petersen" <the.1@get2net.dk>
wrote:

>Hejsa.
>
>Nogen der kender til en metode til at få oplyst af windows hvilken bruger
>der er logget ind? (skal virke i både 98, 2000 og xp);
>
>M.v.h.
>Peter
>

Prøv den her:

function UserName : String;
var
Size : DWord;
Name : PChar;
begin
Name := StrAlloc(256);
Size := 255;
if GetUsername(Name,Size) then
Result := String(Name)
else
Result := '';
StrDispose(Name);
end;

fra http://www.howtodothings.com/showarticle.asp?article=125

Lars