如果在DBGRID的标题点击事件里面写东西

Question

各位朋友，小弟想在DBGRID的标题点击事件里面写东西，代码如下
if DBGridEh2.SelectedField.FieldName='orginal' then
ShowMessage('列1被单击！');
问题：只有当定位到orginal这一列，然后点击该标题，才能跳出自己设定的提示信息，有没有办法，即使鼠标没有定位到这一列，在任何时候，点击该列的标题也能跳出该提示框呢？诚心请各位朋友赐教，谢谢！！！

Answer 1

procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin                             
  if column.FieldName = 'orginal' then showmessage('列1被单击！');  //注意列名的大小字母
end;