본문 바로가기
삽질/Delphi

[Delphi] StringGrid - Mouse move Cell hint

by 푸딩s 2012. 1. 11.


procedure TFm_Test.AdvStringGridMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var
  ACol, ARow: Integer;
begin

  AdvStringGrid.ShowHint := False;
  AdvStringGrid.MouseToCell(X, Y, ACol, ARow);

  if (ACol < 2) or (ARow < 1) then 
    Exit; // fix and checkbox

  AdvStringGrid.ShowHint := True;
  AdvStringGrid.Hint := AdvStringGrid.Cells[ACol, ARow];

end;

 

'삽질 > Delphi' 카테고리의 다른 글

[Delphi] 작업표시줄 위치 찾기  (0) 2013.07.22
[Delphi] IdFTP 한글 인코딩 오류  (0) 2013.04.05
[Delphi] 문자열의 너비 구하기  (0) 2012.01.11
[Delphi] Socket Error  (1) 2011.08.31
[Delphi] 델파이 예외 처리 클래스  (0) 2011.08.03

댓글