Delphi 将ADOQuery的结果获取到组合框
我有一个数据库,想在组合框中填入零件号,其中TYPE=RKE 但是当我运行这段代码时,它会给出错误 参数xxx没有默认值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
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或我做过的任何事情。