testpackedobject.out

来自「格式化源码的最新板」· OUT 代码 · 共 25 行

OUT
25
字号
unit TestPackedObject;

{ AFS
 This unit compiles but is not semantically meaningfull
 it is test cases for the code formatting utility
 This test is in its own file
 since it does not compile in Delphi 2007
 but apparently does in some earlier verions

 test the "packed" modifier on the TurboPascal legacy "object" keyword
 }

interface

type

  TPackedObject = packed object

  end;


implementation

end.

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?