我对数据库的操作不懂, ADO 关于的资料也看了一点,
没有什么现成的 例子,我的问题就是 ,我怎么做才能把 我的程序和 access 数据库连接在一起,我想往数据库中添加点数据, 怎么添加,怎么修改呢?  希望能有个详细的解说  我做个程序,在程序结束的时候需把一些参数保存下来,下次再启动的时候根据程序上次结束的时候的参数决定启动的状态, 我没想到其他的办法,只想到用数据库来保存数据。 谢谢个位大侠该用哪些控件呢?

解决方案 »

  1.   


    ADOConnection.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=c:\my.mdb';
    ADOConnection.LoginPrompt := False;
      

  2.   

    INI文件操作 
    (1) INI文件的结构: 
    ;这是关于INI文件的注释部分 
    [节点] 
    关键字=值 
    ... 
    INI文件允许有多个节点,每个节点又允许有多个关键字, “=”后面是该关键字的值(类型有三种:字符串、整型数值和布尔值。其中字符串存贮在INI文件中时没有引号,布尔真值用1表示,布尔假值用0表示)。注释以分号“;”开头。 (2) INI文件的操作 
    1、 在Interface的Uses节增加IniFiles; 
    2、 在Var变量定义部分增加一行:inifile:Tinifile;然后,就可以对变量myinifile进行创建、打开、读取、写入等操作了。 
    3、 打开INI文件:inifile:=Tinifile.create('tmp.ini'); 
    4、 读取关键字的值: 
    a:=inifile.Readstring('节点','关键字',缺省值);// string类型 
    b:=inifile.Readinteger('节点','关键字',缺省值);// integer类型 
    c:=inifile.Readbool('节点','关键字',缺省值);// boolean类型 
    其中[缺省值]为该INI文件不存在该关键字时返回的缺省值。 
    5、 写入INI文件: 
    inifile.writestring('节点','关键字',变量或字符串值); 
    inifile.writeinteger('节点','关键字',变量或整型值); 
    inifile.writebool('节点','关键字',变量或True或False); 
    当这个INI文件的节点不存在时,上面的语句还会自动创建该INI文件。 
    6、 删除关键字: 
    inifile.DeleteKey('节点','关键字');//关键字删除 
    inifile.EraseSection('节点');// 节点删除 
    7、 节点操作: 
    inifile.readsection('节点',TStrings变量);//可将指定小节中的所有关键字名读取至一个字符串列表变量中; 
    inifile.readsections(TStrings变量);//可将INI文件中所有小节名读取至一个字符串列表变量中去。 
    inifile.readsectionvalues('节点',TStrings变量);//可将INI文件中指定小节的所有行(包括关键字、=、值)读取至一个字符串列表变量中去。 
    8、 释放:inifile.distory;或inifile.free;
      

  3.   

    设置
    ADOConnection.Open;//打开数据连接ADOQuery.Connection := ADOConnection;
    ADOQuery.SQL.Text := 'select * from 表';
    ADOQuery.Open;//这就打开了数据
    DataSource1的dataset连接ADOQuery,放置DBGrid的DataSource为DataSource1
    数据就会显示在grid中往数据库写数据,可以Insert,还可以直接选中记录,Edit...Post,这些看看帮助或到网上查吧,多得很
      

  4.   

    adoconnectionadodataset 的append,edit,delete
      

  5.   

    去过滤你的结果集
    tadoquery(datasource.DataSet).Filtered:=false;tadoquery(datasource.DataSet).Filter:='ns_code='''+stano+''' ';tadoquery(datasource.DataSet).Filtered:=true;
    ns_code   你需要过滤的字段  stano     你的过滤条件