Текущий архив: 2002.03.07;
Скачать: CL | DM;

Вниз

Вопрос по OnDrawCell   Найти похожие ветки 

← →
ded_di   (2002-02-18 12:47) [0]

Уважаемые мастера, вопрос наверно ламерский, но все же...
Как в обработчике OnDrawCell заставить отработать стандартный обработчик, но для другого размера ячейки?

---

← →
Анонимщик ©   (2002-02-18 13:22) [1]

Страндартный обработчик вызывается через
DBGrid1->DefaultDrawDataCell(Rect, Field, State);

---

← →
ded_di   (2002-02-19 17:48) [2]

Все бы хорошо, но это у TDBGrid, а мне надо TStringGrid. Прошу прощения за некорректность вопроса.

---

← →
Набережных С.   (2002-02-19 18:21) [3]

Попробуй так:

type
T1 = class(TStringGrid);

procedure ...OnDrawCell(...
const B:boolean = true;
begin
if not B then Exit;
if (ACol = 1)and(ARow = 1)then
begin
B:=false;
T1(Sender).DefaultDrawing:=true;
T1(Sender).DrawCell(...
T1(Sender).DefaultDrawing:=false;
end;
B:=true;
end;

---

← →
ded_di   (2002-02-19 18:30) [4]

Спасибо, но завтра. Рабочий день кончился

---

Страницы: 1 вся ветка

Текущий архив: 2002.03.07;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.007 c