清除按钮

tinachen0505 · 发表于 2012-7-16 20:05:51

各位大虾，小女正在学习Lazarus，以下是有关清除按钮的代码，也就是按Button2，会自动清除edit1里面的内容，不知哪里出问题了，请赐教！谢谢！
Procedure TForm1.Button2Click(Sender:TObject);
begin
edit1.Text:=";
end;
错误提示edit1.Text:=";不符合标准，请问该如何纠正呢？

猫工 · 发表于 2012-7-16 20:55:12

女码工

猫工 · 发表于 2012-7-16 20:58:45

没发现你的代码有问题啊...

猫工 · 发表于 2012-7-16 21:00:06

你把错误提示，截图上来看看

maotao456 · 发表于 2012-7-16 21:00:06

你改成Edit1.Clear;

delphicn · 发表于 2012-7-16 21:08:02

楼上正确,Edit1.Clear;

kingson · 发表于 2012-7-16 21:09:51

edit1.Text := '';
''是两个单引号，不是一个双引号。

wylton · 发表于 2012-7-16 22:07:42

你是什么女子？？？大家口水。。。

tinachen0505 · 发表于 2012-7-17 08:35:34

maotao456:你改成Edit1.Clear;  (2012-07-16 21:00) 

谢谢你的提示！

tinachen0505 · 发表于 2012-7-17 08:37:03

kingson:edit1.Text := '';
''是两个单引号，不是一个双引号。 (2012-07-16 21:09) 

谢谢你的提示。

		自动登录	找回密码
密码			立即注册（注册审核可向QQ群索取）

清除按钮

回 4楼(maotao456) 的帖子

回 6楼(kingson) 的帖子