M
miao008
Unregistered / Unconfirmed
GUEST, unregistred user!
我是个刚刚开始接触delphi的拆鸟
昨天发现了一个怪事，一下是我编的一个程序，简单的不能再简单，就是不能通过program ff;
program MiaoFamily
{$APPTYPE CONSOLE}
uses
SysUtils;
type
TRen=record
Name:string;
Age:integer;
end;
TMember=Record
Father:TRen;
Mather:TRen;
Son:TRen;
end;
TFamily=Record
Member:Tmember;
Address:string;
Householder:string;
end;
var
MiaoFamily:TFamily;
begin
MiaoFamily.Address:='China';
writeln(MiaoFamily.address);
readln;
end.
[Error] miaoFamily.dpr(24): Identifier redeclared: 'MiaoFamily'？？？？
为什么呢，当我把文件名改后就能通过？？？望大虾告知
昨天发现了一个怪事，一下是我编的一个程序，简单的不能再简单，就是不能通过program ff;
program MiaoFamily
{$APPTYPE CONSOLE}
uses
SysUtils;
type
TRen=record
Name:string;
Age:integer;
end;
TMember=Record
Father:TRen;
Mather:TRen;
Son:TRen;
end;
TFamily=Record
Member:Tmember;
Address:string;
Householder:string;
end;
var
MiaoFamily:TFamily;
begin
MiaoFamily.Address:='China';
writeln(MiaoFamily.address);
readln;
end.
[Error] miaoFamily.dpr(24): Identifier redeclared: 'MiaoFamily'？？？？
为什么呢，当我把文件名改后就能通过？？？望大虾告知