Delphi DBGrid双击事件、单元格操作

1、得到当前格子中的内容:
DBGrid1.Fields[DBGrid1.SelectedIndex].DisplayText;
把DBGrid1.SelectedIndex改为你所希望引用的字段就可以了,如第3个字段。

DBGrid1.Fields[3].DisplayText;

2、双击单元格触发不同事件

procedure TMainFrm.DBGrid1DblClick(sender:TObject);

begin

if dbgrid1.fields[dbgrid1.selectedIndex].FiledName='GNO' then begin // dbgrid1.selectedIndex ---选中单元格列

//响应事件

end;

if dbgrid1.fields[dbgrid1.selectedIndex].FiledName='PSNNAME' then begin

//响应事件
end;

if dbgrid1.fields[dbgrid1.selectedIndex].FiledName='RCSJ' then begin

//响应事件

end;

end;

猜你喜欢

转载自www.cnblogs.com/jijm123/p/10129319.html
今日推荐