Slant-shadow Posted April 2, 2014 Report Share Posted April 2, 2014 (edited) Можете подсказать, как увеличить размер шрифта компонента Timer на форме procedure TForm1.Timer1Timer(Sender: TObject);begin StatusBar1.Panels[1].Text:=TimeToStr(Time)end; Edited April 2, 2014 by Slant-shadow Link to comment Share on other sites More sharing options...
Teddy_Bear Posted April 3, 2014 Report Share Posted April 3, 2014 (edited) Компонент Timer - невизуальный компонент. Если всё же речь о шрифте StatusBar, то так: StatusBar1.Panels[1].Text:=TimeToStr(Time);StatusBar1.Font.Size:=24; Не забыть установить высоту статусбара соответственно размеру шрифта. Edited April 3, 2014 by Teddy_Bear 2 Link to comment Share on other sites More sharing options...
Slant-shadow Posted April 3, 2014 Author Report Share Posted April 3, 2014 Спасибо Link to comment Share on other sites More sharing options...
Recommended Posts