All Holidays: Clip Art & Fonts (Deluxe Edition)/727ahcap_jjp.iso/HOL32/chrclip/VIEWER32.EXE/0/RCDATA/TTHUMBNAILFORM/TTHUMBNAILFORM.txt

Text File | 1997-08-21 | 6KB | 258 lines

object ThumbnailForm: TThumbnailForm
  Left = 490
  Top = 267
  Width = 450
  Height = 417
  Caption = 'Cosmi File Viewer'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Menu = MainMenu
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter: TOvcSplitter
    Left = 0
    Top = 0
    Width = 442
    Height = 331
    AutoUpdate = True
    Position = 230
    Align = alClient
    ParentCtl3D = False
    object TOvcSection
      Tag = 1
      object DirPanel: TPanel
        Left = 0
        Top = 0
        Width = 227
        Height = 328
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        OnResize = DirPanelResize
        object DLabel: TLabel
          Left = 8
          Top = 8
          Width = 45
          Height = 13
          Caption = '&Directory:'
          FocusControl = Directories
        end
        object LDrives: TLabel
          Left = 8
          Top = 208
          Width = 33
          Height = 13
          Caption = 'D&rives:'
          FocusControl = Drives
        end
        object LDirectoryName: TLabel
          Left = 8
          Top = 248
          Width = 169
          Height = 13
          AutoSize = False
          Caption = 'C:\Develop\COSMI\Viewer'
        end
        object Directories: TDirectoryListBox
          Left = 8
          Top = 24
          Width = 193
          Height = 180
          DirLabel = LDirectoryName
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 0
          OnChange = DirectoriesChange
        end
        object Drives: TDriveComboBox
          Left = 8
          Top = 224
          Width = 169
          Height = 19
          DirList = Directories
          TabOrder = 1
        end
      end
    end
    object TOvcSection
      Tag = 2
      object ViewerPanel: TPanel
        Left = 0
        Top = 0
        Width = 206
        Height = 328
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        OnResize = ViewerPanelResize
        object LFiles: TLabel
          Left = 8
          Top = 8
          Width = 24
          Height = 13
          Caption = 'Fi&les:'
          FocusControl = Files
        end
        object LFileNamePrompt: TLabel
          Left = 8
          Top = 248
          Width = 48
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'File name:'
        end
        object LFileSizePrompt: TLabel
          Left = 8
          Top = 264
          Width = 48
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'File size:'
        end
        object LFileName: TLabel
          Left = 60
          Top = 248
          Width = 117
          Height = 13
          AutoSize = False
        end
        object LFileSize: TLabel
          Left = 60
          Top = 264
          Width = 117
          Height = 13
          AutoSize = False
        end
        object Files: TDragListBox
          Left = 8
          Top = 24
          Width = 169
          Height = 220
          TabStop = True
          Columns = 1
          DragEnabled = False
          ExtendedSelect = True
          ItemHeight = 64
          MultiSelect = False
          ReadOnly = False
          Sorted = True
          Style = lbOwnerDrawFixed
          TabOrder = 0
          OnClick = FilesClick
          OnDblClick = FilesDblClick
          OnDrawItem = FilesDrawItem
          OnMoveOverItem = FilesMoveOverItem
        end
      end
    end
  end
  object BottomPanel: TPanel
    Left = 0
    Top = 331
    Width = 442
    Height = 40
    Align = alBottom
    BevelOuter = bvNone
    BorderStyle = bsSingle
    TabOrder = 1
    object AutoPlay: TCheckBox
      Left = 8
      Top = 9
      Width = 113
      Height = 17
      Caption = 'Autoplay multimedia'
      State = cbChecked
      TabOrder = 0
      OnClick = AutoPlayClick
    end
    object MediaPlayer: TMediaPlayer
      Left = 148
      Top = 2
      Width = 29
      Height = 30
      VisibleButtons = []
      Visible = False
      TabOrder = 1
    end
    object OK: TBitBtn
      Left = 242
      Top = 4
      Width = 77
      Height = 27
      Enabled = False
      TabOrder = 2
      Visible = False
      Kind = bkOK
    end
    object Cancel: TBitBtn
      Left = 346
      Top = 4
      Width = 77
      Height = 27
      TabOrder = 3
      Visible = False
      Kind = bkCancel
    end
  end
  object MainMenu: TMainMenu
    Left = 385
    Top = 8
    object MFile: TMenuItem
      Caption = '&File'
      object MCopy: TMenuItem
        Caption = '&Copy to clipboard'
        Enabled = False
        ShortCut = 16451
        OnClick = MCopyClick
      end
      object MExit: TMenuItem
        Caption = 'E&xit'
        ShortCut = 16472
        OnClick = MExitClick
      end
    end
    object MHelp: TMenuItem
      Caption = '&Help'
      object MContents: TMenuItem
        Caption = '&Contents'
        ShortCut = 112
        OnClick = MContentsClick
      end
      object MHelpOnHelp: TMenuItem
        Caption = '&How to Use Help'
        OnClick = MHelpOnHelpClick
      end
    end
  end
  object OvcController: TOvcController
    EntryCommands.TableList = (
      'Default'
      True
      ()
      'WordStar'
      False
      ()
      'Grid'
      False
      ())
    Left = 385
    Top = 59
  end
end