Форум: "Основная";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
ВнизРазмеры TMenuItem? Найти похожие ветки
← →
ghost_by (2002-04-09 13:38) [0]Обрабатываю событие OnDrawItem. Но вот в чем проблема - размеры меню - помойму устанавливаются в соответствии с текстом содержащимся в меню. При рисовании MenuItem, мне этих размеров маловато будет. Возникает вопрос - как увеличить размеры (Width) меню? По идее, можно в Caption MenuItem"a можно загнать текст нужной длинны, но - неужели нет метода попроще?
← →
Игорь Шевченко (2002-04-09 14:00) [1]День добрый,
AMenuItem.OnMeasureItem := MyExpandItemWidth;
procedure TForm1.MyExpandItemWidth(Sender: TObject; ACanvas: TCanvas;
var Width, Height: Integer);
begin
Inc(Width, MenuIncreaseWidth);
....
end;
С уважением,
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c