Delphi 将ADOQuery的结果获取到组合框

Delphi 将ADOQuery的结果获取到组合框,delphi,Delphi,我有一个数据库,想在组合框中填入零件号,其中TYPE=RKE 但是当我运行这段代码时,它会给出错误 参数xxx没有默认值 procedure TFMain.ComboTypeClick(Sender: TObject); var Qry:TADOQuery; begin Qry:=TADOQuery.Create(self); try Qry.Connection:=PronetConnection; //pronet is adoconnection

我有一个数据库,想在组合框中填入零件号,其中TYPE=RKE 但是当我运行这段代码时,它会给出错误

参数xxx没有默认值

    procedure TFMain.ComboTypeClick(Sender: TObject);
var
  Qry:TADOQuery;
begin
    Qry:=TADOQuery.Create(self);
  try
    Qry.Connection:=PronetConnection;  //pronet is adoconnection
    Qry.SQL.Clear;
    Qry.SQL.Add('Select PartNumber FROM PNet WHERE Type = RKE');
    Qry.Open;
    with Qry do
    begin
      First;
      ComboType.Items.Clear;
      while not eof do
      begin
        ComboNumber.Items.Add(FieldByName('PartNumber').AsString);
        Next;
      end;
    end;
  finally
    Qry.Active:=False;
    Qry.Free;
  end;
end;

我认为错误在sql脚本中

Qry.SQL.Add('Select PartNumber FROM PNet WHERE Type = '+QuotedStr('RKE'));

消息的字面意思是“参数xxx”?在哪一行代码中,您会得到错误?如果字段
Type
是一个字符串,您必须引用RKE值。另外请注意,您会将获得的记录添加到ComboNumber项中,但看起来您希望将其添加到ComboType项中。Type是一个在RKE周围添加“”的字符串。。回答后我会同意的。。参数[xxx]其中xxx是RKE或我做过的任何事情。