注册 登录
编程论坛 Delphi论坛

初学DELPHI 的onMouseDown问题

ASHEN1993 发布于 2006-11-19 16:35, 1254 次点击


请各位高手牛刀杀鸡:

FORM中有一个TEdit和两个Tbutton, 在Button1的onMouseDown中加入以下代码:

case Button of
mbLeft:Edit1.Text:='按下左键';
mbMiddle:Edit1.Text:='按下中键';
mbRight:Edit1.Text:='按下右键';

end;

编译结果显示:
[Error] Unit1.pas(38): ';' expected but '.' found
[Error] Unit1.pas(40): Declaration expected but end of file found
[Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit1.pas'
为什么?如何解决?

非常谢谢!

[此贴子已经被作者于2006-11-19 16:37:05编辑过]

3 回复
#2
豆豆猫猫2006-11-24 16:06
你是不是少写了一个end啊?
#3
菜鸟上路2006-11-25 23:12
Button是什么类型啊
#4
nongen2006-11-29 12:36
Button是集合
1