很多浏览文件的软件都有最近浏览和最多浏览的文件记录, 请问这个记录多次浏览文件的怎么实现呢?主要是文件特别多!只想保留访问最多的前30条记录?怎么实现呢?

解决方案 »

  1.   

    记录到文件即可,比如ini文件,下次读出来就是了,ini中的记录可以读取到列表,你操作列表就行了
      

  2.   

    软件大多是记在注册表里,跟楼上说的道理是一样的。
    大概就是用个TStringList程序开始里从注册表或ini里读取历史记录,供程序中快捷打开使用。
    程序中打开文件后
        在list里查找是否有该文件,如有则删之再加之;如没有则直接加之;如果list的count>30则删除第0行(新近的顶出最老的)
        将list中的数据写入注册表或ini
      

  3.   

    楼主是星期天都在用功的好筒子啊。
    按楼上说的,用本地文件记录一下就OK了。
    下面是读写Ini文件的代码,希望有用。
    function ReadIni(PathName:string;ParName: string; KeyName: string ):string;
    var
      MyIni: TIniFile;
    begin
      MyIni := TIniFile.Create(PathName);//调用的文件名
      try
        Result :=MyIni.ReadString(ParName, KeyName, '');//取得字符  
      finally
        MyIni.Free;
      end;   
    end;procedure WriteIni(PathName:string;ParName: string; KeyName: string; KeyValue: string );
    var
      MyIni: TIniFile;
    begin
      MyIni := TIniFile.Create(PathName);//调用的文件名
      try
        MyIni.WriteString(ParName, KeyName, KeyValue);//取得字符
      finally
        MyIni.Free;
      end;  
    end;
      

  4.   

    没做过,应该是放在INI中的吧.