Method: AGTkFrame#rewind_by_property

Defined in:
ext/ae-rad/lib/tk/al-tk.rb

#rewind_by_property(_name, _val) ⇒ Object



2604
2605
2606
2607
2608
2609
2610
2611
2612
2613
2614
2615
2616
2617
2618
2619
2620
2621
# File 'ext/ae-rad/lib/tk/al-tk.rb', line 2604

def rewind_by_property(_name, _val)
   msg = "To modify "+_name+" must create new Toplevel: do you want to procede ?"
   if Tk.messageBox('icon' => 'warning', 'type' => 'okcancel',
     'title' => '(Arcadia) '+_name, 'message' => msg) == 'cancel'
     return
   end
   _rewind_code = @renderer.class_code(2,_name=> _val).to_s
   begin
     Tk.messageBox('message'=>_rewind_code)
     #@object_inspector.delete(self)
     #Revparsel.new(_rewind_code)
     
   rescue => exc
     _editor = $arcadia.objects('editor').open_tab(@i_name)
     _editor.text_insert('end', _rewind_code)
     raise
   end 
end