Hi, I would like to use THtmlHint in my application, that uses custom procedure called in Application.OnShowHint action.
The code is following:
procedure TfrmMain.FormCreate(Sender: TObject);
begin
Application.OnShowHint:= hintShow;
end;
procedure TfrmMain.hintShow(var HintStr: String; var CanShow: Boolean; var HintInfo: THintInfo);
var R, C: Integer;
begin
//checking at wchich component the cursor points, changing the content of "HintStr" etc.
end;
The reason for this is the need to show different hint message for each row in stringgrids. If I use it with THtmlHint, there is only a big black area displayed in the upper left corner of the screen, instead of the actual hint message.
How do I achieve the desired result (show different hint message for each row in stringgrids) with THtmlHint?
Thank you.