唉！编译器说我的程序类型不兼容！！！！！！！！！

Question

我写了这段程序，将某字段读入comboBox,用D7编译，调用时说类型不兼容！可是我以前在D6用它好好的。
procedure ComboBoxTable(cb: TCustomComboBox ; tb: TDataSet ; nfield: Integer);
begin
   cb.Clear();
   if (not tb.Active) then
      tb.Open();
   tb.First();
   while(not tb.Eof) do
      begin
      cb.Items.Add(tb.Fields.Fields[nfield].AsString);
      tb.Next();
      end;//   tb.Close();
end;

Answer 1

cb.Items.Add(tb.fieldbyname('field').AsString);

Answer 2

调用语句是
   ComboBoxTable(ComboBox1, ADOills, 1);
[Error] newcust.pas(89): Incompatible types: 'TCustomComboBox' and 'TComboBox'

Answer 3

定义改成：
procedure ComboBoxTable(cb: TComboBox ; tb: TDataSet ; nfield: Integer);