mydialogs.dfm

themeengine6源码

object MyDialogsForm: TMyDialogsForm
  Left = 271
  Top = 184
  AutoScroll = False
  BorderIcons = [biMinimize, biMaximize]
  Caption = 'Dialogs'
  ClientHeight = 464
  ClientWidth = 578
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object TePageControl1: TTePageControl
    Left = 10
    Top = 128
    Width = 561
    Height = 329
    Anchors = [akLeft, akTop, akRight, akBottom]
    ActivePage = TeTabSheet1
    Tabs.Strings = (
      'Open'
      'Open Theme'
      'Open Picture'
      'Color'
      'Font'
      'Theme'
      'Directory')
    TabIndex = 0
    TabOrder = 0
    TabStop = True
    object TeTabSheet1: TTeTabSheet
      Caption = 'Open'
      PageIndex = 0
      object TeOpenPanel1: TTeOpenPanel
        Left = 0
        Top = 0
        Width = 555
        Height = 304
        Align = alClient
        TabOrder = 0
        FilterIndex = 0
        Options = []
      end
    end
    object TeTabSheet2: TTeTabSheet
      Caption = 'Open Theme'
      PageIndex = 1
      object TeOpenThemePanel1: TTeOpenThemePanel
        Left = 0
        Top = 0
        Width = 555
        Height = 304
        Align = alClient
        TabOrder = 0
        Filter = 
          'All (*.msstyles;*.theme;*.uskn;*.kskn;*.xskn;*.mskn)|*.msstyles;' +
          '*.theme;*.uskn;*.kskn;*.xskn;*.mskn|Microsoft msstyles (*.msstyl' +
          'es)|*.msstyles|ThemeEngine themes (*.theme)|*.theme|Uncompressed' +
          ' Skin (*.uskn)|*.uskn|Compressed Skin (*.kskn)|*.kskn|Ultra Comp' +
          'ressed Skin (*.xskn)|*.xskn|Maximum Compressed (*.mskn)|*.mskn'
        FilterIndex = 0
        Options = []
      end
    end
    object TeTabSheet3: TTeTabSheet
      Caption = 'Open Picture'
      PageIndex = 2
      object TeOpenPicturePanel1: TTeOpenPicturePanel
        Left = 0
        Top = 0
        Width = 555
        Height = 304
        Align = alClient
        TabOrder = 0
        Filter = 
          'All (*.png;*.gif;*.gif;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.p' +
          'ng;*.gif;*.gif;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf|Portable Net' +
          'work Graphics (*.png)|*.png|CompuServe GIF Image (*.gif)|*.gif|G' +
          'IF Image (*.gif)|*.gif|JPEG Image File (*.jpg)|*.jpg|JPEG Image ' +
          'File (*.jpeg)|*.jpeg|Bitmaps (*.bmp)|*.bmp|Icons (*.ico)|*.ico|E' +
          'nhanced Metafiles (*.emf)|*.emf|Metafiles (*.wmf)|*.wmf'
        FilterIndex = 0
        Options = []
      end
    end
    object TeTabSheet4: TTeTabSheet
      Caption = 'Color'
      PageIndex = 3
      object TeColorPanel1: TTeColorPanel
        Left = 0
        Top = 0
        Width = 555
        Height = 304
        Align = alClient
        Color = clBlack
        TabOrder = 0
        Options = [cdFullOpen]
      end
    end
    object TeTabSheet5: TTeTabSheet
      Caption = 'Font'
      PageIndex = 4
      object TeFontPanel1: TTeFontPanel
        Left = 0
        Top = 0
        Width = 555
        Height = 304
        Align = alClient
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Shell Dlg 2'
        Font.Style = []
        TabOrder = 0
        MinFontSize = 0
        MaxFontSize = 0
        Options = []
      end
    end
    object TeTabSheet6: TTeTabSheet
      Caption = 'Theme'
      PageIndex = 5
      object TeSelectThemePanel1: TTeSelectThemePanel
        Left = 0
        Top = 0
        Width = 555
        Height = 304
        Align = alClient
        TabOrder = 0
      end
    end
    object TeTabSheet7: TTeTabSheet
      Caption = 'Directory'
      PageIndex = 6
      object TeDirectoryPanel1: TTeDirectoryPanel
        Left = 0
        Top = 0
        Width = 555
        Height = 304
        Align = alClient
        TabOrder = 0
      end
    end
  end
  object TePanel1: TTePanel
    Left = 10
    Top = 104
    Width = 561
    Height = 15
    Anchors = [akLeft, akTop, akRight]
    Caption = 'Dialog Panels'
    TabOrder = 1
    ThemeObject = 'default'
  end
  object TeButton1: TTeButton
    Left = 10
    Top = 4
    Width = 69
    Height = 39
    OnClick = TeButton1Click
    Caption = 'Open File...'
    TabOrder = 2
    WordWrap = True
  end
  object TeButton2: TTeButton
    Left = 82
    Top = 4
    Width = 69
    Height = 39
    OnClick = TeButton2Click
    Caption = 'Open Theme...'
    TabOrder = 3
    WordWrap = True
  end
  object TeButton3: TTeButton
    Left = 156
    Top = 4
    Width = 69
    Height = 39
    OnClick = TeButton3Click
    Caption = 'Open Picture...'
    TabOrder = 4
    WordWrap = True
  end
  object TeButton4: TTeButton
    Left = 230
    Top = 4
    Width = 69
    Height = 39
    OnClick = TeButton4Click
    Caption = 'Theme...'
    TabOrder = 5
    WordWrap = True
  end
  object TeButton5: TTeButton
    Left = 304
    Top = 4
    Width = 69
    Height = 39
    OnClick = TeButton5Click
    Caption = 'Font...'
    TabOrder = 6
    WordWrap = True
  end
  object TeButton6: TTeButton
    Left = 378
    Top = 4
    Width = 69
    Height = 39
    OnClick = TeButton6Click
    Caption = 'Color...'
    TabOrder = 7
    WordWrap = True
  end
  object TeButton7: TTeButton
    Left = 452
    Top = 4
    Width = 69
    Height = 39
    OnClick = TeButton7Click
    Caption = 'Dir...'
    TabOrder = 8
    WordWrap = True
  end
  object TeButton8: TTeButton
    Left = 10
    Top = 52
    Width = 69
    Height = 39
    OnClick = TeButton8Click
    Caption = 'Printer...'
    TabOrder = 9
    WordWrap = True
  end
  object TeButton9: TTeButton
    Left = 82
    Top = 52
    Width = 69
    Height = 39
    OnClick = TeButton9Click
    Caption = 'Small Printer...'
    TabOrder = 10
    WordWrap = True
  end
  object TeButton10: TTeButton
    Left = 156
    Top = 52
    Width = 69
    Height = 39
    OnClick = TeButton10Click
    Caption = 'Printer Setup...'
    TabOrder = 11
    WordWrap = True
  end
  object TeButton11: TTeButton
    Left = 230
    Top = 52
    Width = 69
    Height = 39
    OnClick = TeButton11Click
    Caption = 'Page Setup...'
    TabOrder = 12
    WordWrap = True
  end
  object TeOpenDialog1: TTeOpenDialog
    Filter = 'All Files|*.*'
    Options = []
    Left = 32
    Top = 16
  end
  object TeOpenPictureDialog1: TTeOpenPictureDialog
    Filter = 
      'All (*.png;*.gif;*.gif;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.p' +
      'ng;*.gif;*.gif;*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf|Portable Net' +
      'work Graphics (*.png)|*.png|CompuServe GIF Image (*.gif)|*.gif|G' +
      'IF Image (*.gif)|*.gif|JPEG Image File (*.jpg)|*.jpg|JPEG Image ' +
      'File (*.jpeg)|*.jpeg|Bitmaps (*.bmp)|*.bmp|Icons (*.ico)|*.ico|E' +
      'nhanced Metafiles (*.emf)|*.emf|Metafiles (*.wmf)|*.wmf'
    Options = []
    Left = 178
    Top = 20
  end
  object TeOpenThemeDialog1: TTeOpenThemeDialog
    Filter = 
      'All (*.uskn;*.kskn;*.xskn;*.mskn;*.msstyles;*.theme)|*.uskn;*.ks' +
      'kn;*.xskn;*.mskn;*.msstyles;*.theme|Uncompressed Skin (*.uskn)|*' +
      '.uskn|Compressed Skin (*.kskn)|*.kskn|Ultra Compressed Skin (*.x' +
      'skn)|*.xskn|Maximum Compressed (*.mskn)|*.mskn|Microsoft msstyle' +
      's (*.msstyles)|*.msstyles|ThemeEngine themes (*.theme)|*.theme'
    Options = []
    Left = 108
    Top = 18
  end
  object TeSelectThemeDialog1: TTeSelectThemeDialog
    ThemeEngine = frmMain.ThemeEngine
    Left = 252
    Top = 22
  end
  object TeFontDialog1: TTeFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Options = []
    Left = 332
    Top = 22
  end
  object TeColorDialog1: TTeColorDialog
    Options = [cdFullOpen]
    Color = clBlack
    Left = 404
    Top = 22
  end
  object TeDirectoryDialog1: TTeDirectoryDialog
    Left = 476
    Top = 22
  end
  object TeForm1: TTeForm
    Gravitation.OwnedForm = False
    SystemMenuLinkMerge = False
    SystemMenuLinkMergeAtFirst = False
    Performance = ksfpNoBuffer
    Left = 209
    Top = 162
  end
  object TePrintDialog1: TTePrintDialog
    Title = 'Print'
    Left = 34
    Top = 72
  end
  object TeSmallPrinterDialog1: TTeSmallPrinterDialog
    Title = 'Print setup'
    Left = 106
    Top = 74
  end
  object TePrinterSetupDialog1: TTePrinterSetupDialog
    Title = 'Print setup'
    Left = 182
    Top = 72
  end
  object TePageSetupDialog1: TTePageSetupDialog
    MinMarginLeft = 0
    MinMarginTop = 0
    MinMarginRight = 0
    MinMarginBottom = 0
    MaxMarginLeft = 0
    MaxMarginTop = 0
    MaxMarginRight = 0
    MaxMarginBottom = 0
    MarginLeft = 0
    MarginTop = 0
    MarginRight = 0
    MarginBottom = 0
    PageWidth = 0
    PageHeight = 0
    Title = 'Page setup'
    Left = 256
    Top = 70
  end
end