将列表框的一行与DB表的一行关联起来

Question

如何将列表框的一行与DB表的一行关联?

我创建了一个firemonkey移动应用程序。在窗体上，我拖出一个列表框。列表框由数据库中的项填充。

    zQuery1.Close;
    ZQuery1.Open;
    ListBox1.Items.Clear;
      While not ZQuery1.Eof do
      Begin
      ListBox1.Items.Add(ZQuery1.Fields[1].AsString);
      ZQuery1.Next;
    end;
    ZQuery1.Close;

显示一个人的名字。

现在，当我双击那个人的名字时，我想打开第二个表单，其中包含那个人的详细信息(在记录中可用)。有人能帮我一下吗?

我想在iPad上创建一个应用程序，当有人点击列表框中的详细信息按钮时，这个人的更多信息

Answer 1

不使用listbox.items。添加时，需要使用listbox.items.addobject。对于下面的代码，我假设表的主键将在zquery1.fields[0]中返回。

zQuery1.Close;
ZQuery1.Open;
ListBox1.Items.Clear;
While not ZQuery1.Eof do
 Begin
  ListBox1.Items.AddObject (ZQuery1.Fields[1].AsString, 
                  tobject (zquery1.fields[0].asinteger)
  ZQuery1.Next;
 end;
ZQuery1.Close;

为了访问存储的id，你可以这样写

avariable:= longint (listbox1.Items.Objects[listbox1.itemindex]);