FolderSelect.dfm 1.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263
  1. object FolderSel: TFolderSel
  2. Left = 245
  3. Top = 108
  4. BorderStyle = bsDialog
  5. Caption = 'Folder selection'
  6. ClientHeight = 341
  7. ClientWidth = 317
  8. Color = clBtnFace
  9. ParentFont = True
  10. OldCreateOrder = True
  11. Position = poScreenCenter
  12. PixelsPerInch = 96
  13. TextHeight = 13
  14. object Bevel1: TBevel
  15. Left = 8
  16. Top = 8
  17. Width = 297
  18. Height = 161
  19. Shape = bsFrame
  20. end
  21. object Label1: TLabel
  22. Left = 120
  23. Top = 16
  24. Width = 64
  25. Height = 13
  26. Caption = 'Select folder:'
  27. end
  28. object OKBtn: TButton
  29. Left = 79
  30. Top = 308
  31. Width = 75
  32. Height = 25
  33. Caption = 'OK'
  34. Default = True
  35. ModalResult = 1
  36. TabOrder = 0
  37. end
  38. object CancelBtn: TButton
  39. Left = 159
  40. Top = 308
  41. Width = 75
  42. Height = 25
  43. Cancel = True
  44. Caption = 'Cancel'
  45. ModalResult = 2
  46. TabOrder = 1
  47. end
  48. object ShellView: TShellTreeView
  49. Left = 16
  50. Top = 32
  51. Width = 281
  52. Height = 265
  53. ObjectTypes = [otFolders]
  54. Root = 'rfDesktop'
  55. UseShellImages = True
  56. AutoRefresh = False
  57. Indent = 19
  58. ParentColor = False
  59. RightClickSelect = True
  60. ShowRoot = False
  61. TabOrder = 2
  62. end
  63. end