Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
accessing user name
#1
Users are demanding that the user name entered during log in be used for intraweb app. They say i should use LDAP so they do not have to reenter user name and password. Do i use WebApplication.Request.mAuthUser?
Reply
#2
Code:
function GetUsername: string;
var
  NetUserName: PChar;
  Size: DWORD;
begin
  Result := '';
  Size := 50;
  NetUserName := StrAlloc(Size);
  try
    if GetUserNamew(NetUserName, Size) then
      Result := NetUserName;
  finally
    StrDispose(NetUserName);
  end;
end;
Do you mean something like this?
Reply
#3
(05-20-2020, 02:17 PM)newuser Wrote:
Code:
function GetUsername: string;
var
  NetUserName: PChar;
  Size: DWORD;
begin
  Result := '';
  Size := 50;
  NetUserName := StrAlloc(Size);
  try
    if GetUserNamew(NetUserName, Size) then
      Result := NetUserName;
  finally
    StrDispose(NetUserName);
  end;
end;
Do you mean something like this?

yes, thanks
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)