DELPHI 中 ComboBox 与 数据库 和 EDIT 连接的问题

来源：百度知道 编辑：UC知道 时间：2024/05/21 11:08:39
我要做个通讯录。有两个ComboBox，8个EDIT
第一个COMBOBOX里输入QQ，编号，地址，电话，电子邮件，生日，姓名
第二个COMBOBOX里显示子项目，然后选择
分别显示在8个EDIT里
比如，选择第一个COMBOBOX里选择姓名，第二个选择再某某。然后EDIT里显示他的全部资料
求写法

所有的ComboBox Edit 全部用数据感知控件DBComboBox,DBEdit,设置其Datasource，即可。

edit要换成dbedit
连接你的数据库,和字段

procedure TForm1.ComboBox1Change(Sender: TObject);
var
options :tlocateoptions;
begin

table1.Locate('qq号',combobox1.Text,options);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
combobox1.Items.Clear;
table1.First;
while not table1.Eof do
begin
combobox1.Items.Add(table1.fieldbyname('qq').AsString);
table1.Next;
end;
end;