Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Рисунок в Title [D6]

dimis © (2003-02-28 09:43:00)
Использую DBGridEh
Он позволяет поместть в Title колонки рисунок или текст
а мне необходимо и то и другое
как сделать?

dimis (2003-02-28 11:15:00) [1]
>>Johnmen © (28.02.03 11:04)
не решился этого делать :)

Johnmen (2003-02-28 11:04:00) [2]
Есть еще вариант решения, но не очень красивый и связанный с подправлением исходников...

sniknik (2003-02-28 10:58:00) [3]
сори не учел (надо было кусочек побольше скопировать)
AcsDescImages: TImageList;
у меня там картинки хранятся.

dimis (2003-02-28 10:54:00) [4]
Спасибо sniknik
я тоже пришел к тому, что придется писать наследника,а так не хотелось :(
а что за процедура AcsDescImages.Draw?
>> Sergey13
не будем развивать флейм
если вопрос не относится к данному форуму, модератор его удалит

sniknik (2003-02-28 10:36:00) [5]
рисунок (делается при сортировке по полю), правда использую стандартный грид.
type TMyDBGrid = class(TDBGrid) procedure DrawCell(ACol, ARow: Longint; ARect: TRect; AState: TGridDrawState); override; ........ procedure TMyDBGrid.DrawCell(ACol, ARow: Longint; ARect: TRect; AState: TGridDrawState); ....... inherited DrawCell(ACol, ARow, ARect, AState); if (gdFixed in AState) and (ACol = SortedField) and (ARect.Left < ARect.Right-10) then begin if SortedOrder = 0 then AcsDescImages.Draw(Canvas, ARect.Right-10, ARect.Top+6, 0, True) else AcsDescImages.Draw(Canvas, ARect.Right-10, ARect.Top+6, 1, True); end; end;

Sergey13 (2003-02-28 10:30:00) [6]
2dimis (28.02.03 10:02)
>я всегда думал, что по вопросам взаимодействия Delphi(Cbulder) и БД
Вот именно. А ты занимаешься вопросом взаимодействия твоей программы и пользователя. Это называется пользовательский интерфейс. К БД он не имеет никакого отношения.
Впочем, не мое это дело. Что хочешь то и делай. Тебе за это деньги платят (надеюсь).
Просто у меня тоже был такой период. Когда только начал заниматься делфой после клиппера и обалдел от всяких возможных красивостей. Потом понимаешь, что КАК выглядит прога - не главное (хот и не последнее). Главное - как работает. Должна правильно и эфективно , и уж потом по желанию красиво.
Не обижайся.
Кстати по твоему вопросу. У тебя (или клиентов) винда не 9х случайно? В этом случае с таким "украшательским" подходом легко получить нехватку GDI ресурсов на машине(лузут ошибки, что мол канвас не может риовать и прочие виолайшены). Именно DBGridEh кушает их - только давай, особенно (я заметил) когда именно с титлами балуешься.

dimis (2003-02-28 10:02:00) [7]
Sergey13
не иронизируй
нужен именно рисунок!!! кина пользователь пока не требует

> Очень актуальный вопрос, особенно в контексте работы именно
> с БД.

из этой фразы вытекает, что форум только по вопросам "как составить SQL?"
я всегда думал, что по вопросам взаимодействия Delphi(Cbulder) и БД

Sergey13 (2003-02-28 09:57:00) [8]
2dimis (28.02.03 09:43)
>Рисунок в Title
Очень актуальный вопрос, особенно в контексте работы именно с БД. 8-)
А кино тебе не хочется в титл запихать? Кульно получилось бы.

dimis (2003-02-28 09:56:00) [9]
я так и понял
а что за событие?
DrawColumnCell видимо
но как понять что отрисовывается именно Title

Johnmen (2003-02-28 09:47:00) [10]
Текст - как обычно, рисунок - отрисовывать на Canvas"е в событии отрисовки Title...

Наверх

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