Форум: "Основная";
Поиск по всему сайту: 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.71 MB
Время: 0.036 c
1-19188           Egor111               2002-02-18 17:04  2002.03.07  
Преобразование типов данных


4-19370           YY                    2002-01-02 15:03  2002.03.07  
Громкость звука


3-19092           Mishka                2002-02-08 21:33  2002.03.07  
Delphi+MS SQL


1-19160           Georg                 2002-02-21 11:58  2002.03.07  
Шифровки Юстаса (Алексу)


14-19308          SGrigory              2002-01-20 22:12  2002.03.07  
about QReports