eclistframeunit.lfm 1.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566
  1. object ECListFrame: TECListFrame
  2. Left = 0
  3. Height = 320
  4. Top = 0
  5. Width = 611
  6. ClientHeight = 320
  7. ClientWidth = 611
  8. TabOrder = 0
  9. DesignLeft = 475
  10. DesignTop = 342
  11. object EcListBox: TListBox
  12. Left = 0
  13. Height = 320
  14. Top = 0
  15. Width = 611
  16. Align = alClient
  17. ClickOnSelChange = False
  18. ItemHeight = 20
  19. MultiSelect = True
  20. OnClick = EcListBoxClick
  21. OnDblClick = EcListBoxDblClick
  22. OnDrawItem = EcListBoxDrawItem
  23. OnMouseUp = EcListBoxMouseUp
  24. OnSelectionChange = EcListBoxSelectionChange
  25. Options = []
  26. ScrollWidth = 609
  27. Style = lbOwnerDrawFixed
  28. TabOrder = 0
  29. end
  30. object EcListPopupMenu: TPopupMenu
  31. left = 136
  32. top = 80
  33. object EditEcMenuItem: TMenuItem
  34. Caption = 'Edit...'
  35. OnClick = EditEcMenuItemClick
  36. end
  37. object AddNewEcMenuItem: TMenuItem
  38. Caption = 'Add new command...'
  39. OnClick = AddNewEcMenuItemClick
  40. end
  41. object EcListSeparator1MenuItem: TMenuItem
  42. Caption = '-'
  43. end
  44. object CutEcMenuItem: TMenuItem
  45. Caption = 'Cut'
  46. end
  47. object CopyEcMenuItem: TMenuItem
  48. Caption = 'Copy'
  49. OnClick = CopyEcMenuItemClick
  50. end
  51. object PasteEcMenuItem: TMenuItem
  52. Caption = 'Paste'
  53. OnClick = PasteEcMenuItemClick
  54. end
  55. object DeleteEcMenuItem: TMenuItem
  56. Caption = 'Delete'
  57. end
  58. object EcListSeparator2MenuItem: TMenuItem
  59. Caption = '-'
  60. end
  61. object SelectAllEcsMenuItem: TMenuItem
  62. Caption = 'Select all'
  63. end
  64. end
  65. end