各位老师请教一下

[liuer]

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
TForm1 = class(TForm)
StringGrid1: TStringGrid;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Edit5: TEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Button2: TButton;
Button1: TButton;



score=1..100;
pgrade=^grade;
grade=record
number :integer;
name :string[20];
maths :score;
chinese:score;
english:score;
end;
private
{ Private declarations }
public
{ Public declarations }
end;



第一段是自动生成的，第二段是我自己申明的子界类型和记录指针类型，可调试时老是在score=1..100处说"Expected :but = found",而在控制台程序里却能通过，不知这是为什么啊？我是新手，老师们帮帮我啊

[chechy]

try this:
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
score=1..100;
pgrade=^grade;
grade=record
number :integer;
name :string[20];
maths :score;
chinese:score;
english:score;
end;

TForm1 = class(TForm)
StringGrid1: TStringGrid;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Edit5: TEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Button2: TButton;
Button1: TButton;
private
{ Private declarations }
public
{ Public declarations }
end;

[del_c_sharp]

TForm1 = class(TForm)
StringGrid1: TStringGrid;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Edit5: TEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Button2: TButton;
Button1: TButton;
private
{ Private declarations }
public
{ Public declarations }
end;

上面的部分是窗体类的定义的.里面是类的方法函数和属性以及成员变量

下面是你自己的类型定义,与窗体类没有直接关系,两个不能交叉
type
score=1..100;
pgrade=^grade;
grade=record
number :integer;
name :string[20];
maths :score;
chinese:score;
english:score;
end;

[liuer]

如果非要把自己定义的类型写在下面，再用一个type就可以了？或者只能写在前面？谢谢

[liuer]

果然行了，为什么要放在前面啊？