Hej Bart!
Mandag 01. September 1997 kl.08:13 skrev Gary Weinfurther til Bart Broersma:
Almost the way
 GW> function UserName : string;
 GW> var
 GW>     Buffer : array[0..1024] of char;
 GW>     Size   : DWORD;
 GW> begin
Size := SizeOf(Buffer);   <-- Need this line to tell the API
                              the size of the bufer
 GW>     if GetUserName(Buffer, @Size) then
 GW>         Result := Buffer;
 GW>     else
 GW>         Result := ''
 GW> end;
Ken
... Welcome to President Bush, Mrs. Bush, and my fellow astronauts.
--- GoldED/386 3.00.Alpha4+
---------------