总是编译错误：project1.lpr(1,1) Fatal: Can't find unit Interfaces used by

eastpiger

如题。我什么都没有干，就是刚打开的样子，一编译就project1.lpr(1,1) Fatal: Can't find unit Interfaces used by project1
怎么回事呢？

猫工

先保存项目再编译

cuibq

新建项目，即使保存后，点run——build file，也会出现上面的错误。应该直接点run——build，或者快捷键shift+F9

eastpiger

猫工:先保存项目再编译 (2012-07-23 21:21) 

保存了啊，我用windows 没有问题，只有linux下的lazarus一直是这个毛病。。。。。

猫工

那你按2楼的方法试试

eastpiger

猫工:那你按2楼的方法试试 (2012-07-24 12:20) 

也试过了。shift+F9没有反应啊

eastpiger

猫工:那你按2楼的方法试试 (2012-07-24 12:20) 

另外再问一下。我需要写一个过程修改窗体上的某个控件的caption属性 提示unit1.pas(111,10) Error: Identifier not found "Button1"

sail2000

"Button1" 没有声明。
可能你修改的不是Caption 而是 Name

eastpiger

sail2000:"Button1" 没有声明。
可能你修改的不是Caption 而是 Name (2012-07-24 21:11) 

嗯，我发现只有在控件的事件里可以修改，自己写的都不行啊
procedure exam;
begin
  Button1.caption:='a';
end;

pcplayer

procedure exam;
begin
  Button1.caption:='a';
end;

----------------

这种写法，可以看出你是初学，不懂面向对象语言。

这里其实是作用域的问题。你这个函数里，Button1 在哪里定义的？

或许，你的函数和拥有 Button1 那个 TForm1 在同一个单元。但那个 Button1 是定义在 TForm1 里面的，而你这个函数并不属于 TForm1，因此，你的方法不认识 Button1。

如果你的单元里有 var Form1: TForm1 这样的声明，那你的函数可以这样写：

procedure exam;
begin
  Form1.Button1.caption:='a';
end;

当然，上述写法，语法上能通过没问题，但不是好的写法。

如果你仅仅是想要在 TForm1 里面操作 Button1，那么，你可以在 TForm1 里面自己写一个方法，在那个方法里面，你可以直接写 Button1 。

比如：

TForm1 = class(TForm)
private
  procedure exam;
public
end;


procedure TForm1.exam;
begin
  Button1.Caption := 'aaaa';
end;