Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 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;

С уважением,




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.032 c
14-70020          ASM                   2002-03-16 01:01  2002.04.22  
Профессианальная Помощь нужна!


1-69849           Drug                  2002-04-08 00:48  2002.04.22  
File not found DsgnIntf.dcu


1-69838           DeMoN-777             2002-04-11 04:14  2002.04.22  
ListBox


1-69866           kalinka               2002-04-09 09:48  2002.04.22  
Создание и удаление динамических массивов


1-69814           cok                   2002-04-06 19:16  2002.04.22  
Антивирусы