Обработчик события OwnerDraw в компоненте StatusBar Delphi , Компоненты и Классы , TStatusBar
Обработчик события OwnerDraw в компоненте StatusBar
procedure TForm1.StatusBar1DrawPanel(StatusBar: TStatusBar;
Panel: TStatusPanel; const Rect: TRect);
begin
with statusbar1.Canvas do
begin
Brush.Color := clRed;
FillRect(Rect);
TextOut(Rect.Left, Rect.Top, 'Панель '+IntToStr(Panel.Index));
end ;
end ;
Статья Обработчик события OwnerDraw в компоненте StatusBar раздела Компоненты и Классы TStatusBar может быть полезна для разработчиков на Delphi и FreePascal.
Комментарии и вопросы
Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.
:: Главная :: TStatusBar ::
