Would you implement one Action handler for all BevelButtons

Sub HandleAction(b As Bevelbutton)
  Select case b.Name
  Case "showTextButton"
    dim e as EditField = GetEditField(b.Window,"EditField1")
    MsgBox e.Text
  Case "bigRedButton"
    MsgBox "Don't touch that button"
  Case else
    speak "Bevelbutton " + b.Name + " unimplemented"
  End Select
End Sub

Or have one handler for each event?


--
Steve Garman
Using REALbasic 2006r2 Professional on Windows XP Pro


_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to