Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Цветные PopupMenu [D5, Win2k, WinXP]

Пассажир бронепоезда © (2004-12-17 16:49:00)
Здраствуйте, Delphi - мастера. Не подскажите как можно поменять цвет фона у контекстного меню (PopupMenu) и как разместить на бэкграунде фоновую картинку.

Спасибо. Особо не напрягайтесь.

grom (2004-12-17 18:54:00) [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

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »