怎么样记录历史操作？？急用。。。

Question

我希望程序能记录历史操作，比如谁登录了，做了什么操作，我都能查得到，期限在一周内的，一周以上的自动替代，怎么做呀，思路是什么呀，代码怎么写呀？？？举个例子先，多谢？？

Answer 1

其实就是做个日制文件，你的数据库是ACCESS的话，可以用TXT来代替，如果是其它大型数据库，可以用一个单独的日制数据库。

Answer 2

我给你一段   BCB  存入  ini的 文件和从   INI  读取的程序  你看看   AnsiString AppCfg=ChangeFileExt(Application->ExeName,".ini"); 
  TStringList *ss=new TStringList();    ss->LoadFromFile(AppCfg);
    Caption=ss->Values["MainFormCaption"];
    Top=ss->Values["MainFormTop"].ToIntDef(0);
    Left=ss->Values["MainFormLeft"].ToIntDef(0);
    Width=ss->Values["MainFormWidth"].ToIntDef(Screen->WorkAreaWidth);
    Height=ss->Values["MainFormHeight"].ToIntDef(Screen->WorkAreaHeight);
  }  delete ss; ss=NULL;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
  //保存配置
  AnsiString AppCfg=ChangeFileExt(Application->ExeName,".ini");
  TStringList *ss=new TStringList();
 
    ss->Add("MainFormCaption="+Caption);
    ss->Add("MainFormTop="+AnsiString(Top));
    ss->Add("MainFormLeft="+AnsiString(Left));
    ss->Add("MainFormWidth="+AnsiString(Width));
    ss->Add("MainFormHeight="+AnsiString(Height));
    ss->SaveToFile(AppCfg);