Можно попробовать что-то типа этого
Код:
//***** Всплывающая подсказка для столбца *****
procedure TfMain.grMainDBBandedTableView1Column6GetCellHint(
Sender: TcxCustomGridTableItem; ARecord: TcxCustomGridRecord;
ACellViewInfo: TcxGridTableDataCellViewInfo; const AMousePos: TPoint;
var AHintText: TCaption; var AIsHintMultiLine: Boolean;
var AHintTextRect: TRect);
begin
if (ACellViewInfo.Value <> Null) then
begin
AHintTextRect.Left := ACellViewInfo.Bounds.Left;
AHintTextRect.Right := ACellViewInfo.Bounds.Left + 500;
AHintTextRect.Top := ACellViewInfo.Bounds.Top;
AHintTextRect.Bottom := ACellViewInfo.Bounds.Top + 500;
AHintText := ACellViewInfo.Value;
end;
end;
Но подсказка будет для каждой записи в столбце и для заголовка
Ошибка вышла. Подсказка только для записей.