AdvStringGrid 列使用

Question

各位大侠: 我想实现这样的一个功能
AdvStringGrid 光标离开第三列时触发一个过程
光标离开第四列时触发一个过程
请问AdvStringGrid 有没有判断光标离开列的事情或我如何实现这个功能
谢谢

Answer 1

procedure TForm1.AdvStringGrid1ColChanging(Sender: TObject; OldCol,
  NewCol: Integer; var Allow: Boolean);
begin
  if NewCol = 3 then
    Showmessage('c3')
  else if NewCol = 4 then
    ShowMessage('c4');
end;

Answer 2

楼上错了吧，是oldcol
if oldcol=3 then
  showmessage('3');
if oldcol=4 then
  showmessage('4');