CreateDirectory.dfm 2.7 KB

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