Текущий архив: 2007.10.14;
Скачать: CL | DM;

Вниз

ширина PopupMenu   Найти похожие ветки 

← →
Виктор007   (2007-09-17 15:40) [0]

Обрабатываю OnAdvancedDrawItem у PopupMenu. Перерисовываю Caption каждого элемента меню немного правее чем в оригинале. Из-за этого текст не помещается в меню. Вопрос: как увеличить ширину у всего PopupMenu?

---

← →
DVM ©   (2007-09-17 15:44) [1]

WM_MEASUREITEM

---

← →
Lacmus ©   (2007-09-17 16:12) [2]


procedure TForm57.Test1MeasureItem(Sender: TObject; ACanvas: TCanvas; var Width,
 Height: Integer);
begin
 Width := 200;
end;


---

← →
Виктор007   (2007-09-17 16:16) [3]

Спасибо вам! То что нужно.

---

Страницы: 1 вся ветка

Текущий архив: 2007.10.14;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.024 c