COM通信程序出现无法编译文件错误(20分)

X

xoyo_wu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-09

• #1

我在串口通信程序时候，系统出现错误，错误如下[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas' 请教各位高手如何解决？在此先谢谢了！

 

X

xiammy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-26

• #2

贴出代码来。
你的label1控件是不是重新命名了？

 

X

xoyo_wu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-26

• #3

代码如下：
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;
type
TForm1 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
Panel3: TPanel;
Label1: TLabel;
// procedure tForm1.tion1;
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation
{$R *.dfm}
procedure tion1;
begin
label1.capyion:='name';
end;
end.

 

X

xoyo_wu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-26

• #4

其他控件也是出现这种问题。而且没有改控件name属性

 

L

lunsoon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-26

• #5

procedure tion1;//全局过程
begin
label1.capyion:='name';
end;
end.
改成
procedure Tform1.tion1;//类过程
begin
label1.capyion:='name';
end;
end.
或者改成
procedure tion1;//不建议
begin
form1.label1.capyion:='name';
end;
end.

 

X

xoyo_wu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-26

• #6

可是在定义类过程时候在声明时候
type
TForm1 = class(TForm)
Label1: TLabel;
procedure Tform1.tion1;
private
{ Private declarations }
public
{ Public declarations }
end;
编译又会出现Expected '='but ':'found的错误，这个问题困饶我很久了，拜托大家了。

 

L

lunsoon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-27

• #7

....看样子你是个学生或者是太新手了
定义类过程只要写在class里面就可以了
不用再加TFORM1了那样的话反而会以为你要重新申请类了
也就是说
type
TForm1 = class(TForm)
Label1: TLabel;
procedure tion1;//这里
private
procedure tion2;//或者这里
{ Private declarations }
public
procedure tion3;//或者这里
{ Public declarations }
end;

 

X

xoyo_wu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-27

• #8

谢谢大家，谢谢lunsoon，我终于搞懂了，我是新手，刚刚学Delphi不久，以后还有好多问题请教大家！