我把数据select 出来显示在dbgrideh中。
比如有10行记录;我现在想选择其中某一行记录,然后有个'确认'按钮, 在‘确认’click之后 只显示 该条记录。
问题是: 如何选出单行记录,事件在 ‘确认’click中。
比如有10行记录;我现在想选择其中某一行记录,然后有个'确认'按钮, 在‘确认’click之后 只显示 该条记录。
问题是: 如何选出单行记录,事件在 ‘确认’click中。
解决方案 »
- 对record中case疑惑
- 如何得到listview中各个item中的colunmn的值
- 如果将ADOTable中的记录用Memo组件逐条显示?
- 谁知道delphi8.0 的下载地址,请告之
- 如何使用Treeview控件
- 请问各位大哥,多层应用程序的服务器端制作安装程序的时候要加上那些动态库?
- 我想学DELPHI
- 关于 在 formstyle:=fsmdichild 时隐藏出现的问题。急,急,小难
- 难到你们没有将软件打过包吗!!封装BDE和ADO就没人做过吗,居然没人给我上问解答!!
- 整数/100000变成REAL , 怎么弄?
- delphi可以开发ERP吗
- Delphi 字符串转为字节数组
1.在CellClick事件中寫,先取出當前行的某一個字段值(最好是關鍵字),將取出值賦值給一個string變量aa;
2.當點擊button的click時,select這10條數據時在加條件:where 關鍵字='''+ trim(aa)+'''即可.
procedure TRes_HrCq_YD_F.cxGrid2DBTableView1CellClick(
Sender: TcxCustomGridTableView;
ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
AShift: TShiftState; var AHandled: Boolean);
var
_DelNowDate:TDateTime;
begin
inherited;
qry_BaseTemp.Close;
qry_BaseTemp.SQL.Text:=' SELECT CONVERT(NVARCHAR(20),GETDATE(),111) AS TD ';
qry_BaseTemp.Open;
_DelNowDate:=qry_BaseTemp.FieldByName('TD').AsDateTime;
if (qry_ydcx.FieldByName('SXRQ').AsDateTime <=_DelNowDate ) then
begin
btnSB_Del.Enabled:=False;
end else
btnSB_Del.Enabled:=True;
end;