请教一个大于如何写(10分)

  • 主题发起人 主题发起人 yedixifeng
  • 开始时间 开始时间
Y

yedixifeng

Unregistered / Unconfirmed
GUEST, unregistred user!
TSXX_Q.Parameters.ParamByName('借出数量').Value:='0';
查询时这语句能通过,查询也正常。但为什么如下语句不行呢?
TSXX_Q.Parameters.ParamByName('借出数量').Value > '0';
 
TSXX_Q.Parameters.ParamByName('借出数量').Value:='0';//参数是用赋值的
查询时这语句能通过,查询也正常。但为什么如下语句不行呢?
 
全部代码如下
procedure TCX_F.FlatButton2Click(Sender: TObject);
begin
ASH_FRBtn.Checked:=True; //借出图书
MHCX_FCB.Checked:=True;
begin
TSXX_Q.Close;
TSXX_Q.SQL.Clear;
TSXX_Q.SQL.Add('Select 图书编号,书名,作者,类名,出版社,定价,借出数量 From 图书信息 A,图书类别 B');
TSXX_Q.SQL.Add('Where (A.借出数量 = :借出数量) and A.类别=B.类别');
TSXX_Q.Parameters.ParamByName('借出数量').Value:='0';

TSJG_DS.DataSet:=TSXX_Q;
TSJG_DG.Columns[0].FieldName:='图书编号';
TSJG_DG.Columns[1].FieldName:='书名';
TSJG_DG.Columns[2].FieldName:='作者';
TSJG_DG.Columns[3].FieldName:='类名';
TSJG_DG.Columns[4].FieldName:='出版社';
TSJG_DG.Columns[5].FieldName:='定价';
TSJG_DG.Columns[6].FieldName:='借出数量';
TSXX_Q.Open;
TS_Lable.Caption:=Format('共 %d 条记录',[TSXX_Q.RecordCount]);
end;
end;
想实现非零时的查询。
 
TSXX_Q.SQL.Add('Where (A.借出数量 = :借出数量) and A.类别=B.类别');
改为:
TSXX_Q.SQL.Add('Where (A.借出数量 > :借出数量) and A.类别=B.类别');
 
多人接受答案了。
 
后退
顶部