iup_fill.e 2.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475
  1. class IUP_FILL
  2. -- Creates void element, which dynamically occupies empty spaces
  3. -- always trying to expand itself. Its parent should be an IUP_HBOX, an IUP_VBOX
  4. -- or a IUP_GRIDBOX, or else this type of expansion will not work. If an EXPAND
  5. -- is set on at least one of the other children of the box, then the fill
  6. -- expansion is ignored.
  7. --
  8. -- EXPAND: If User size is not defined, then when inside a
  9. -- IUP_HBOX/IUP_GRID_BOX EXPAND is HORIZONTAL, when inside a IupVbox EXPAND is
  10. -- VERTICAL. If User size is defined then EXPAND is NO.
  11. inherit
  12. IUP_CONTAINER
  13. IUP_WIDGET_EXPAND
  14. IUP_WIDGET_WID
  15. IUP_WIDGET_SIZE
  16. IUP_WIDGET_RASTERSIZE
  17. IUP_WIDGET_USERSIZE
  18. IUP_WIDGET_FONT
  19. IUP_WIDGET_POSITION
  20. IUP_WIDGET_MAXMIN_SIZE
  21. IUP_WIDGET_CHILD
  22. IUP_WIDGET_NAME
  23. create {ANY}
  24. fill
  25. feature {ANY}
  26. fill
  27. -- Create a new fill.
  28. local
  29. a_fill: POINTER
  30. do
  31. a_fill := int_fill
  32. set_widget(a_fill)
  33. end
  34. feature {}
  35. -- Internals
  36. int_fill: POINTER
  37. external "plug_in"
  38. alias "{
  39. location: "${sys}/plugins"
  40. module_name: "iup"
  41. feature_name: "IupFill()"
  42. }"
  43. end
  44. end -- class IUP_FILL
  45. -- The MIT License (MIT)
  46. -- Copyright (c) 2016, 2017 by German A. Arias
  47. -- Permission is hereby granted, free of charge, to any person obtaining a copy
  48. -- of this software and associated documentation files (the "Software"), to deal
  49. -- in the Software without restriction, including without limitation the rights
  50. -- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  51. -- copies of the Software, and to permit persons to whom the Software is
  52. -- furnished to do so, subject to the following conditions:
  53. --
  54. -- The above copyright notice and this permission notice shall be included in
  55. -- all copies or substantial portions of the Software.
  56. --
  57. -- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  58. -- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  59. -- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  60. -- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  61. -- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  62. -- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  63. -- SOFTWARE.