object TPersHolder
  P.Visible = True
  P.Layout = blGlyphTop
  P.Transparent = False
  P.TransparentValue = 250
  P.SkinDataName = 'resizetoolbutton'
  P.Margin = -1
  P.NumGlyphs = 1
  P.Spacing = 1
  P.Caption = '%SPrint%'
  P.Picture = 'ButtonImg4'
end
