object DrFort: TDrFort Left = 510 Top = 100 BorderIcons = [] BorderStyle = bsDialog Caption = 'Printing:' ClientHeight = 67 ClientWidth = 663 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = True Position = poScreenCenter PrintScale = poNone Scaled = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 16 object SeiteLabel: TLabel Left = 8 Top = 16 Width = 11 Height = 20 Caption = '0' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -17 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end end