Текущий архив: 2005.01.02;
Скачать: CL | DM;
Вниз
Цветные PopupMenu Найти похожие ветки
← →
Пассажир бронепоезда (2004-12-17 16:49) [0]Здраствуйте, Delphi - мастера. Не подскажите как можно поменять цвет фона у контекстного меню (PopupMenu) и как разместить на бэкграунде фоновую картинку.
Спасибо. Особо не напрягайтесь.
← →
grom (2004-12-17 18:54) [1]procedure TForm1.MenuItem1DrawItem(Sender: TObject; ACanvas: TCanvas;
ARect: TRect; Selected: Boolean);
begin
ACanvas.Brush.Style:=bsSolid;
ACanvas.Brush.Color:=clGray;
ACanvas.FillRect(Rect(ARect.left+13, ARect.Top, ARect.Right, ARect.Bottom));
ACanvas.Font.Style:=[fsBold];
ACanvas.Font.Color:=clWhite;
ACanvas.TextOut(14,ARect.Top+2," 44444 ");
end;
http://micsoft.narod.ru/help.html
Картинки в popupmenu
Страницы: 1 вся ветка
Текущий архив: 2005.01.02;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.052 c
