CreateDirectory.dfm 2.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123
  1. object CreateDirectoryDialog: TCreateDirectoryDialog
  2. Left = 408
  3. Top = 195
  4. HelpType = htKeyword
  5. HelpKeyword = 'ui_create_directory'
  6. BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  7. BorderStyle = bsDialog
  8. Caption = 'Create folder'
  9. ClientHeight = 253
  10. ClientWidth = 337
  11. Color = clBtnFace
  12. ParentFont = True
  13. OldCreateOrder = True
  14. Position = poOwnerFormCenter
  15. OnCloseQuery = FormCloseQuery
  16. OnShow = FormShow
  17. DesignSize = (
  18. 337
  19. 253)
  20. PixelsPerInch = 96
  21. TextHeight = 13
  22. object EditLabel: TLabel
  23. Left = 8
  24. Top = 8
  25. Width = 85
  26. Height = 13
  27. Caption = 'New &folder name:'
  28. FocusControl = DirectoryEdit
  29. end
  30. object DirectoryEdit: TEdit
  31. Left = 8
  32. Top = 25
  33. Width = 321
  34. Height = 21
  35. Anchors = [akLeft, akTop, akRight]
  36. MaxLength = 1000
  37. TabOrder = 0
  38. Text = 'DirectoryEdit'
  39. OnChange = DirectoryEditChange
  40. end
  41. object MorePanel: TPanel
  42. Left = 0
  43. Top = 50
  44. Width = 337
  45. Height = 169
  46. Anchors = [akLeft, akTop, akRight, akBottom]
  47. BevelOuter = bvNone
  48. TabOrder = 1
  49. DesignSize = (
  50. 337
  51. 169)
  52. object AttributesGroup: TGroupBox
  53. Left = 8
  54. Top = 3
  55. Width = 322
  56. Height = 157
  57. Anchors = [akLeft, akTop, akRight, akBottom]
  58. Caption = 'Attributes'
  59. TabOrder = 0
  60. inline RightsFrame: TRightsFrame
  61. Left = 7
  62. Top = 36
  63. Width = 239
  64. Height = 87
  65. TabOrder = 1
  66. inherited DirectoriesXCheck: TCheckBox
  67. Visible = False
  68. end
  69. end
  70. object SetRightsCheck: TCheckBox
  71. Left = 12
  72. Top = 16
  73. Width = 156
  74. Height = 17
  75. Caption = 'Set pe&rmissions'
  76. ParentShowHint = False
  77. ShowHint = True
  78. TabOrder = 0
  79. OnClick = ControlChange
  80. end
  81. object SaveSettingsCheck: TCheckBox
  82. Left = 12
  83. Top = 129
  84. Width = 301
  85. Height = 17
  86. Caption = 'Use &same settings next time'
  87. TabOrder = 2
  88. end
  89. end
  90. end
  91. object OKBtn: TButton
  92. Left = 91
  93. Top = 219
  94. Width = 75
  95. Height = 25
  96. Anchors = [akRight, akBottom]
  97. Caption = 'OK'
  98. Default = True
  99. ModalResult = 1
  100. TabOrder = 2
  101. end
  102. object CancelBtn: TButton
  103. Left = 171
  104. Top = 219
  105. Width = 75
  106. Height = 25
  107. Anchors = [akRight, akBottom]
  108. Cancel = True
  109. Caption = 'Cancel'
  110. ModalResult = 2
  111. TabOrder = 3
  112. end
  113. object HelpButton: TButton
  114. Left = 252
  115. Top = 219
  116. Width = 75
  117. Height = 25
  118. Anchors = [akRight, akBottom]
  119. Caption = '&Help'
  120. TabOrder = 4
  121. OnClick = HelpButtonClick
  122. end
  123. end