delphi中的dbgrid数据操作

来源:百度知道 编辑:UC知道 时间:2024/06/09 04:55:34
我们delphi中,PageControl1里有两个页面,分别是TabSheet1和TabSheet2,在TabSheet1里有个dbgrid,dbgrid中显示了与数据库连接的某表里的数据,,我想双击TabSheet1里的dbgrid中的单元格后界面就可以跳到TabSheet2,比如TabSheet1里的dbgrid中的有个单元格的数据是“代扣”,我想双击“代扣”就可以跳到TabSheet2界面中。请问,这程序代码如何书写,请高手指点,最好有详细的代码,本人初学者,谢谢
我想要的是有指定的,比如说有两个单元格数据,一个是代扣一个是奖金,点击代扣才会发生跳转,点击奖金就不会
还有,数据不单单只有一行,所以以列来判断不成立的,要单元格数据判断吧,只是我不知道怎么写代码,还有2楼,你说跟没说一样,

找dbgrid的代扣单元格的双击事件,在里面写PageControl1.ActivePageIndex = 1.
假设dbgrid1.columns[0]是“代扣”那一列,你给代扣这一列写双击事件,利用派生类重载DblClick过程,使通过派生类创建的双击事件,
给你个参考吧
http://365708921.qzone.qq.com/infocenter?ADUIN=365708921&ADSESSION=1247979036&ADTAG=CLIENT.QQ.1881_QQUrlReportBlankZone.0

在DBGRID的双击事件中,判断当前字段值是否为“代扣”,是则跳到……,不是则不进行任何操作

procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
if DBGrid1.SelectedField.FieldName = 'FILE_ID' then //假设FILE_ID为代扣字段名
PageControl1.ActivePage := TabSheet2;
end;