Главная страница
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.013 c
14-37347
herosofnn
2002-12-24 14:32
2003.01.13
IP


1-37048
Brat-2
2003-01-02 15:47
2003.01.13
Поиск подстроки в строке


3-36929
Viginal
2002-12-17 15:16
2003.01.13
Помогите!!!


1-37044
Joisy
2003-01-02 08:35
2003.01.13
Иконка 16x16


1-37085
Mozart
2003-01-03 13:47
2003.01.13
Как распознать TCP/IP