Chip 1999 Extra/Chip_Extra_1999.iso/share/free/slash/slash.exe/Slash.exe/0/RCDATA/TPTFRMOPENDLG/TPTFRMOPENDLG.txt

Text File | 1999-07-25 | 10.3 KB | 369 lines

object PTFrmOpenDlg: TPTFrmOpenDlg
  Left = 565
  Top = 448
  ActiveControl = FileNameEdt
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Open'
  ClientHeight = 265
  ClientWidth = 451
  Color = clBtnFace
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  ShowHint = True
  OnCloseQuery = FormCloseQuery
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object LookInTxt: TLabel
    Left = 8
    Top = 8
    Width = 38
    Height = 13
    Caption = 'Look &in:'
    FocusControl = PTShellCombo1
  end
  object UpOneLevelBtn: TSpeedButton
    Left = 304
    Top = 4
    Width = 23
    Height = 22
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
      2222222222222222222200000000000000020FBFBFBFBFBFBF020BFBFBFBFBFB
      FB020FBFB000000FBF020BFBF0FBFBFBFB020FBFB0BFBFBFBF020BF00000FBFB
      FB020FBF000FBFBFBF020BFBF0FBFBFBFB020FBFBFBFBFBFBF02000000000000
      002220BFBFB02222222222000002222222222222222222222222}
    OnClick = UpOneLevelBtnClick
  end
  object ListBtn: TSpeedButton
    Tag = 2
    Left = 400
    Top = 4
    Width = 23
    Height = 22
    GroupIndex = 1
    Down = True
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
      22222FFF22222FFF22224442222244422222888F2FFF888F2FFF4F4200024F42
      00028F8288828F82888244222222442222228822222288222222222222222222
      2222222222222222222222222222222222222FFF22222FFF2222444222224442
      2222888F2FFF888F2FFF4F4200024F4200028F8288828F828882442222224422
      2222882222228822222222222222222222222222222222222222222222222222
      22222FFF22222FFF22224442222244422222888F2FFF888F2FFF4F4200024F42
      00028F8288828F82888244222222442222228822222288222222222222222222
      2222222222222222222222222222222222222222222222222222}
    NumGlyphs = 2
    OnClick = ViewBtnClick
  end
  object DetailsBtn: TSpeedButton
    Tag = 3
    Left = 423
    Top = 4
    Width = 23
    Height = 22
    GroupIndex = 1
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222F22FFFF2FFF2FFF42200002000200028228888288828882222222222222
      22222FFFFFFFFFFFFFFF44444444444444448888888888888888222222222222
      22222222FFFF2FFF2FFF22200002000200022228888288828882222222222222
      2222222222222222222222222222222222222222222222222222}
    NumGlyphs = 2
    OnClick = ViewBtnClick
  end
  object CreateNewFolderBtn: TSpeedButton
    Left = 336
    Top = 4
    Width = 23
    Height = 22
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333FFFFFFFFFFF3330000000000033333388888888888F3330BFBFBFBFB0
      33333383333333338F3330FBFBFBFBF033333383333333338F3330BFBFBFBFB0
      33333383333333338F3330FBFBFBFBF033033383333333338F3830BFBFBFBFB0
      30333383333333338F8F30FBFBFBFBF0033333833333333388F3300000000003
      3030338888888888338F330BFBF03303033333383333833838F3333000033030
      30333333888833838F8F33333333033333033333333338F33338333333333330
      33333333333333338F3333333333333333333333333333333333333333333330
      33333333333333338F3333333333333333333333333333333333}
    NumGlyphs = 2
    OnClick = CreateNewFolderBtnClick
  end
  object ShowTreeBtn: TSpeedButton
    Left = 368
    Top = 4
    Width = 23
    Height = 23
    AllowAllUp = True
    GroupIndex = 2
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333300033333333300030F03333333330333000333333333033333333
      00033330333300030F0333303333033300033330333333333333333033300033
      333333300030F033333333303330003333333333333333333333330003333333
      3333330F03333333333333000333333333333333333333333333}
    OnClick = ShowTreeBtnClick
  end
  object PTShellCombo1: TPTShellCombo
    Left = 72
    Top = 4
    Width = 221
    Height = 22
    HelpContext = 28456
    ShellList = PTShellList1
    Options = [ptscoAutofill]
    DropDownCount = 16
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 0
    Top = 181
    Width = 451
    Height = 84
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 2
    object FileNameTxt: TLabel
      Left = 8
      Top = 10
      Width = 48
      Height = 13
      Caption = 'File &name:'
      FocusControl = FileNameEdt
    end
    object FilesOfTypeTxt: TLabel
      Left = 8
      Top = 38
      Width = 59
      Height = 13
      Caption = 'Files of &type:'
      FocusControl = FileTypesCbx
    end
    object FileNameEdt: TEdit
      Left = 88
      Top = 6
      Width = 277
      Height = 21
      TabOrder = 0
      OnChange = FileNameEdtChange
    end
    object FileNameCbx: TComboBox
      Left = 88
      Top = 6
      Width = 277
      Height = 21
      TabStop = False
      ItemHeight = 13
      TabOrder = 4
      Visible = False
    end
    object FileTypesCbx: TPTCombobox
      Left = 88
      Top = 34
      Width = 277
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 1
      OnSelEndOk = FileTypesCbxSelEndOk
    end
    object OpenBtn: TButton
      Left = 372
      Top = 4
      Width = 75
      Height = 23
      HelpContext = 28529
      Caption = '&Open'
      Default = True
      ModalResult = 1
      TabOrder = 2
    end
    object CancelBtn: TButton
      Left = 372
      Top = 32
      Width = 75
      Height = 23
      HelpContext = 28444
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 3
    end
    object ReadOnlyChk: TCheckBox
      Left = 88
      Top = 60
      Width = 233
      Height = 17
      Caption = 'Open as &read-only'
      TabOrder = 5
      OnClick = ReadOnlyChkClick
    end
    object HelpBtn: TButton
      Left = 372
      Top = 60
      Width = 75
      Height = 23
      Caption = '&Help'
      TabOrder = 6
      Visible = False
      OnClick = HelpBtnClick
    end
  end
  object SplitterContainer: TPTGroup
    Left = 2
    Top = 30
    Width = 447
    Height = 153
    FrameStyle = ptfsNone
    TabOrder = 1
    object PTSplitter1: TPTSplitter
      Left = 0
      Top = 0
      Width = 447
      Height = 153
      Align = alClient
      Color = clBtnFace
      ParentColor = False
      Position = 141
      SplitterWidth = 5
      TabOrder = 0
      object PTSplitter1_pane1: TPTPane
        Left = 0
        Top = 0
        Width = 141
        Height = 153
        TabOrder = 0
        MinSize = 4
        Index = 0
        object PTShellTree1: TPTShellTree
          Left = 0
          Top = 0
          Width = 137
          Height = 149
          Options = [ptstoAutoFill, ptstoDefaultKeyHandling, ptstoContextMenus, ptstoDynamicRefresh]
          BorderStyle = bsNone
          ShowRoot = False
          DragMode = dmAutomatic
          HideSelection = False
          Indent = 19
          OnChange = PTShellTree1Change
          Align = alClient
          ParentColor = False
          TabOrder = 0
        end
      end
      object PTSplitter1_pane2: TPTPane
        Left = 146
        Top = 0
        Width = 301
        Height = 153
        TabOrder = 1
        MinSize = 60
        Index = 1
        object PTShellList1: TPTShellList
          Left = 0
          Top = 0
          Width = 297
          Height = 149
          HelpContext = 28549
          Options = [ptsloAutoFill, ptsloDefaultKeyHandling, ptsloContextMenus, ptsloDynamicRefresh]
          OnFolderChanged = PTShellList1FolderChanged
          Align = alClient
          BorderStyle = bsNone
          ReadOnly = False
          HideSelection = False
          IconOptions.AutoArrange = True
          OnChange = PTShellList1Change
          PopupMenu = LvPopup
          TabOrder = 0
          ViewStyle = vsList
        end
      end
    end
  end
  object LvPopup: TPopupMenu
    Left = 384
    Top = 48
    object View1Mitm: TMenuItem
      Caption = '&View'
      object LargeIcons1Mitm: TMenuItem
        Caption = 'Lar&ge icons'
        Enabled = False
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object Smallicons1MItm: TMenuItem
        Tag = 1
        Caption = 'S&mall icons'
        Enabled = False
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object List1Mitm: TMenuItem
        Tag = 2
        Caption = '&List'
        Checked = True
        RadioItem = True
        OnClick = ViewBtnClick
      end
      object Details1Mitm: TMenuItem
        Tag = 3
        Caption = '&Details'
        RadioItem = True
        OnClick = ViewBtnClick
      end
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Paste1Mitm: TMenuItem
      Caption = '&Paste'
      OnClick = Paste1MitmClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object New1Mitm: TMenuItem
      Caption = 'Ne&w'
      object Folder1Mitm: TMenuItem
        Caption = '&Folder'
        OnClick = CreateNewFolderBtnClick
      end
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object Properties1Mitm: TMenuItem
      Caption = 'P&roperties'
      OnClick = Properties1MitmClick
    end
  end
end