|
Вопрос # 1 722/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты!У меня программно в приложении у SpeedButton создаётся PopupMenu. Кроме всех прочих компонентов на форме находится ImageList, в котором находятся различные текстурки для вкладок PopupMenu.Теперь вопрос как их мне програмно загружать во вкладки и как мне обратиться к их размерам,что бы например сделать их 250x50 по размеру текстурок. Да ещё и как менять программно шрифт.
 |
Вопрос задал: GAZ (статус: Посетитель)
Вопрос отправлен: 24 июня 2008, 18:36
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: Мережников Андрей
Здравствуйте, GAZ!
Посмотрите http://www.delphiworld.narod.ru/
Статью "многострочный Combobox" можно использовать за основу решения Вашей проблемы (сделать по аналогии)
 |
Ответ отправил: Мережников Андрей (статус: Абитуриент)
Время отправки: 25 июня 2008, 17:42
Оценка за ответ: 5
Комментарий к оценке: Ставлю 5 за OnDrawItem и OnMeasureItem (у меня в Delphi 2007 есть)Спасибо разобрался
|
Мини-форум вопроса
Всего сообщений: 7; последнее сообщение — 26 июня 2008, 18:31; участников в обсуждении: 3.
|
|
Мережников Андрей (статус: Абитуриент), 24 июня 2008, 21:56 [#1]:
Обращаться к размерам чего, текстурок или пунктов меню?
Для изменения шрифта можно попробовать отрисовку на канве
|
|
Вадим К (статус: Академик), 24 июня 2008, 23:41 [#2]:
Какие вкладки у PopupMenu?
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
GAZ (статус: Посетитель), 25 июня 2008, 06:41 [#3]:
Вадиму К и Андрею Мережникову
.......
P := TPopupMenu.Create(Self);
SpeedButton1.PopupMenu := P;
.....
procedure T...Form. ...Click(Sender: TObject);
begin
if P <> nil then
begin
Item := TMenuItem.Create(P);
Item.Caption := 'Бла-бла-бла';//хочу написать другим шрифтом размером и стилем
P.Items.Add(Item);//хочу сделать размер Items 250x50 и загрузить в них текстурки
end;
end;
......
|
|
|
Мережников Андрей (статус: Абитуриент), 25 июня 2008, 16:19 [#4]:
Для того, чтобы написать другим шрифтом, размером и стилем используй событие OnDrawItem пункта меню (предварительно установив для popupmenu свойство OwnerDraw в true). Для задания размеров можно использовать событие OnMeasureItem (только в Delphi 2007 я его не нашел). В DelphiWorld была статья "Многострочный ComboBox" используй ее за основу
|
|
|
GAZ (статус: Посетитель), 26 июня 2008, 06:04 [#5]:
Мережников Андрей
Что -то очень расплывчатая ссылка не нашёл я там эту статью. И я бы хотел немного переделать вопрос.Можно в Items поместить SpeedButton-ы,аналогичные тому к которому PopupMenu прицеплено.Дело в том что в них уже есть всё необходимое мне.
|
|
|
Вадим К (статус: Академик), 26 июня 2008, 09:41 [#6]:
Нет, нельзя в Items меню вставить SpeedButton.
Зачем вам в меню такие большие картинки? Лучше делать более-менее стандартный интерфейс. Или вы идёте согласно рекомендации Билла Гейтса - "не можешь сделать, что бы работало нормально, сделай, что бы выглядело хотя бы красиво"?
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Мережников Андрей (статус: Абитуриент), 26 июня 2008, 18:31 [#7]:
DelphiWorld \ Компоненты и классы\Списки\Многостроковый ComboBox
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
