Вниз
Скачать: CL | DM;

Как в PopupMenu сделать пункт жирной WinAPI   Найти похожие ветки 

 
NikNet ©   (2005-05-13 20:19) [0]

Что там надо сделать что бы сделать пункт жирными буквами?

Ну вот в Firewall(Outpost) там на трее есть значок при щелчке правой кнопкой мыши
поевляется меню и самый верхний пунк он жирными буквами?

Я пробывал MF_DEFAULT в AddAppend но не чего не выделяется :(


 
Delphi_is_cool ©   (2005-05-14 00:49) [1]

У каждой кнопки в меню есть свойство Default установи его значение True, и все.


 
Delphi_is_cool ©   (2005-05-14 00:56) [2]

Помоему я что то не то сказал ((((.


 
KADAN ©   (2005-05-14 12:36) [3]

поставь OwnerDraw у попупа. потом у MenuItem обрабатывай событие OnDrawItem.

procedure TForm1.N1DrawItem(Sender: TObject;
 ACanvas: TCanvas; ARect: TRect; Selected: Boolean);
begin
 ACanvas.Font.Style := [fsBold];
 ACanvas.Font.color := clRed;
 ACanvas.FillRect(ARect);
 ACanvas.TextOut(ARect.Left + 5,ARect.Top,"Красно-жирный");
end;



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

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



Память: 0.45 MB
Время: 0.028 c
1-1118813345
Layner
2005-06-15 09:29
2005.07.11
А как узнать название формы на которой лежит компанент?


4-1115875262
DelphiN!
2005-05-12 09:21
2005.07.11
NetUserAdd


1-1118321226
Eugene74
2005-06-09 16:47
2005.07.11
Отображение begin .. end другим цветом (D2005)


3-1117527568
Леонид
2005-05-31 12:19
2005.07.11
Удаление записи на которой находится курсор


1-1119435275
Wpn_
2005-06-22 14:14
2005.07.11
MediaPlayer




   Наверх