讓一個下降的變形捕捉到一個網格（Cuis Smalltalk）

Question

我需要在Cuis中更改哪種方法，類PasteUpMorph要讓一個丟棄的變形捕捉到10×10像素的網格？

Answer 1

打開方法查找器：世界/打開/消息名稱 在文本框中輸入「drop」。點擊（搜索）。 顯示的第一條消息是#acceptDroppingMorph：event：我們很幸運！ 在PasteUpMorph實施的末尾添加：

p := aMorph morphPosition. 
p := (p x roundTo: 10) @ (p y roundTo: 10). 
aMorph morphPosition: p. 

就是這樣。也許不是你想要使用你自己的變體的世界，那麼你可以添加一個DragAndDropAreaMorph給世界，並且它增加了這個方法：

acceptDroppingMorph: aMorph event: evt 
    | p | 
    super 
     acceptDroppingMorph: aMorph 
     event: evt. 
    p := aMorph morphPosition. 
    p := (p x roundTo: 10) @ (p y roundTo: 10). 
    aMorph morphPosition: p