这个获取当前用户名(WIND2000)函数,直接放在程序中可以执行,但放到DLL文件中就不行了,(INVAILD POINTER OPERTION)不知道为什么? function GetUserName():String; var lpBuffer: array[0..MAX_PATH] of char; dwSize: DWORD; begin dwSize:= MAX_PATH; if not Windows.GetUserName(lpBuffer, dwSize) then raise Exception.Create(SysErrorMessage(GetLastError())); Result:= StrPas(lpBuffer); end;
----------------------------------------------
-