TData中的查找字段（Lookup Field)的用法(200分)

目前正在用Delphi 5.0 Enterprise 开发一个图书馆借阅管理系统，涉及两个表，一是Books存放书的信息(其中有字段 catalogid:表示图书类别代码,int型)，另一个是BookCatalog(字段只有两个：id(int),catalog(string))，在DBGrid中可以编辑图书（Books)的信息，问题是在编辑字段catalogid时想利用下拉列表，显示内容是图书类别文字(例如：小说）而不是id（小说对应的id是100，在bookcatalog中定义）,但选中文字后希望填入的是id,如何建立查找字段？

listen

这是最简单的 Lookup Field了。
需要把两个表的字段做成永久性的。然后，双击 tbBooks, 弹出字段编辑器，
其上按右键，选择“New Field",设置新字段如下：
Name=BookCategory
type=string
FieldType=Lookup
KeyFields=catalogid
DataSet=tbBookCatalog
LookupKeys=id
ResultField=catalog

Compoment 和 size 一般不用手工填，会自动生成的。
这样的Lookup字段，在DBGrid中，会自动弹出下拉框，选择的是文字，填入字段的
却是对应的代码。

另：你的问题写的太长，看起来好费劲，最好能换一下行。

用Inforpower吧，即方便又直接

接受答案了.