在主窗口中有一个combobox,我想在程序开始时自动把数据库中的某些内容写到combobox中的item去,但是不知道在哪里写,试过在project中的Application.Run;之后写,不过好象不行的,请指教。
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.Run;
write_item; //写入到item的过程,不过好象不能在这里写
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.Run;
write_item; //写入到item的过程,不过好象不能在这里写
begin
ADOQuery1.SQL.text:='select field1 from mytable';
ADOQuery1.open;
while not ADOQuery1.eof do
begin
combobox1.items.add(ADOQuery1.fieldvalues['field1']);
ADOQuery1.next;
end;
end;