Я пишу почти тоже самое, тока ниче не получается:
var
I: Integer;
begin
Form1.ReqOpen(Sender); //открываем Table1
Form1.Table1.First;
for I := 0 to Form1.Table1.RecordCount-1 do
begin
ComboBox1.Items.Add(Form1.Table1.FieldByName('Name ').AsString);
Form1.Table1.Next;
end;
Form1.Table1.Close;
end;
что неправильно?
|