Random hint rect when displaying cell's hint (using CellHints property and OnGetCellHint event handler)

Well that's my mistake: I did'nt realize that my PREVIEW Grid Cell has an OnGetCellHint event handler set. That event handler was set to workaround a previous bug in a previous dx build (6.40 OptionsBehavior.CellHints malfunction: Q35943 - Cell hints aren't displayed for multi-line cells)
It's seem to be a conflict between the OnGetCellHint event handler and OptionsBehavior.CellHints := True.
Anyway it seems to be a bug (IMO) because PREVIEW cell (limited to 1 line max) does not show a correct cell hint (compared to standard cell or OnGetCellHint) when OptionsBehavior.CellHints is set to True: the Hint Rect is smaller and text is organized on several lines instead of one (Text is one line and does not contain CR/LF chars)
Best regards and have a nice president.

Hi Walid,
Thank you for the sample project. It was very helpful.
Our developers will research this issue and try to find the cause of the problem. Just give us some time.
Thanks,
Dimitros

Hi Walid,
This behavior is by design. The standard hint is shown only when the mouse cursor is hovering directly over the text. In the sample project, it will be shown in multiple lines. However, if the mouse cursor is hovering over the cell, but not directly over the text, it's impossible to determine whether the hint should be shown in multiple lines. The AIsHintMultiLine variable is False in this situation. I.e. to solve your problem, you should simply assign the True value to the AIsHintMultiLine variable within the OnGetCellHint event handler:

Delphi
procedure TForm1.cxGrid1TableView1Column3GetCellHint(  
  Sender: TcxCustomGridTableItem; ARecord: TcxCustomGridRecord;  
  ACellViewInfo: TcxGridTableDataCellViewInfo; const AMousePos: TPoint;  
  var AHintText: TCaption; var AIsHintMultiLine: Boolean;  
  var AHintTextRect: TRect);  
begin  
  AHintText := VarToStr(ARecord.Values[Sender.Index]);  
  AIsHintMultiLine := True;  
end;  

Alternatively, you can simply check whether the event is called for the text area:

Delphi
procedure TForm1.cxGrid1TableView1Column3GetCellHint(  
  Sender: TcxCustomGridTableItem; ARecord: TcxCustomGridRecord;  
  ACellViewInfo: TcxGridTableDataCellViewInfo; const AMousePos: TPoint;  
  var AHintText: TCaption; var AIsHintMultiLine: Boolean;  
  var AHintTextRect: TRect);  
begin  
  if AHintText <> '' then  
    AHintText := VarToStr(ARecord.Values[Sender.Index]);  
end;  

I hope this information will help you solve the problem.
Thanks,
Dimitros