可以的。下面是完整的示例代码:
{
在类中定义记录
by 宋银海
2012年8月15日
}
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TRecClass=Class
type
TRRec=record
A:integer;
end;
private
public
Test:TRRec;
End;
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
testRC:TRecClass;
begin
testRC:=TRecClass.Create;
testRC.Test.A:=3;
ShowMessage(IntToStr(testRC.Test.A));
testRC.Free;
end;
end.
追问![](https://video.ask-data.xyz/img.php?b=https://iknow-pic.cdn.bcebos.com/fd039245d688d43fba68366b7d1ed21b0ff43b61?x-bce-process=image%2Fresize%2Cm_lfit%2Cw_600%2Ch_800%2Climit_1%2Fquality%2Cq_85%2Fformat%2Cf_auto)
编译时有这个提示,我写时也是这样,是在DELPHI7下,不知道您怎么实现的,请指教,谢谢
追答Delphi7中不允许这样定义。
在Delphi2010中可以。
追问哦,那这个版本升级可真够大的,经测试真的可以,谢谢了,以后要多在新的版本上做东西了。