Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DbGrib, background


Чапаев ©   (2006-07-24 13:58:00) 

Как с наименьшими трудозатратами нарисовать некий фон у TDbGrid? В идеале -- зарисовать некоторый фон для всего компонента, поверх него текст и/или картинки в ячейках сетки. В принципе, ячейки можно рисовать из обработчика OnDrawColumnCell, но как заполнить ту часть грида, в которой нет ячеек?

Пытался подменять оконную процедуру. При обработке WM_ERASEBKGND мой фон при показе формы мелькает, но тут же зарисовывается. При обработке WM_PAINT придётся ВСЁ рисовать самому, что не очень радует...


Чапаев   (2006-07-27 12:40:00) [1]

Отправлял на то мыло, что у тебя в анкете.


PSPF2003   (2006-07-27 12:15:00) [2]

Пока еще не пришел :(
Но все равно, спасибо.


Чапаев   (2006-07-27 12:04:00) [3]

Отправил. Вчерась доделал-таки background так, что можно использовать и иконки, и метафайлы.


PSPF2003   (2006-07-26 17:48:00) [4]

И мне если не сложно.


Чапаев   (2006-07-26 17:47:00) [5]

Окей. Пока криво -- фон объявлен как TGraphic, но принимает только битмапы и JPEG. Иконки не принимает, метафайлы -- не проверял. ;-)


Игорь Шевченко   (2006-07-26 17:41:00) [6]


> Если кому надо, могу отправить завтра.


Отправь. Адрес мой у тебя есть. Заранее благодарен.


Чапаев   (2006-07-26 13:03:00) [7]

В общем, пришлось создать наследника TDbGrid: вырвать здоровенские куски из TCustowGrid.Paint и TCustomDbGrid.DrawCell, пару строчек добавить, пару строчек закомментировать... Если кому надо, могу отправить завтра.


Игорь Шевченко   (2006-07-24 17:11:00) [8]


> Как с наименьшими трудозатратами нарисовать некий фон у
> TDbGrid?


А собственно, никак, на мой взгляд. Процедура живет в Grids.pas, TCustomGrid.Paint, там без прозрачности рисуется.


Наверх

Титульная страница Поиск, карта сайта Написать письмо