Chip 2001 September/Chip_2001-09_cd1.bin/sharewar/picmaster/picmaster.exe/picmaster.en/0/RCDATA/TPRINTFORM/TPRINTFORM.txt

Text File | 2001-05-24 | 16.7 KB | 692 lines

object printform: Tprintform
  Left = 341
  Top = 635
  HelpContext = 418
  BorderStyle = bsDialog
  Caption = 'Print'
  ClientHeight = 407
  ClientWidth = 648
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Button2: TButton
    Left = 370
    Top = 364
    Width = 89
    Height = 25
    Caption = 'Print'
    Default = True
    ModalResult = 1
    TabOrder = 0
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 466
    Top = 364
    Width = 89
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object Button5: TButton
    Left = 568
    Top = 364
    Width = 73
    Height = 25
    HelpContext = 418
    Caption = 'Help'
    TabOrder = 3
    OnClick = Button5Click
  end
  inline printFrame1: TprintFrame
    Left = 4
    Top = 4
    Width = 357
    Height = 401
    TabOrder = 4
    inherited GroupBox1: TGroupBox
      Width = 357
      Height = 401
      inherited ie: timageenlayer
        LayerWidth = 42970004
        LayerHeight = 42970004
      end
      inherited Panel1: TPanel
        Top = 345
        Width = 353
        inherited CheckBox1: TCheckBox
          Checked = True
          State = cbChecked
        end
      end
    end
  end
  object PageControl2: TPageControl
    Left = 368
    Top = 8
    Width = 269
    Height = 329
    Hint = 'Here you can change the options of your printer'
    ActivePage = TabSheet4
    HotTrack = True
    TabOrder = 2
    object TabSheet4: TTabSheet
      Caption = 'Graphic'
      object SpeedButton2: TSpeedButton
        Tag = 1
        Left = 70
        Top = 220
        Width = 103
        Height = 21
        Hint = 'The image will be printed as big as possible'
        AllowAllUp = True
        GroupIndex = 10
        Caption = 'Full (Fit)'
        Transparent = False
        OnClick = directionframe1Click
      end
      object SpeedButton3: TSpeedButton
        Tag = 2
        Left = 70
        Top = 240
        Width = 103
        Height = 21
        Hint =
          'The image will be scaled so that it fills the area complete.  '#13#10 +
          ' Border parts of the image could get lost.'
        AllowAllUp = True
        GroupIndex = 10
        Caption = 'Full (Cut)'
        Transparent = False
        OnClick = directionframe1Click
      end
      object SpeedButton4: TSpeedButton
        Tag = 3
        Left = 70
        Top = 260
        Width = 103
        Height = 21
        Hint = 'Take Original Size'
        AllowAllUp = True
        GroupIndex = 10
        Down = True
        Caption = 'Original Size'
        Transparent = False
        OnClick = directionframe1Click
      end
      inline directionframe1: Tdirectionframe
        Left = 6
        Top = 220
        Width = 63
        Hint = 'Here you can set an anchor for the image.'
        AutoSize = False
        TabOrder = 2
        OnClick = directionframe1Click
        inherited SpeedButton5: TSpeedButton
          Down = True
          Font.Color = clMaroon
          Font.Style = [fsBold]
          ParentFont = False
        end
      end
      object Button7: TButton
        Left = 192
        Top = 240
        Width = 45
        Height = 21
        Hint = 'Half Size'
        Caption = '/ 2'
        TabOrder = 4
        OnClick = Button6Click
      end
      object Button6: TButton
        Left = 192
        Top = 220
        Width = 45
        Height = 21
        Hint = 'Double Size'
        Caption = 'x 2'
        TabOrder = 3
        OnClick = Button6Click
      end
      object GroupBox1: TGroupBox
        Left = 4
        Top = 12
        Width = 249
        Height = 81
        Hint =
          'Enter the distance the image should have  '#13#10'from the upper left ' +
          'corner.'
        Caption = 'Distance'
        TabOrder = 0
        object Label21: TmyRxLabel
          Left = 26
          Top = 16
          Width = 27
          Height = 13
          Caption = 'Left'
          Layout = tlCenter
          ShadowSize = 0
        end
        object Label22: TmyRxLabel
          Left = 22
          Top = 40
          Width = 28
          Height = 13
          Caption = 'Top'
          Layout = tlCenter
          ShadowSize = 0
        end
        object CheckBox15: TCheckBox
          Left = 64
          Top = 60
          Width = 169
          Height = 17
          Hint =
            'When the distance from the border should be taken '#13#10'instead of f' +
            'rom the printable area.'
          Caption = 'Include borders in calculation.'
          TabOrder = 0
          OnClick = updatepreview
        end
        inline converterframe1: Tconverterframe
          Left = 68
          Top = 12
          TabOrder = 1
          OnClick = converterframe1Click
          inherited formstorage1: tformstorage1
            StoredProps.Strings = ()
          end
        end
        inline converterframe2: Tconverterframe
          Left = 68
          Top = 36
          TabOrder = 2
          OnClick = converterframe1Click
        end
      end
      inline sizeframe1: Tsizeframe
        Left = 4
        Top = 108
        Width = 249
        Height = 97
        AutoSize = False
        TabOrder = 1
        inherited GroupBox1: TGroupBox
          Width = 249
          Height = 97
          Hint = 'Enter here the size of the image it should be printed.'
          Align = alClient
          inherited Label3: TmyRxLabel
            Visible = False
          end
          inherited sizespecialform1: Tsizespecialform
            Left = 30
            Top = 70
            Width = 57
          end
          inherited framedpispecialform1: Tframedpispecialform
            Width = 57
            Height = 17
          end
          inherited dpiframeform1: Tdpiframeform
            Visible = False
          end
        end
      end
    end
    object TabSheet7: TTabSheet
      Hint =
        'Here you can set additional information that is to be printed wi' +
        'th the image.'
      Caption = 'Info'
      ImageIndex = 3
      object Label36: TmyRxLabel
        Left = 12
        Top = 192
        Width = 59
        Height = 13
        Caption = 'Font Size'
        ShadowSize = 0
      end
      object CheckBox10: TCheckBox
        Left = 12
        Top = 220
        Width = 89
        Height = 17
        Caption = 'Cut Lines'
        TabOrder = 3
        OnClick = updatepreview
      end
      object RxSpinEdit8: TRxSpinEdit
        Left = 76
        Top = 188
        Width = 49
        Height = 21
        MaxValue = 9999
        MinValue = 1
        Value = 1
        TabOrder = 1
        OnChange = RxSpinEdit8Change
      end
      object tgrafikformat1: tgrafikformat
        Left = 8
        Top = 12
        Width = 229
        Height = 161
        Caption = 'Additional Information'
        TabOrder = 0
        Kind = imageinfo
        ImageInfoset = []
        FileFormatset = []
        OnChecklistChange = tgrafikformat1ChecklistChange
      end
      object Button9: TButton
        Left = 136
        Top = 188
        Width = 97
        Height = 21
        Caption = 'Font-Settings'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = Button9Click
      end
    end
    object TabSheet5: TTabSheet
      Caption = 'Printer'
      ImageIndex = 3
      object Label23: TmyRxLabel
        Left = 6
        Top = 12
        Width = 43
        Height = 13
        Alignment = taRightJustify
        Caption = 'Printer:'
        Layout = tlCenter
        ShadowSize = 0
      end
      object Label24: TmyRxLabel
        Left = 56
        Top = 12
        Width = 201
        Height = 25
        AutoSize = False
        Caption = 'Label4'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        ShadowSize = 0
        WordWrap = True
      end
      object Label30: TmyRxLabel
        Left = 64
        Top = 44
        Width = 30
        Height = 13
        Caption = 'label'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        Layout = tlCenter
        ParentFont = False
        ShadowSize = 0
      end
      object Label31: TmyRxLabel
        Left = 6
        Top = 44
        Width = 52
        Height = 13
        Alignment = taRightJustify
        Caption = 'Resolution:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Layout = tlCenter
        ParentFont = False
        ShadowSize = 0
      end
      object Label32: TmyRxLabel
        Left = 70
        Top = 256
        Width = 90
        Height = 13
        Caption = 'Number of Prints'
        Layout = tlCenter
        ShadowSize = 0
      end
      object Button8: TButton
        Left = 8
        Top = 276
        Width = 121
        Height = 21
        Caption = 'Print-Options...'
        TabOrder = 4
        OnClick = Button8Click
      end
      object GroupBox3: TGroupBox
        Left = 20
        Top = 144
        Width = 197
        Height = 105
        Caption = 'Page Border'
        TabOrder = 1
        object Label19: TmyRxLabel
          Left = 9
          Top = 20
          Width = 27
          Height = 13
          Caption = 'Left'
          Layout = tlCenter
          ShadowSize = 0
        end
        object Label20: TmyRxLabel
          Left = 48
          Top = 20
          Width = 41
          Height = 13
          Caption = 'Label6'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ShadowSize = 0
        end
        object Label29: TmyRxLabel
          Left = 9
          Top = 59
          Width = 28
          Height = 13
          Caption = 'Top'
          Layout = tlCenter
          ShadowSize = 0
        end
        object Label37: TmyRxLabel
          Left = 48
          Top = 59
          Width = 41
          Height = 13
          Caption = 'Label6'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ShadowSize = 0
        end
        object Label38: TmyRxLabel
          Left = 9
          Top = 40
          Width = 36
          Height = 13
          Caption = 'Right'
          Layout = tlCenter
          ShadowSize = 0
        end
        object Label39: TmyRxLabel
          Left = 48
          Top = 40
          Width = 41
          Height = 13
          Caption = 'Label6'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ShadowSize = 0
        end
        object Label40: TmyRxLabel
          Left = 9
          Top = 79
          Width = 31
          Height = 13
          Caption = 'Bottom'
          Layout = tlCenter
          ShadowSize = 0
        end
        object Label41: TmyRxLabel
          Left = 48
          Top = 79
          Width = 41
          Height = 13
          Caption = 'Label6'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ShadowSize = 0
        end
        object mycombobox4: mycombobox
          Left = 116
          Top = 16
          Width = 57
          Height = 21
          Style = csDropDownList
          Color = clBtnFace
          ItemHeight = 13
          TabOrder = 0
          OnClick = ComboBox12Change
          Itemindex = -1
        end
        object mycombobox5: mycombobox
          Left = 116
          Top = 36
          Width = 57
          Height = 21
          Style = csDropDownList
          Color = clBtnFace
          ItemHeight = 13
          TabOrder = 1
          OnClick = ComboBox12Change
          Itemindex = -1
        end
        object mycombobox6: mycombobox
          Left = 116
          Top = 56
          Width = 57
          Height = 21
          Style = csDropDownList
          Color = clBtnFace
          ItemHeight = 13
          TabOrder = 2
          OnClick = ComboBox12Change
          Itemindex = -1
        end
        object mycombobox7: mycombobox
          Left = 116
          Top = 76
          Width = 57
          Height = 21
          Style = csDropDownList
          Color = clBtnFace
          ItemHeight = 13
          TabOrder = 3
          OnClick = ComboBox12Change
          Itemindex = -1
        end
      end
      object GroupBox4: TGroupBox
        Left = 20
        Top = 68
        Width = 197
        Height = 65
        Caption = 'Printable Area'
        TabOrder = 2
        object Label25: TmyRxLabel
          Left = 10
          Top = 20
          Width = 29
          Height = 13
          Alignment = taRightJustify
          Caption = 'Width'
          Layout = tlCenter
          ShadowSize = 0
        end
        object Label26: TmyRxLabel
          Left = 44
          Top = 20
          Width = 41
          Height = 13
          Caption = 'Label6'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ShadowSize = 0
        end
        object Label27: TmyRxLabel
          Left = 10
          Top = 40
          Width = 28
          Height = 13
          Alignment = taRightJustify
          Caption = 'Height'
          Layout = tlCenter
          ShadowSize = 0
        end
        object Label28: TmyRxLabel
          Left = 44
          Top = 40
          Width = 41
          Height = 13
          Caption = 'Label6'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          ShadowSize = 0
        end
        object mycombobox2: mycombobox
          Left = 112
          Top = 16
          Width = 57
          Height = 21
          Style = csDropDownList
          Color = clBtnFace
          ItemHeight = 13
          TabOrder = 0
          OnClick = ComboBox12Change
          Itemindex = -1
        end
        object mycombobox3: mycombobox
          Left = 112
          Top = 36
          Width = 57
          Height = 21
          Style = csDropDownList
          Color = clBtnFace
          ItemHeight = 13
          TabOrder = 1
          OnClick = ComboBox12Change
          Itemindex = -1
        end
      end
      object mycombobox1: mycombobox
        Left = 128
        Top = 40
        Width = 97
        Height = 21
        Style = csDropDownList
        Color = clBtnFace
        ItemHeight = 13
        TabOrder = 0
        OnClick = ComboBox12Change
        Itemindex = -1
      end
      object RxSpinEdit5: TRxSpinEdit
        Left = 168
        Top = 252
        Width = 49
        Height = 21
        MaxValue = 10000
        MinValue = 1
        Value = 1
        TabOrder = 3
      end
    end
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 548
    Top = 376
  end
  object FontDialog1: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -51
    Font.Name = 'Times New Roman'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 592
    Top = 376
  end
  object tformstorage11: tformstorage1
    IniFileName = '\software\PicMaster\storage'
    UseRegistry = True
    StoredProps.Strings = (
      'CheckBox10.Checked'
      'tgrafikformat1.ImageInfoset'
      'FontDialog1.Font'
      'mycombobox1.Itemindex'
      'mycombobox2.Itemindex'
      'mycombobox3.Itemindex'
      'mycombobox4.Itemindex'
      'mycombobox5.Itemindex'
      'mycombobox6.Itemindex'
      'mycombobox7.Itemindex')
    StoredValues = <>
    AllwaysSave = False
    Left = 508
    Top = 376
  end
  object MDIWallpaper11: TMDIWallpaper1
    TileWidth = 0
    TileHeight = 0
    dialogImage = False
    Left = 432
    Top = 380
    ClientIsOwnerForm = True
  end
  object MDIWallpaper12: TMDIWallpaper1
    TileWidth = 0
    TileHeight = 0
    dialogImage = True
    Left = 476
    Top = 376
  end
end