property ancestor,pAncName,pHelpText

on beginSprite me
  set the ancestor of me to new(script pAncName)
  set the pSprite of me to the spriteNum of me
  mInitSprite(ancestor,pHelpText)
end beginSprite

---

on getPropertyDescriptionList
  set p_list = [#pAncName: [ #comment:"Ancestor Script:", #format:#string, #default:"SingleButton"],
                #pHelpText: [ #comment:"Der Hilfe-Text:", #format:#string, #default:"kein Hilfetext"]]
  
  return p_list  
end getPropertyDescriptionList


on getBehaviorDescription
  return "Default Handler fuer alle Sprite-Buttons mit Rollover- und Hilfe-Funktion"
end getBehaviorDescription
