有关函数的问题。

Question

我现在要编写一个函数，说明如下：我用ADOConnection和ADOQuery连接InterBase数据库，其中有一个表，表名是DT_CDATAPRO，字段分别是：meterno，processdate，houseno，agodate，agodisp，nowdate，nowdisp，subfare，isprocess，sharefare，addvalue。要实现的功能是：我在一个编辑框内输入一个房间号（houseno）的值，当调用这个函数的时候会返回整个的一条记录。我是菜鸟，不知道这个函数该如何定义？请帮忙！另外，该如何编写程序？请帮忙！谢谢！！！  

Answer 1

select 字段 form 表 where houseno=edit1.text
赋值给一个数组
数组内是你要的字段

Answer 2

如果房间号是字符串型:
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from tblstaff where houseno='''+trim(edit1.text)+'''');
adoquery1.open;
如果房间号是数值型
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from tblstaff where houseno='+trim(edit1.text));
adoquery1.open;