急用，做毕业设计！拜托了

[tangle168]

怎么在一个paradox库中查询一个指定的字段又要在窗体中显示出来！比如用memo显示
并包含下查询出的多条记录！（符合条件的多条记录）同样，怎么删除一个指定的记录呢？还有就是怎么将两个表单（图书信息表和用户信息表）联系起来，沙瓤人知道该图书在图书馆还是被人借出，并要确定是谁借了这本书！并要在窗体中的一个控件中显示出来！比如ListView中显示！

[li_zhifu]

用query，
query1.Active:=False;
query1.sql.clear;
query1.sql.add('Select field1 from a where 条件');//field1为要查的字段名
query1.active:=True;
while not query1.eof do
begin
memo1.lines.add(query1.fields[0].asstring);
query1.next;
end;
同理，删除
query1.active:=false;
query1.sql.clear;
query1.sql.add('delete * from a where 条件');
query1.execsql;

[ww_xiaohua]

先用session来得到你的表的各个字段，然后用query来写sql语句，将查询的结果显示在memo中就可以了。
使用的控件：combobox1:tcombobox,listbox1:Tlistbox,session1:Tsession;

procedure Tform1.formcreat(sender:Tobject);
begin
session1.getaliasname(combobox1.items); //得到数据库别名
combobox1.text:=combobox1.items.string[0];
end;

procedure Tform1.combobox1click(sender:Tobject);
begin
str:=combobox1.items.string[combobox1.itemindex];//得到相应表的名字
session1.gettablenames(str,’’,true,true,listbox1.items);
end;

procedure Tform1.button1click(sender:Tobject);
begin
session1.getfieldnames(combobox1.text,listbox1.items.string[listbox1.itemindex],listbox2.items);
end;
这样在listbox2种得到的就是表的字段，然后再用query来查询就好了。

[ww_xiaohua]

和楼上的结合。呵呵。。。