function NetworkID:
string;
var buffer : string; buffSize : DWORD; bRet: boolean; begin buffSize:=128; SetLength(buffer,BuffSize); bRet := GetUserName(PChar(buffer), buffSize); if bRet then result := strpas(PChar(buffer)) else Result := ''; end;
|
- [DUG]: Getting the current user Mark Howard
- Re: [DUG]: Getting the current user Stephen Barker
- Re: [DUG]: Getting the current user Mark Howard
- RE: [DUG]: Getting the current user Stephen Barker
- Re: [DUG]: Getting the current user Mark Howard
- Re: [DUG]: Getting the current user Neven MacEwan
- Re: [DUG]: Getting the current user Mark Howard
- RE: [DUG]: Getting the current user James Sugrue
- Re: [DUG]: Getting the current user Mark Howard
- RE: [DUG]: Getting the current user Stephen Barker
- Re: [DUG]: Getting the current user Mark Howard