TToolBar

← →
Vovan # 2 (2007-02-25 00:44) [0]

Всё, меня тошнит от этой гадости. Вообще, кто-нибудь справляется с ней?

← →
DrPass © (2007-02-25 01:35) [1]

Сходи в туалет, срыгни. Полегчает

← →
Юрий Зотов © (2007-02-25 01:50) [2]

Нет, никто так и не справился.

← →
Palladin © (2007-02-25 10:24) [3]

:) "Мартышка и очки" (С) Крылов

← →
Fredy314 © (2007-02-25 11:16) [4]

тема секса нераскрыта.

← →
Kolan © (2007-02-25 11:30) [5]

«Вообще, кто-нибудь справляется с ней?»

Надо знать волшебные заклинания:
ShowCaptions например.
ЗЫ
Интересно угадал?

← →
Olivetti (2007-02-25 11:37) [6]

Fredy314 © (25.02.07 11:16) [4]
тема секса нераскрыта.

Kolan © (25.02.07 11:30) [5]
Надо знать волшебные заклинания:
ShowCaptions например.

"Люби меня по-французски" (С) ?

← →
Vovan # 2 (2007-02-25 12:25) [7]

>Надо знать волшебные заклинания:
ShowCaptions например.
ЗЫ
Интересно угадал?

Наоборот, это разрушительное заклинание как раз и вышло из под контроля.

← →
Kolan © (2007-02-25 12:40) [8]

«Наоборот, это разрушительное заклинание как раз и вышло
из под контроля.»

Может всеж таки скажешь что тебе в нем так не понравилось?
Нормальный компонент. Если хош возьми TActionToolBar + TActionManger.

← →
Vovan # 2 (2007-02-25 12:52) [9]

>Kolan © (25.02.07 12:40) [8]

Нормальный компонент.

Можешь сделать кнопку стиля Check, чтоб 24 пикселя высотой без глифа с надписью и слева от него панель без бордюра и надписи, на которой посередине лейбл?

← →
Kolan © (2007-02-25 13:13) [10]

Кидаем ToolBar1. Кидаем ImageList1.

ImageList1.Width и Height = 24. ToolBar1.ImageList = ImageList1. //В сам ImageList картинки класть ненадо, оставь пустым.

Далее
ToolBar1.ShowCaption := True; ToolBar1.List := True;

Оно?

← →
Vovan # 2 (2007-02-25 13:43) [11]

Ах, List := True забыл. Ладно, а вторую часть, про панель и лейбл на ней. Не забывай, что у меня XPManifest.

← →
Kolan © (2007-02-25 15:28) [12]

«а вторую часть, про панель и лейбл на ней.»

А вот тут я не понял что за «Лебл» если это TLabel, то зачем он на ТулБаре?

← →
Vovan # 2 (2007-02-25 15:46) [13]

Что хочу, то пихаю на тулбар. Такая возможность заявлена.

Но даже если и без лейбла, то фигня получается. ImageList.Height в 24 устанавливать не стоит, ибо это только размер глифа, а кнопка то побольше глифа будет. Тут и начинается самовольствование - для XP высота глифа, при котором высота кнопки будет 24, - одна, для 98 - другая. Получается, что мы вместо того, чтобы подгонять оконную раму, рубим стену.

Хочу кнопку высотой 24. А нифига...

← →
Kolan © (2007-02-25 15:52) [14]

Обычно кнопки на тул баре стандартных размеров.
А размер зависит от картинки(даже если её нет).
Поэтому чтобы кнопки были большими я присоединяю пустой ImageList и в нем устанавливаю размер, например 32пикс.

Точный размер кнопок, имхо, ненужен никому.

← →
Fredy314 © (2007-02-25 17:40) [15]

между прочим есть такие свойства
property ButtonHeight: Integer;
property ButtonWidth: Integer;
Offtop: тема секса постепенно раскрывается
господа, вам не надоело ещё на провокации кидатся?

← →
Vovan # 2 (2007-02-25 18:02) [16]

>Fredy314 © (25.02.07 17:40) [15]

между прочим есть такие свойства
property ButtonHeight: Integer;
property ButtonWidth: Integer;
Offtop: тема секса постепенно раскрывается
господа, вам не надоело ещё на провокации кидатся?

Сам ты провокация! Возьми и проверь, меняет ли ButtonHeight высоту при ShowCaption = True. Между прочим.

← →
Vovan # 2 (2007-02-25 18:09) [17]

>Kolan © (25.02.07 15:52) [14]

Даже при ImageList.Width = 0 виден сдвиг вправо.

← →
Vovan # 2 (2007-02-25 18:36) [18]

Эх... Ждал я , ждал... Так никто и не посоветовал:

SendMessage(ToolBar.Handle, TB_SETBUTTONSIZE, 0, MakeLong(70,24));

← →
Kolan © (2007-02-25 20:07) [19]

«SendMessage(ToolBar.Handle, TB_SETBUTTONSIZE, 0, MakeLong(70,
24));»

Заем те вообще VCL и дизайнер форм?  Делай все в ран тайме на АПИ&#133

← →
Vovan # 2 (2007-02-25 20:27) [20]

Kolan, зачем ты это говоришь? Зачем такой крайний тон?

Дизайнер форм мне бы как раз хотелось использовать, да вот обёртка вокруг API подкачала. Поэтому приходится делать в рантайм и на API. Никакого желания этим заниматься нет.

Вот ещё прикол. В ImageList установи Width на отрицательное значение. В Design Time тулбар отражается отлично, так как надо при отрицательной ширине глифа, но при запуске происходит ошибка. Ну не фигня?

Борланд перехетрила всех и сделала для сторонних контролов на тулбаре невидимую подложку - tbsSeparator. Но вот незадача, в теме XP сепаратор не невидимый и рисует вертикальную полоску.

В очередной раз встречаюсь с борландовской ленью сделать всё нормально. Они сделали так, что юзеры хавают, и не замечает, что компонентик то работает не совсем как надо. А если хавают, то зачем переделывать? - лучше внедрять .NET и кучу других страшных слов.

а сторонние компоненты Заратустра запретил?

А я вместо ТулБаров использую свой RSMakeToolbar. Хотя есть немало того, что пока не достигается таким способом.

«Kolan, зачем ты это говоришь? Зачем такой крайний тон?»

Необессуть тон был нормальный, просто ловить пиксели на тулбаре  зачем?

Вот например(Смотрим только на скриншот :) :
http://www.fvt.rsu.ru/ksoftware/KROMBurner.html

Что тут неправильный тулбар? Делал так же как и тедбе рассказал. Единственное картинки прикрутил потом&#133
И я не парюсь сколько там пикселей поставил в ИмэджЛисте 32х32 пикселя и все&#133

«тедбе»

тебе

← →
Vovan # 2 (2007-02-25 22:02) [25]

Kolan, убедил. Решил использовать TCoolBar, где на band"ах перемежаются панели и тулбары, которые буду настраивать через SendMessage.

«Kolan, убедил. Решил использовать TCoolBar»

Я же про него ни слова не сказал :)&#133

«где на band"ах перемежаются панели и тулбары»

Хоть сккрин шот потом покажи, интересно что ты хотел добится&#133

Я дописывал или переписывал функционал стандартных компонентов, когда он меня не устраивал.

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