home *** CD-ROM | disk | FTP | other *** search
- object MainDialog: TMainDialog
- Left = 267
- Top = 212
- BorderStyle = bsDialog
- Caption = 'Main Dialog'
- ClientHeight = 382
- ClientWidth = 592
- Font.Color = clBlack
- Font.Height = -14
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Position = poScreenCenter
- PixelsPerInch = 120
- TextHeight = 16
- object Bevel1: TBevel
- Left = 9
- Top = 0
- Width = 581
- Height = 70
- Style = bsRaised
- end
- object Label1: TLabel
- Left = 169
- Top = 9
- Width = 410
- Height = 51
- Caption =
- 'These demos display some of Printit'#39's unique printing abilities.' +
- ' They were specifically created out of user demand to answer que' +
- 'stions on Printit and show the more advanced topics'
- Font.Color = clPurple
- Font.Height = -15
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- WordWrap = True
- end
- object Printit: TLabel
- Left = 25
- Top = 9
- Width = 87
- Height = 38
- Caption = 'Printit'
- Font.Color = clYellow
- Font.Height = -33
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 32
- Top = 44
- Width = 97
- Height = 16
- AutoSize = False
- Caption = 'Version 5.32'
- end
- object Panel1: TPanel
- Left = 12
- Top = 76
- Width = 485
- Height = 297
- TabOrder = 0
- object Label3: TLabel
- Left = 12
- Top = 9
- Width = 461
- Height = 48
- Alignment = taCenter
- Caption =
- 'The source for each demo is in the form # printed next to them e' +
- '.g. Demo 01 is in unit FDemo01, Demo 10 is in unit FDemo10'
- Font.Color = clBlue
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- WordWrap = True
- end
- object ListBox1: TListBox
- Left = 12
- Top = 56
- Width = 461
- Height = 230
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 17
- Items.Strings = (
-
- '01 Actual Font Styles and Sizes - As supplied by the Printer Dri' +
- 'ver '
- '02 Multiple TPanel components - Combined size larger than page'
- '03 Printing the Active Page on a TNotebook'
- '04 Print a Window'
- '05 Print Invoice #1 - View or direct to printer'
- '06 Print a form with Fishes from a Table'
- '07 Combined Window and Grid Print '
- '08 Grid Print'
-
- '09 Grid and Window on same page - View and Direct Print to print' +
- 'er'
- '10 Print current Printer Information'
- '11 Print Fonts of currently selected printer'
- '12 Simple Pie Chart'
- '13 Print a few shapes'
- '14 A Fax Form example'
- '15 Various components printed'
- '16 Print Grid backdrops'
- '17 Print Invoice # 2'
- '18 Print a customised letter'
- '19 RadioButtons, GroupBoxes, CheckBoxes etc.'
- '20 Print a customised chain letter'
- ''
- '')
- ParentFont = False
- TabOrder = 0
- OnDblClick = ListBox1DblClick
- end
- end
- object View: TButton
- Left = 505
- Top = 121
- Width = 85
- Height = 32
- Caption = '&View'
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = ViewClick
- end
- object Exit: TButton
- Left = 503
- Top = 260
- Width = 87
- Height = 33
- Caption = '&Exit'
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = ExitClick
- end
- object Printer: TButton
- Left = 505
- Top = 76
- Width = 85
- Height = 34
- Caption = 'Set &Printer'
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = PrinterClick
- end
- object PrinterSetupDialog1: TPrinterSetupDialog
- Left = 528
- Top = 320
- end
- end
-