Method: Tk::Tile::Style.element_create_vsapi

Defined in:
lib/tkextlib/tile/style.rb

.element_create_vsapi(name, class_name, part_id, *args) ⇒ Object 



285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
 
# File 'lib/tkextlib/tile/style.rb', line 285

def element_create_vsapi(name, class_name, part_id, *args)
  # supported on Tcl/Tk 8.6 or later

  # argument check
  if (state_map = args.shift || None)
    if state_map.kind_of?(Hash)
      opts = _symbolkey2str(state_map)
      state_map = None
    end
  end
  opts = args.shift || None
  fail ArgumentError, "too many arguments" unless args.empty?

  # define a Microsoft Visual Styles element
  tk_call(TkCommandNames[0], 'element', 'create', name, 'vsapi',
          class_name, part_id, state_map, opts)
end