paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-21 19:30:06 +01:00
Code Issues Packages Projects Releases Wiki Activity

examples/tryicon: Avoid truncated checkbox caption

Browse Source 
git-svn-id: trunk@56224 -
This commit is contained in:
wp 2017-10-29 11:42:55 +00:00
parent 748967367b
commit 897c3f20e0
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
examples/trayicon/frmtest.lfm
View File

@ -2,14 +2,14 @@ object frmTrayTest: TfrmTrayTest
Left = 183 Left = 183
Height = 238 Height = 238
Top = 176 Top = 176
Width = 311 Width = 410
ActiveControl = btnShow ActiveControl = btnShow
Caption = 'TTrayIcon test application' Caption = 'TTrayIcon test application'
ClientHeight = 238 ClientHeight = 238
ClientWidth = 311 ClientWidth = 410
OnCreate = FormCreate OnCreate = FormCreate
OnPaint = FormPaint OnPaint = FormPaint
LCLVersion = '0.9.25' LCLVersion = '1.9.0.0'
object btnShow: TButton object btnShow: TButton
Left = 32 Left = 32
Height = 33 Height = 33
@ -41,9 +41,9 @@ object frmTrayTest: TfrmTrayTest
end end
object chkOnPaintDrawing: TCheckBox object chkOnPaintDrawing: TCheckBox
Left = 32 Left = 32
Height = 21 Height = 19
Top = 200 Top = 200
Width = 267 Width = 284
Caption = 'Test drawing the icon in the Form''s OnPaint event' Caption = 'Test drawing the icon in the Form''s OnPaint event'
OnChange = chkOnPaintDrawingChange OnChange = chkOnPaintDrawingChange
TabOrder = 3 TabOrder = 3

BIN
examples/trayicon/wndtray.res
View File

Binary file not shown.