要在窗体运行时,自动填充里面两个DBCOMBOBOX代码如下:
while not DM.AQ_dls.Eof do
begin
DBComboBox1.AddItem(DM.AQ_dls.FieldValues['dlsbh'],sender);
DBComboBox2.AddItem(DM.AQ_dls.FieldValues['dlsmc'],sender);
DM.AQ_dls.MoveBy(1);
end;
while not DM.AQ_splb.Eof do
begin
DBComboBox3.AddItem(DM.AQ_splb.FieldValues['lbmc'],sender);
DBComboBox4.AddItem(DM.AQ_splb.FieldValues['lbbh'],sender);
DM.AQ_splb.MoveBy(1);
end;可是出现有时候打开程序不能自动填充的情况,有没更好的填充方法,,谢谢各位大大了

解决方案 »

  1.   

    我一般都在界面设置,帮定DataSource,那样比较方便
      

  2.   

    我的意思是有两个表,DBCOMBOBOX帮定了其中一个表,现在想在开始打开页面的时候把另一个表的记录填充到DBCOMBOBOX中,具体代码应该怎么写,,谢谢了
      

  3.   

    试试在show事件中加入此代码看看,再看看是不是每次运行的时候 DM.AQ_dls,DM.AQ_splb都是打开状态,还有,在工程里设置DM窗口为第一加载窗体。