2 Страдалецъ :
За код - огромное спасибо! Правда, проблемы он не решил - экран по-прежнему мерцает и работать можно только с верхней частью таблицы, отображающейся на экране...
Пошла следующим путем:
Код:
procedure TfmChild1.DBGrid1CellClick(Column: TColumn);
begin
if Column.FieldName='Info' then
Hint:=DBGrid1.DataSource.DataSet.FieldByName('info').AsString;
if Column.FieldName='Prim' then
Hint:=DBGrid1.DataSource.DataSet.FieldByName('prim').AsString;
end;
Работает четко, НО при условии, что в DBGride в Options dgRowSelect стоит False. В противном случае, индекс колонки всегда будет 0, заголовок=заголовку 0-й колонки и подсказки, естественно, не будут выводиться... А dgRowSelect должно стоять в true... Не подскажете, как решить проблемку?