Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Вниз

Вопрос по 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]

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




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.043 c
3-19104           tovSuhov              2002-02-11 11:40  2002.03.07  
Набор команд SQL


1-19198           cher_gvf              2002-02-18 18:13  2002.03.07  
Можно ли..?


4-19393           bohdan_k              2002-01-07 21:06  2002.03.07  
Как загрузить файл со своим зарегестрированным заранее расширением в свою программу по щелчке на нём


1-19204           macinsoft             2002-02-18 09:27  2002.03.07  
Есть StringGrid, есть PopUpMenu на странице ...


14-19344          vopros                2002-01-24 14:30  2002.03.07  
Пришел счет на межгород..