怎样获取登陆系统的所有用户名

[fangsp]

GetUserName只能获取当前登陆系统的用户名
但我要获取登陆系统的所有用户名又应该怎么实现呢?
谁有没有比较好的办法,分不够再加.

[fangsp]

期待着人来接分

[fangsp]

难道没有人来回答吗?
问题很难吗??

[7年]

第一个问题可以把登陆过的用户放在一个表里。第2个问题还不知道怎么做。

[zhao_yong]

你都頂了那麼多次了，我也來頂一下!!!

[zhao_yong]

遞歸獲取文件名稱:

function   ShowDirectory(NowPath:string):Boolean;
var
  search:TSearchRec;
  ret:integer;
  key:string;
begin
  if NowPath[Length(NowPath)]<>'\'   then
    NowPath:=NowPath+'\';
  key:=Nowpath+'*.*';
  ret:=findFirst(key,faanyfile,search);
  while ret =0 do
  begin
    if ((search.Attr and fadirectory)=faDirectory)then
    begin
      if(Search.Name<>'.')and(Search.name<>'..')   then
        ShowDirectory(NowPath+Search.name);
    end else
    begin
      if((search.attr and fadirectory)<>fadirectory)then
      begin
        showmessage(NowPath+search.name);
      end;
    end;
  end;
  findClose(search);
  removedir(NowPath);
  result:=True;
end;

[fangsp]

GetUserName只能获取当前登陆系统的用户名
但我要获取登陆操作系统的所有用户名又应该怎么实现呢?
谁有没有比较好的办法,分不够再加.

[fangsp]

自己在顶

[zshsuming]

说下你怎么解决的吧？学习一下

[天行归来]

通过注册表项：HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\DocFolderPaths 看能否解决你的问题。

[fangsp]

用代码怎么实现啊
我对这一块不是很熟悉 望能够说得清楚点
谢谢了

[fangsp]

自己顶一个

[fangsp]

自己已经解决了
顶者有分

[fangsp]

对了 怎么得到某个文件夹下的所有文件名称啊??
比如在D:\MyWork文件夹下 有三个文件
MyProcjects,MyFiles,MyBook
怎样得到这三个文件夹的名字呢??

[fangsp]

自己顶

[fangsp]

自己再顶
怎么没有人来接分呢??

[zshsuming]

晕，我是向你学习来的，怎么还给分呢？真不好意思哦```