读书人

!语法异常

发布时间: 2012-08-03 00:12:14 作者: rapoo

求助!语法错误!

Delphi(Pascal) code
function TurnRight( Path:Integer): Boolean;begin  if TempCount=Path then    begin      ClearAll(self);      Image1.visible:=True;      Result:=True;    end     else Result:=False;end;


其中 ClearAll 是一个 procedure,Image1 是一张图片,但是构建的时候提示有错误,不能编译,为何?
不可以这样子写吗?

[解决办法]
Image1.visible:=True;//应该这句出错

前面应该加上函数所在的窗体名

例如:

Form1.Image1.visible:=True;
[解决办法]
作用域不同,象1楼那样
或者把你这个过程加入到窗口类中

改成function Form1.TurnRight( Path:Integer): Boolean;
并将过程声明加入到窗口类中

[解决办法]
你这个是一般方法,但是方法里面确引用了对象指针SELF?
[解决办法]
并没有name这个词? 错误也许不在这里吧; 不过楼主的代码,也要改一下

ClearAll是类TForm1的方法,但TurnRight不是;所以访问ClearAll时,要加上类TForm1的实例对象(即Form1),
同理Image1也一样

Form1.ClearAll(nil); //TurnRight不是类的方法,没有self
Form1.Image1.visible:=True;

或者只改这里function TForm1.TurnRight( Path:Integer): Boolean;
相应的在private下面添加此函数

再有其它错误,根据错误提示修改吧

读书人网 >.NET

热点推荐