Форум: "Начинающим";
Текущий архив: 2007.11.18;
Скачать: [xml.tar.bz2];
Внизвопрос по TPopupMenu. Прямоугольная область. Найти похожие ветки
← →
DevilDevil © (2007-10-24 14:20) [0]перерисовываю пункты меню через OnAdvancedDrawItem и OwnerDraw. Сам текст рисую на 20 пикселей правее обычного, поэтому длинный текст немного не умещается в прямоугольную область меню.
Вопрос: можно ли такую прямоугольную область как то сделать шире на 20 пикселей?
ToЮрий Зотов
имхо подобный вопрос не является совсем стандартным, ответить на него могут наверное только специалисты в области компонентов. С Уважением.
← →
Palladin © (2007-10-24 14:29) [1]Да уж... действительно, только специалисты в областы компонентов. :))
OnMeasureItem
← →
DevilDevil © (2007-10-24 16:01) [2]хмм... да, думал всё на порядок сложнее.
Тем не менее...
Изменяю иOnAdvancedDrawItem
иOnMeasureItem
, получается так:
http://devilhome.narod.ru/DrawAndMeasureEvents.PNGprocedure TForm1.dasdas1MeasureItem(Sender: TObject; ACanvas: TCanvas;
var Width, Height: Integer);
begin
Width := Width + 20;
end;
← →
DevilDevil © (2007-10-24 16:01) [3]ой, в данном случае
Width := Width + 100;
← →
DevilDevil © (2007-10-24 16:04) [4]прошу прощения, понял в чём дело
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.11.18;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.058 c