Скачать: CL | DM;

Контекстное и главное меню   Найти похожие ветки 

← →
Светлана   (2012-07-18 15:58) [0]

Здравствуйте, подскажите варианты замены MainMenu и PopupMenu, на более красивые в D7 (бесплатные варианты). Спасибо.

---

← →
Anatoly Podgoretsky ©   (2012-07-18 18:40) [1]

> Светлана  (18.07.2012 15:58:00)  [0]

OwnerDraw и рисуйЮ что хочешь, хоть в полосочку

---

← →
Светлана   (2012-07-23 09:45) [2]

Не понятно только от чего нужно "танцевать" при отрисовке. В OnDrawItem только от ARect, но когда я пробовала менять стили Windows, все выглядело по разному. Как можно добиться единообразия?

procedure TForm1.File1DrawItem(Sender: TObject; ACanvas: TCanvas;
 ARect: TRect; Selected: Boolean);
begin
 ....................................
end;    

---

← →
Плохиш ©   (2012-07-23 11:31) [3]

> но когда я пробовала менять стили Windows, все выглядело
> по разному. Как можно добиться единообразия?

Откуда ж нам знать, что пробовала и как должно/выглядело. На этом форуме не лечат стук в подвале и телепаты в отпуске.

---

← →
Светлана   (2012-07-23 11:51) [4]

Ну вроде разобралась, только не понятно как сделать вывод иконки из ImageList перед пунктом меню при OwnerDraw = True;

---

← →
KilkennyCat ©   (2012-07-23 12:11) [5]

http://rouse.drkb.ru/other.php здесь есть про красивое меню.

> не понятно как сделать вывод иконки из ImageList перед пунктом
> меню


ImageList.Draw(Canvas: TCanvas; X, Y, Index: Integer; Enabled: Boolean(по умолчаниюTrue);
вывод изображения с номером Index на чей-то Canvas в координаты X, Y. Если Enabled равно False, рисуется серым (выключенным)

---

← →
Dennis I. Komarov ©   (2012-07-24 16:32) [6]

> Здравствуйте, подскажите варианты замены MainMenu и PopupMenu,
>  на более красивые в D7 (бесплатные варианты).

Здравствуйте, подскажите где взять новые более красивые глюки - стандартных не хватает...

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.36 c