Форум: "Основная";
Поиск по всему сайту: 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.018 c
3-19073           чайничек              2002-02-07 17:27  2002.03.07  
Может быть кто-нибудь знает как построена правовая система


1-19246           Lord Vader            2002-02-20 09:58  2002.03.07  
СРАВНЕНИЕ СТРОК


1-19231           _User_                2002-02-19 14:46  2002.03.07  
Как ограничить изменение ширины формы < 150пикс?


4-19381           Valeron               2002-01-10 05:43  2002.03.07  
Перехват значений


3-19083           MZ                    2002-02-07 17:46  2002.03.07  
Как программно получить список псевдонимов баз данных???