一个简单问题:如何自定义数据类型(50分)

  • 主题发起人 主题发起人 ericyin
  • 开始时间 开始时间
E

ericyin

Unregistered / Unconfirmed
GUEST, unregistred user!
我需要自定义一个数据类型fileRecord。其中fileRecord.Number应该是1到4的整数,fileRecord.FileName应该是字符串。
该在程序的什么地方定义?type? private? 具体如何写代码?
 
type
FileRecord = Record
Number: (1, 2, 3, 4);
FileName: string;
end;
...
 
To z_cd: 你编译过吗?
To ericyin: 直接定义成 Integer 就行了,自己使用的时候注意就行了。
type
FileRecord = Record
Number: integer;
FileName: string;
end;
 
应该在type中定义类型,在var中声明变量。我试了是可以的。全窗体代码如下。
该窗体上什么控件都没有,但可以运行。
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
filerecord=record
Number:set of 1..4;
filename:string;
end;
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
a:filerecord;

implementation

{$R *.DFM}

end.
 
多人接受答案了。
 
后退
顶部