Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c