rzlabeleditor.dfm

来自「“汇华印刷v2.0”是在实践的基础上开发的一个全自动多功能信封打印系统」· DFM 代码 · 共 620 行 · 第 1/2 页

object RzLabelEditDlg: TRzLabelEditDlg
  Left = 186
  Top = 115
  BorderStyle = bsDialog
  Caption = ' - Label Editor'
  ClientHeight = 295
  ClientWidth = 539
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Verdana'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TRzLabel
    Left = 8
    Top = 13
    Width = 44
    Height = 13
    Caption = 'Caption'
    ParentColor = False
  end
  object GrpPreview: TRzGroupBox
    Left = 8
    Top = 44
    Width = 197
    Height = 205
    Caption = 'Preview'
    TabOrder = 1
    object LblPreview: TRzLabel
      Left = 3
      Top = 16
      Width = 191
      Height = 186
      Alignment = taCenter
      AutoSize = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      BevelWidth = 0
    end
  end
  object BtnOK: TRzButton
    Left = 368
    Top = 260
    Default = True
    ModalResult = 1
    Caption = 'OK'
    Color = 15791348
    HotTrack = True
    TabOrder = 2
  end
  object BtnCancel: TRzButton
    Left = 453
    Top = 260
    ModalResult = 2
    Caption = 'Cancel'
    Color = 15791348
    HotTrack = True
    TabOrder = 3
  end
  object EdtCaption: TRzEdit
    Left = 60
    Top = 9
    Width = 145
    Height = 21
    FrameVisible = True
    TabOrder = 0
    OnChange = EdtCaptionChange
  end
  object PgcFormat: TRzPageControl
    Left = 216
    Top = 8
    Width = 313
    Height = 241
    ActivePage = TabTextStyle
    ParentColor = False
    TabIndex = 0
    TabOrder = 4
    OnChanging = PgcFormatChanging
    FixedDimension = 19
    object TabTextStyle: TRzTabSheet
      Caption = 'Text Style'
      object Label2: TRzLabel
        Left = 8
        Top = 13
        Width = 24
        Height = 13
        Caption = 'Font'
        ParentColor = False
      end
      object Label3: TRzLabel
        Left = 8
        Top = 96
        Width = 31
        Height = 13
        Caption = 'Color'
        ParentColor = False
      end
      object Label6: TRzLabel
        Left = 8
        Top = 53
        Width = 24
        Height = 13
        Caption = 'Size'
        ParentColor = False
      end
      object TrkPointSize: TRzTrackBar
        Left = 44
        Top = 37
        Width = 257
        Height = 40
        Max = 18
        Position = 0
        TickStyle = tkOwnerDraw
        TrackOffset = 22
        OnChange = TrkPointSizeChange
        OnDrawTick = TrkPointSizeDrawTick
        TabOrder = 1
      end
      object GrpFontStyle: TRzGroupBox
        Left = 148
        Top = 87
        Width = 153
        Height = 61
        Caption = 'Font Style'
        ParentColor = True
        TabOrder = 3
        object ChkBold: TRzCheckBox
          Left = 9
          Top = 16
          Width = 56
          Height = 17
          Caption = 'Bold'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Verdana'
          Font.Style = [fsBold]
          HotTrack = True
          ParentFont = False
          State = cbUnchecked
          TabOrder = 0
          OnClick = ChkBoldClick
        end
        object ChkItalic: TRzCheckBox
          Left = 9
          Top = 36
          Width = 68
          Height = 17
          Caption = 'Italic'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Verdana'
          Font.Style = [fsItalic]
          HotTrack = True
          ParentFont = False
          State = cbUnchecked
          TabOrder = 1
          OnClick = ChkItalicClick
        end
        object ChkStrikeout: TRzCheckBox
          Left = 69
          Top = 16
          Width = 76
          Height = 17
          Caption = 'Strikeout'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Verdana'
          Font.Style = [fsStrikeOut]
          HotTrack = True
          ParentFont = False
          State = cbUnchecked
          TabOrder = 2
          OnClick = ChkStrikeoutClick
        end
        object ChkUnderline: TRzCheckBox
          Left = 69
          Top = 36
          Width = 76
          Height = 17
          Caption = 'Underline'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Verdana'
          Font.Style = [fsUnderline]
          HotTrack = True
          ParentFont = False
          State = cbUnchecked
          TabOrder = 3
          OnClick = ChkUnderlineClick
        end
      end
      object CbxFonts: TRzFontComboBox
        Left = 44
        Top = 9
        Width = 257
        Height = 22
        PreviewText = 'AaBbYyZz'
        ShowStyle = ssFontPreview
        Ctl3D = False
        FrameVisible = True
        ItemHeight = 16
        ParentCtl3D = False
        TabOrder = 0
        OnChange = CbxFontsChange
      end
      object GrpTextStyle: TRzRadioGroup
        Left = 8
        Top = 156
        Width = 293
        Height = 41
        Caption = 'Text Style'
        Columns = 4
        ItemHotTrack = True
        ItemIndex = 0
        Items.Strings = (
          'Normal'
          'Raised'
          'Recessed'
          'Shadow')
        ParentColor = True
        TabOrder = 4
        VerticalSpacing = 0
        OnClick = GrpTextStyleClick
      end
      object ChkLightStyle: TRzCheckBox
        Left = 8
        Top = 200
        Width = 83
        Height = 17
        Caption = 'Light Style'
        HotTrack = True
        State = cbUnchecked
        TabOrder = 5
        OnClick = ChkLightStyleClick
      end
      object EdtFontColor: TRzColorEdit
        Left = 44
        Top = 92
        Width = 97
        Height = 21
        CustomColors = RzCustomColors1
        DefaultColor = clWindowText
        SelectedColor = clWindowText
        ShowCustomColor = True
        ShowDefaultColor = True
        ShowSystemColors = True
        FlatButtons = True
        FrameVisible = True
        TabOrder = 2
        OnChange = EdtFontColorChange
      end
    end
    object TabOptions: TRzTabSheet
      Caption = 'Options'
      object GrpShadow: TRzGroupBox
        Left = 8
        Top = 8
        Width = 293
        Height = 101
        Caption = 'Options'
        ParentColor = True
        TabOrder = 0
        object Label4: TRzLabel
          Left = 8
          Top = 58
          Width = 80
          Height = 13
          Caption = 'Shadow Color'
          ParentColor = False
        end
        object Label5: TRzLabel
          Left = 160
          Top = 16
          Width = 83
          Height = 13
          Alignment = taCenter
          Caption = 'Shadow Depth'
          ParentColor = False
          WordWrap = True
        end
        object Label7: TRzLabel
          Left = 8
          Top = 16
          Width = 84
          Height = 13
          Caption = 'Highlight Color'
          ParentColor = False
        end
        object LblShadowDepth: TRzLabel
          Left = 212
          Top = 76
          Width = 14
          Height = 13
          Alignment = taCenter
          Caption = '00'