Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.13;
Скачать: CL | DM;

Вниз

TDBGridEh   Найти похожие ветки 

 
Vick ©   (2002-12-17 11:59) [0]

В хелпе пишут что нельзя одно временно в DBGridEh выводить и caption и image в надписях колонок, может можно как-то обмануть это дело??? Заранее спасибо за ответ :))))


 
Andriano ©   (2002-12-17 12:02) [1]

Естественно.
1. Нарисуй в картинке любой текст.
Но я бы этого не делал.

2. OnDrawColumnCell (DefaultDrawColumnCell - очень! полезный метод)


 
Vick ©   (2002-12-17 12:16) [2]

А чего в OnDrawColumnCell писать то?


 
Andriano ©   (2002-12-17 12:57) [3]

Свой код разумеется.

if gdFixed in State then begin
if Column.FieldName="FIELD1" then begin
ImageList1.Draw...
DBGridEh.DefaultDrawColumnCell...
end;
....
end;


 
Vick ©   (2002-12-17 13:13) [4]

if gdFixed in State then не работает, он его упорно игнорирует, тобиш, это выражение всегда false, может я чего-то не так делаю?


 
Andriano ©   (2002-12-17 13:50) [5]

gdFixed - это фиксированные ячейки. Они у тебя есть? Может они русуются редко.


 
Vick ©   (2002-12-17 14:01) [6]

Ну я так понимаю, что фиксированными являются Title, но в этом гриде они не типа "ячейки", а типа TColumnTitleEh, по всей видимости на них это не распространяется :((((((


 
Andriano ©   (2002-12-17 15:52) [7]

Ты прав. Заголовки под gdFixed не проходят.


 
Vick ©   (2002-12-17 16:15) [8]

Я права :))))), но я все равно придумала :))))

procedure TForm1.DBGridEh1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumnEh;
State: TGridDrawState);
var
RectTitle: TRect;
begin
if Column.Tag = 1 then begin
RectTitle := DBGridEh1.CellRect(Column.index+1, 0);
ImageList1.Draw(DBGridEh1.Canvas, RectTitle.Right-30, RectTitle.Top+ 5, 1);
end;
DBGridEh1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;


возможны вариации на тему Column.Tag... Просто эти заголовки лежат как раз на 0-й строке обычного СтринГрида, из этого и пляшем...


 
Andriano ©   (2002-12-17 16:24) [9]

Я так понял ты разрисовываешь Rect не для своего события.
А за тем и свой.
Но лишние перерисовки заголовок. А так наверное ничё.


 
Vick ©   (2002-12-17 16:32) [10]

ну а другого события не предложили :(((( исходников нету, чтобы тудом дописать..



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

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

Наверх




Память: 0.48 MB
Время: 0.048 c
14-37353
Miwa
2002-12-24 15:41
2003.01.13
Контроль печати


6-37241
V_Pavel
2002-11-01 12:27
2003.01.13
Передача данных при помощи сокетов.


4-37464
Алёшка1900
2002-11-25 22:02
2003.01.13
Работа с заголовком формы


1-37199
Abajun
2002-12-30 15:29
2003.01.13
отключение сообщений


3-36915
Slava_V
2002-12-17 15:53
2003.01.13
Помоготе с отчетом ...