김순종 께서 말씀하시기를...

> TreeView에서 마우스를 움직이면 help message가 나오는데

> 없애는 방법좀 알려주세요...



안녕하세요 김영대입니다

제 홈페이지에 올렸던 내용인데 참고해 보세요



// TreeView의 특정 node가 전체 TreeView의 크기축소로 인하여

// 전부 나타나지 않을때 TreeView 는 자동으로 가려진 node를 hint 로 표시합니다

// 아래는 자동으로 나타나는 hint를 방지하는 소스입니다



unit Unit1;



interface



uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

ComCtrls, StdCtrls;



type

TForm1 = class(TForm)

Button1: TButton;

TreeView1: TTreeView;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;



var

Form1: TForm1;



implementation

{$R *.DFM}



procedure TForm1.Button1Click(Sender: TObject);

begin

SetWindowLong(TreeView1.Handle, GWL_STYLE,

GetWindowLong(TreeView1.Handle,GWL_STYLE) or $80);

end;



end.