diff options
Diffstat (limited to 'lib/efl/evas.rb')
| -rw-r--r-- | lib/efl/evas.rb | 43 |
1 files changed, 39 insertions, 4 deletions
diff --git a/lib/efl/evas.rb b/lib/efl/evas.rb index a0067e7..ff0f3bc 100644 --- a/lib/efl/evas.rb +++ b/lib/efl/evas.rb @@ -72,10 +72,21 @@ module Efl @ptr=nil end def object_add t - # TODO should return Objects - r = Evas::REvasObject.new Native.send "evas_object_#{t.to_s}_add", @ptr - yield r if block_given? - r + ts = t.to_s + o = ( + case ts + when 'rectangle' + Evas::REvasRectangle.new Native.evas_object_rectangle_add @ptr + when 'line' + Evas::REvasLine.new Native.evas_object_line_add @ptr + when 'polygon' + Evas::REvasPolygon.new Native.evas_object_polygon_add @ptr + else + raise NameError.new "unknown or not implemented yet evas_object type #{ts}" + end + ) + yield o if block_given? + o end def output_size_get x = FFI::MemoryPointer.new :int @@ -238,6 +249,30 @@ module Efl end alias :data :data_get end + # + class REvasRectangle < REvasObject + end + # + class REvasLine < REvasObject + # + search_prefixes 'evas_object_line_' + # + def line_xy_get + x1 = FFI::MemoryPointer.new :int + y1 = FFI::MemoryPointer.new :int + x2 = FFI::MemoryPointer.new :int + y2 = FFI::MemoryPointer.new :int + Native.evas_object_line_xy_get @ptr, x1, y1, x2, y2 + [ x1.read_int, y1.read_int, x2.read_int, y2.read_int ] + end + end + # + class REvasPolygon < REvasObject + # + search_prefixes 'evas_object_polygon_' + # + end + # end end # |