procedure TForm1.dbgrd1CellClick(Column: TColumn); begin if (Column.Title.Caption = 'Name') then begin if (dbgrd1.SelectedField.Text = 'test') then begin //你的处理代码 ShowMessage('test'); end; if (dbgrd1.selectedField.text = 'test2') then begin end; end; end; 就这么简单的
begin
if (Column.Title.Caption = 'Name') then
begin
if (dbgrd1.SelectedField.Text = 'test') then
begin
//你的处理代码
ShowMessage('test');
end;
if (dbgrd1.selectedField.text = 'test2') then
begin end;
end;
end;
就这么简单的