Текущий архив: 2009.05.17;
Скачать: CL | DM;
Вниз
Определение координат ячейки Найти похожие ветки
← →
Demo_nik © (2008-09-09 17:15) [0]
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
var
RowHeight: Integer;
begin
if gdFocused in State then
begin
RowHeight := Rect.Bottom - Rect.Top;
Row := (Rect.Top div RowHeight)- 0;
Col := Field.Index;
Edit2.Text:=IntToStr(Row);
Edit3.Text:=IntToStr(Col);
end;
end;
Работает все нормально, глюк в том что номер стрки показывает только текущей страницы, по типу работы скролера мыши. Как с это устранить?
← →
Германн © (2008-09-09 17:18) [1]
> глюк в том что номер стрки показывает только текущей страницы
А кроме т.н. "текущей страницы" и нет больше ничего. Глюк в твоем понимании DBGrid.
Страницы: 1 вся ветка
Текущий архив: 2009.05.17;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.011 c
