그냥 폼위에서는.. procedure TForm1.FormCreate(Sender: TObject); begin Application.OnShowHint := DoOnShowHint; end; 이렇게 하면 힌트가 발생했을때를 알수 있는데... 트레이아이콘 위에서 힌트가 나오는 시점을 파악할수가 없군요....
김순호
•
2000.02.03 17:37
이현신 wrote:
> 그냥 폼위에서는..
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
...
> 그냥 폼위에서는..
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Application.OnShowHint := DoOnShowHint;
> end;
>
> 이렇게 하면 힌트가 발생했을때를 알수 있는데...
>
> 트레이아이콘 위에서 힌트가 나오는 시점을 파악할수가 없군요.
>
> 어떻게 하면 트레이에서 힌트가 나오는 시점을 알수가 있을까요????
>
RX콘드롤중 TAppEvents의 Event를 활요하면 됩니다.
procedure TForm1.AppEvents1ShowHint(var HintStr: String;
var CanShow: Boolean; var HintInfo: THintInfo);
begin
caption:= hintstr;
end;