def BindTkRenderWidget
??
self.bind("ButtonPress"){|e,s| s||s=self; s.StartMotion(e.x,e.y) }
self.bind("ButtonRelease"){|e,s| s||s=self; s.EndMotion(e.x,e.y) }
self.bind("B1-Motion"){|e,s| s||s=self; s.Rotate(e.x,e.y) }
self.bind("B2-Motion"){|e,s| s||s=self; s.Pan(e.x,e.y) }
self.bind("B3-Motion"){|e,s| s||s=self; s.Zoom(e.x,e.y) }
self.bind("Shift-B1-Motion"){|e,s| s||s=self; s.Pan(e.x,e.y) }
self.bind("KeyPress-r"){|e,s| s||s=self; s.Reset(e.x,e.y) }
self.bind("KeyPress-u"){|e,s| s||s=self; s.deiconify }
self.bind("KeyPress-w"){|e,s| s||s=self; s.Wireframe }
self.bind("KeyPress-s"){|e,s| s||s=self; s.Surface }
self.bind("KeyPress-p"){|e,s| s||s=self; s.PickActor(e.x,e.y) }
if @FocusOnEnter
self.bind("Enter"){|e,s| s||s=self; s.Enter(e.x,e.y) }
self.bind("Leave"){|e,s| s||s=self; s.Leave(e.x,e.y) }
else
self.bind("ButtonPress"){|e,s| s||s=self; s.Enter(e.x,e.y) }
self.bind("Expose"){|e,s| s||s=self; s.Expose }
end
end