Советы по Delphi

         

CANVAS.TEXTWIDTH


Установить размер шрифта для панели можно следующим образом:

    With StatusBar1.Panels[1] do begin Text := Edit1.Text; Canvas.Font.Size := StatusBar1.Font.Size; Width := Canvas.TextWidth(Text) + 10; end;

[001463]



Содержание раздела