Текущий архив: 2002.04.22;
Скачать: CL | DM;
Вниз
Размеры 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;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.013 c
