Вниз
Скачать: CL | DM;

Рисование в заголовке TDBGrid   Найти похожие ветки 

← →
Vetal ©   (2003-04-16 16:30) [0]

Всем привет!

Хочу рисовать свой заголовок (Title) вместо стандартного в компоненте TDBGrid. Как это можно сделать? События OnDrawColumnCell при перерисовке заголовка не происходит, в отличие от остальных ячеек.
Подскажите пожалуйста. Всем заранее спасибо


← →
sniknik ©   (2003-04-16 17:03) [1]

нужно переопределять
TMyDBGrid = class(TDBGrid)
procedure DrawCell(ACol, ARow: Longint; ARect: TRect; AState: TGridDrawState); override;

....


и рисовать в нем.


← →
Vetal ©   (2003-04-16 18:15) [2]

Спасибо.
Извини, но ламерский вопрос. Что ты подразумеваешь под "переопределять" - создавать новый компонент с базовым классом TDBGrid?


← →
Polevi ©   (2003-04-16 18:31) [3]

override;


← →
Vetal ©   (2003-04-16 18:40) [4]

Подождите! Кто такой TMyDBGrid - это наследник. Я так понимаю, чтобы создать такой класс и поместить его на форму, необходимо создать новый компонент - или как?


← →
Polevi ©   (2003-04-16 18:55) [5]

или создавать динамически

procedure TForm1.FormCreate(Sender: TObject);
begin
with TMyDBGrid.Create(self) do
begin
Parent:=self;
Align:=alClient;
end;
end;


← →
Vetal ©   (2003-04-16 19:19) [6]

Почему я вообще завел этот топик:
Думал в событии на рисование грида сделать следующее: если ячейка фиксированная и нужная мне колонка, то рисовать рисунок на ячейке.
Описание события:
TDrawColumnCellEvent = procedure (Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState) of object;
Где TGridDrawState = set of (gdSelected, gdFocused, gdFixed);
Так вот, дело в том, что ситуация, когда State = gdFixed никогда не происходит. Почему так происходит, и может можно обойтись без наследования?


← →
sniknik ©   (2003-04-16 21:16) [7]

чего ж ты мыло не указываеш? а я уж хотел пример выслать....


← →
Vetal ©   (2003-04-17 12:38) [8]

Указал мыло. Вышли пожалуйста!

Буду очень признателен. Заранее спасибо.



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

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



Память: 0.46 MB
Время: 0.011 c
1-23146
Эльман
2003-04-23 06:16
2003.05.08
Работа с MS Word через COM


3-22965
Imshanya
2003-04-16 16:35
2003.05.08
Вопрос по TDBGrid у


1-23136
R
2003-04-28 03:31
2003.05.08
Непонятная процедура SetBounds


14-23348
Tetragrammaton
2003-04-17 12:58
2003.05.08
Декомпиляция Delphi приложений....


3-22989
Andy Verinov
2003-04-17 00:09
2003.05.08
Вешается BDE от большого числа запросов?




   Наверх