RACKET 如何创建计分器?

RACKET How do I create a score counter?

我需要在 Racket 中为我的俄罗斯方块游戏项目创建一个计分器,但我被卡住了...我需要计算 +100、+250、+400 或 +600,具体取决于是一、二、三还是四行被删除。对我来说主要的问题是我不知道我应该在什么 class% 中做它。结果应该是这样的:

我已经完成了其他部分,只有分数 window 丢失了。关于如何创建它的唯一想法是使用一个按钮,您可以单击该按钮并更新乐谱。该按钮的回调过程如下所示:

[callback (lambda (button event)
               (cond
                 ((eq? delete-row 1) (send *score-button* set-label (+ (send *score-button* get-label) 100)))
                 ((eq? delete-row 2) (send *score-button* set-label (+ (send *score-button* get-label) 250)))
                 ((eq? delete-row 3) (send *score-button* set-label (+ (send *score-button* get-label) 400)))
                 ((eq? delete-row 4) (send *score-button* set-label (+ (send *score-button* get-label) 600)))
                 ))]

delete-row 是在行被填充时处理行的过程(代码中未提及)。但是,我不确定它是否有效并且感觉很不专业,宁愿以其他方式进行...

有人知道我如何创建这个计分器吗?感谢所有回答!

此页面显示各种类型的 GUI 元素:

http://docs.racket-lang.org/gui/Widget_Gallery.html?q=text%25

是你想要的message%吗?