procedure TF_main.suitempBitBtn6Click(Sender: TObject);
begin
if datamodule1.ADOQ_xs_cx .Eof then exit;
datamodule1.ADOQ_xs .Filtered:=false;
datamodule1.ADOQ_xs .Filter:='[学号] = '+QuotedStr(datamodule1.ADOQ_xs_cx .FieldByName('学号').AsString);
datamodule1.adoq_xs .Filtered:=true;
datamodule1.ADOQ_xs .open;
PageControl1.ActivePage := xjlr;
end;
错误提示:
adoq_xs:missing sql property
不知是怎么回事??
begin
if datamodule1.ADOQ_xs_cx .Eof then exit;
datamodule1.ADOQ_xs .Filtered:=false;
datamodule1.ADOQ_xs .Filter:='[学号] = '+QuotedStr(datamodule1.ADOQ_xs_cx .FieldByName('学号').AsString);
datamodule1.adoq_xs .Filtered:=true;
datamodule1.ADOQ_xs .open;
PageControl1.ActivePage := xjlr;
end;
错误提示:
adoq_xs:missing sql property
不知是怎么回事??
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货