TStatusBar

Установить размер шрифта для панели StatusBar

 

Code:

With StatusBar1.Panels[1] do

begin

Text := Edit1.Text;

Canvas.Font.Size := StatusBar1.Font.Size;

Width := Canvas.TextWidth(Text) + 10;

end;

 

 

 

Ранние статьи

Случайные статьи

Популярные статьи

Подробности
Родительская категория: VCL
Категория: TStatusBar

Добавить комментарий

Не использовать не нормативную лексику.

Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.

ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!

Защитный код
Обновить