smalltalk - 捕获ETOY扑克牌

我正在尝试制作包含纸牌的游戏。
我有一个BorderedMorph子类，我将其添加到所有套牌中。
我有PlayingCardDeck的子类，在其中实现了游戏套牌行为。
我没有触及子类中的所有拖放功能，当您尝试将其拖放时，会遇到相同的错误:

g:= PlayingCardDeck new.
g newDeck.
g layout: #pile.
g openInWorld.

如何修复此错误并使游戏可拖动，这样我就可以在屏幕上移动它(不仅可以通过按动滚轮)。

问题出在PlayingCardMorph中，因为当我尝试移动空甲板时，我可以做到。

最佳答案

好的，我的问题已经解决。
对我来说，解决方案是为PlayingCardMorph创建子类
并添加以下方法:

handlesMouseDown: aMouse
    ^false

希望它可以帮助任何需要它的人。