procedure TForm1.DBGrid1CellClick(Column: TColumn); begin if column.FieldName ='per_cdcode' then //per_cdcode为字段 application.MessageBox('per_cdcode','系统提示',MB_OK); if column.FieldName ='per_dpt' then //per_dpt为字段 application.MessageBox('per_dpt','系统提示',MB_OK); end;
----------------------------------------------
*-------------------------------\ | 渴求知识,也渴望您的帮助! \ | 愿结识当今天下爱好DELPHI之朋友!\ |__________________________________\______^_^