Chip Hitware 6 A/CHIP_HITWARE6_A.iso/internet/TransSoftMail/tmc4bpe.exe/%MAINDIR%/Tmc4.exe/0/RCDATA/TRICHPREVIEWFORM/TRICHPREVIEWFORM.txt

Text File | 1999-02-07 | 8.2 KB | 306 lines

object RichPreviewForm: TRichPreviewForm
  Left = 293
  Top = 214
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'Print Preview'
  ClientHeight = 314
  ClientWidth = 401
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 5
    Top = 240
    Width = 395
    Height = 71
    TabOrder = 0
    object ArrowButton1: TArrowButton
      Left = 68
      Top = 34
      Width = 33
      Height = 33
      Hint = 'Showing previous pages [PgDn]'
      ButtonColor = clTeal
      Direction = arwDOWN
      ParentShowHint = False
      ShowHint = True
      OnClick = ArrowButton1Click
    end
    object ArrowButton2: TArrowButton
      Left = -2
      Top = 33
      Width = 33
      Height = 33
      Hint = 'Showing next pages [PgUp]'
      ButtonColor = clTeal
      Direction = arwUP
      ParentShowHint = False
      ShowHint = True
      OnClick = ArrowButton2Click
    end
    object Label1: TLabel
      Left = 32
      Top = 35
      Width = 32
      Height = 13
      Caption = 'NEXT '
    end
    object Bevel1: TBevel
      Left = 65
      Top = 29
      Width = 2
      Height = 49
      Shape = bsLeftLine
      Style = bsRaised
    end
    object Label2: TLabel
      Left = 101
      Top = 36
      Width = 55
      Height = 13
      Caption = 'PREVIOUS'
    end
    object Bevel2: TBevel
      Left = 158
      Top = -5
      Width = 1
      Height = 80
      Shape = bsLeftLine
      Style = bsRaised
    end
    object SpeedButton1: TSpeedButton
      Left = 222
      Top = 10
      Width = 62
      Height = 25
      Hint = 'Printing of selection from document ['#39'P'#39' key]'
      Caption = '&Printing'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
        8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
        8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
        8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton1Click
    end
    object Bevel3: TBevel
      Left = 287
      Top = -5
      Width = 5
      Height = 77
      Shape = bsLeftLine
      Style = bsRaised
    end
    object Bevel5: TBevel
      Left = 1
      Top = 29
      Width = 157
      Height = 1
      Shape = bsTopLine
      Style = bsRaised
    end
    object Label4: TLabel
      Left = 10
      Top = 7
      Width = 66
      Height = 13
      Caption = 'Page number:'
    end
    object Label5: TLabel
      Left = 86
      Top = 6
      Width = 24
      Height = 16
      Hint = 'Actual page number'
      Color = clTeal
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object SpeedButton2: TSpeedButton
      Left = 161
      Top = 42
      Width = 59
      Height = 25
      Hint = 'Larger zoom ['#39'L'#39' key]'
      Caption = '&Larger'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33033333333333333F7F3333333333333000333333333333F777333333333333
        000333333333333F777333333333333000333333333333F77733333333333300
        033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
        33333377333777733333307F8F8F7033333337F333F337F3333377F8F9F8F773
        3333373337F3373F3333078F898F870333337F33F7FFF37F333307F99999F703
        33337F377777337F3333078F898F8703333373F337F33373333377F8F9F8F773
        333337F3373337F33333307F8F8F70333333373FF333F7333333330777770333
        333333773FF77333333333370007333333333333777333333333}
      NumGlyphs = 2
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 222
      Top = 42
      Width = 61
      Height = 25
      Hint = 'Smaller zoom ['#39'S'#39' key]'
      Caption = '&Smaller'
      Enabled = False
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33033333333333333F7F3333333333333000333333333333F777333333333333
        000333333333333F777333333333333000333333333333F77733333333333300
        033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
        333333773337777333333078F8F87033333337F3333337F33333778F8F8F8773
        333337333333373F333307F8F8F8F70333337F33FFFFF37F3333078999998703
        33337F377777337F333307F8F8F8F703333373F3333333733333778F8F8F8773
        333337F3333337F333333078F8F870333333373FF333F7333333330777770333
        333333773FF77333333333370007333333333333777333333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton3Click
    end
    object Label6: TLabel
      Left = 292
      Top = 22
      Width = 53
      Height = 13
      Caption = 'Zoom step:'
    end
    object Label7: TLabel
      Left = 355
      Top = 0
      Width = 34
      Height = 16
      Hint = 'Actual size of the zoom (double click for a value of one)'
      Color = clTeal
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnDblClick = Label7DblClick
    end
    object Label8: TLabel
      Left = 291
      Top = 2
      Width = 60
      Height = 13
      Caption = 'Zoom factor:'
    end
    object Label3: TLabel
      Left = 32
      Top = 50
      Width = 24
      Height = 13
      Caption = 'page'
    end
    object Label9: TLabel
      Left = 101
      Top = 51
      Width = 24
      Height = 13
      Caption = 'page'
    end
    object Bevel4: TBevel
      Left = 391
      Top = -8
      Width = 5
      Height = 77
      Shape = bsLeftLine
      Style = bsRaised
    end
    object BitBtn1: TBitBtn
      Left = 328
      Top = 41
      Width = 60
      Height = 24
      Hint = 'Closing this preview'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = BitBtn1Click
      Kind = bkClose
    end
    object MaskEdit1: TMaskEdit
      Left = 354
      Top = 17
      Width = 35
      Height = 21
      Hint = 'Input step size zooming'
      EditMask = '9.999;1;_'
      MaxLength = 5
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      Text = '0.100'
      OnChange = MaskEdit1Change
    end
  end
  object ScrollBox1: TScrollBox
    Left = 4
    Top = 4
    Width = 395
    Height = 234
    HorzScrollBar.Tracking = True
    VertScrollBar.Tracking = True
    TabOrder = 1
    object Image1: TImage
      Left = 0
      Top = 0
      Width = 391
      Height = 230
      Align = alClient
      OnMouseDown = Image1MouseDown
    end
  end
  object PrintDialog1: TPrintDialog
    Options = [poPageNums, poWarning]
    Left = 3
    Top = 65534
  end
end