我用ListBox显示一个主从表的从表内容,我在OnSHow中循环写入从表的记录,但如何让该ListBox的内容随着主表的记录的变化而相应变化为从表的记录内容呢.....
该在那个事件中写代码呢...

解决方案 »

  1.   

    我先在Onshow写入
    listbox1.items.clear;
    while not qItem.eof do
    begin
     listbox1.items.add(qItem.FieldByName('name').asstring)
     qItem.next;
    end;
    可以在窗口一找开,就显示内容
    可我在主表的afterscroll事件中,写入
    listbox1.items.clear;
    while not qItem.eof do
    begin
     listbox1.items.add(qItem.FieldByName('name').asstring)
     qItem.next;
    end;
    这段语句后,窗口一打开ListBox不能马上显示内容,要浏览下主表的记录ListBox才能看到内容
      

  2.   

    onshow去掉窗体创建时qitem.last;
    qitem.first;就可以了!