Chip: Shareware for Win 95/Chip-Shareware-Win95.bin/ostatni/happyc/_setup.1/HaCa.exe/0/RCDATA/TFRMPRINT/TFRMPRINT.txt

Text File | 1997-04-11 | 4KB | 187 lines

object frmPrint: TfrmPrint
  Left = 41
  Top = 496
  BorderStyle = bsDialog
  Caption = 'Print'
  ClientHeight = 225
  ClientWidth = 454
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 352
    Top = 0
    Width = 102
    Height = 225
    Align = alRight
    BevelInner = bvLowered
    BevelOuter = bvLowered
    TabOrder = 0
    object btnPrintSetup: TButton
      Left = 13
      Top = 11
      Width = 75
      Height = 25
      Caption = '&Setup'
      TabOrder = 0
      OnClick = btnPrintSetupClick
    end
    object btnPrint: TButton
      Left = 13
      Top = 43
      Width = 75
      Height = 25
      Caption = '&Print'
      Default = True
      TabOrder = 1
      OnClick = btnPrintClick
    end
    object btnCancel: TButton
      Left = 13
      Top = 107
      Width = 75
      Height = 25
      Caption = '&Cancel'
      TabOrder = 2
      OnClick = btnCancelClick
    end
    object btnPreview: TButton
      Left = 13
      Top = 75
      Width = 75
      Height = 25
      Caption = '&Preview'
      TabOrder = 3
      OnClick = btnPrintClick
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 352
    Height = 225
    Align = alClient
    BevelInner = bvLowered
    BevelOuter = bvLowered
    TabOrder = 1
    object PageControl1: TPageControl
      Left = 2
      Top = 2
      Width = 348
      Height = 221
      ActivePage = tabMargin
      Align = alClient
      TabOrder = 0
      object tabMargin: TTabSheet
        Caption = 'Page &Layout'
        object Label2: TLabel
          Left = 13
          Top = 167
          Width = 209
          Height = 13
          Caption = 'Margins have to be provided as percentage.'
        end
        object GroupBox1: TGroupBox
          Left = 200
          Top = 10
          Width = 105
          Height = 68
          Caption = ' Orientation '
          TabOrder = 0
          object radPortrait: TRadioButton
            Left = 10
            Top = 20
            Width = 79
            Height = 17
            Caption = 'Portrait'
            TabOrder = 0
            OnClick = radLandscapeClick
          end
          object radLandscape: TRadioButton
            Left = 10
            Top = 40
            Width = 92
            Height = 17
            Caption = 'Landscape'
            TabOrder = 1
            OnClick = radLandscapeClick
          end
        end
        object GroupBox2: TGroupBox
          Left = 10
          Top = 10
          Width = 176
          Height = 143
          Caption = ' Margins '
          TabOrder = 1
          object Label1: TLabel
            Left = 15
            Top = 25
            Width = 53
            Height = 13
            Caption = 'Left Margin'
          end
          object Label3: TLabel
            Left = 15
            Top = 55
            Width = 60
            Height = 13
            Caption = 'Right Margin'
          end
          object Label4: TLabel
            Left = 15
            Top = 85
            Width = 54
            Height = 13
            Caption = 'Top Margin'
          end
          object Label5: TLabel
            Left = 15
            Top = 115
            Width = 68
            Height = 13
            Caption = 'Bottom Margin'
          end
          object edtLeftmargin: TEdit
            Left = 105
            Top = 20
            Width = 56
            Height = 21
            TabOrder = 0
            Text = '0'
          end
          object edtRightMargin: TEdit
            Left = 105
            Top = 50
            Width = 56
            Height = 21
            TabOrder = 1
            Text = '0'
          end
          object edtTopMargin: TEdit
            Left = 105
            Top = 80
            Width = 56
            Height = 21
            TabOrder = 2
            Text = '0'
          end
          object edtBottomMargin: TEdit
            Left = 105
            Top = 110
            Width = 56
            Height = 21
            TabOrder = 3
            Text = '0'
          end
        end
      end
    end
  end
end