Question

delphi中为什么Edit1Click不可用?

procedure TForm1.Edit1Click(Sender: TObject);
begin
Edit1.Text='';
end;
系统显示：
[Error] count.pas(41):Undeclared identifier:'Edit1Click'
[Error] count.pas(41):Undeclared identifier:'Edit1'
打错了，第二行是
[Error] count.pas(43):Undeclared identifier:'Edit1'
Edit1.Text后有加冒号

Answer 1

可能的原因是：
你原来窗体上有个TEdit控件，名称为Edit1。
后来你把Edit1改名称了，或者删除了，就会出现未定义的标识符Undeclared identifier:'Edit1'。

还有，就是在TForm1中，你把声明语句procedure Edit1Click(Sender:TObject);给删除了，就会出现:Undeclared identifier:'Edit1Click'。

解决办法如下：
1、如果只想用这个过程，而不添加TEdit，就直接把声明语句加到TForm1类的定义中。
2、如果还想使用Edit1，就直接改名，或者添加一个TEdit，并且命名为Edit1，然后在Object Inspector的Events页，在OnClick中，选择Edit1Click即可。

Answer 2

把
procedure TForm1.Edit1Click(Sender: TObject);
begin
Edit1.Text='';
end;
这些代码删除，然后再双击你的Edit1进行重新写代码！！

Answer 3

他有一个属性enabled你看下有没有打开

Answer 4

Edit1 没有声明 就看看前面声明的是不是它