Форум: "Основная";
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];
ВнизКак обработать OwnerDraw??? Найти похожие ветки
← →
Игорь Шевченко (2002-04-17 17:18) [1]День добрый,
var Text : String;
begin
Text := (Sender AS TMenuItem).Caption;
if Selected then
ACanvas.Font.Color := clRed
else
ACanvas.Font.Color := clBlack;
DrawText(ACanvas.Handle,PChar(Text), -1, ARect, 0);
end;
К примеру, нарисовать выбранный пункт меню красным цветом...
С уважением,
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c