delphi pack class是什么？

[iamduo]

昨晚，我在尝试把某些控件从D7搬到D2010上。在处理Asta的时候，
有几个提示特怪，
我们一般都是这样写类的
Txxx=class
private
public
可是Asta的作者竟然是这样写得
Txxx=pack class//这个是什么意思？①
private
public

我是直接把Pack删掉了。就不知道是何解？

还有一个
Boolean(Str[0]):=xxx<>nil;
我靠，是不是表示啥高科技？②
高人指点一下。

[ERR0RC0DE]

pack class?
木见过，楼主按下F1，将帮助copy过来瞅瞅

Str是什么类型，String的话，我在D7编绎不过。

Boolean(Str[0]) := xxx <>nil;
Str[0]转换成Boolean类型进行赋值(Boolean就是0..1)

[火龙岛主]

应该是：

Txxx = packed class//这个是什么意思？①压缩存储
private
public
end;

[gyk120]

packed class，压缩存储类

[kobaer]

压缩存储类 中的压缩何解啊？

[阿发伯]

Boolean(Str[0]):=xxx <>nil;
这一句的意思是:
if xxx = nil then
Str[0] := 0 (#0)
else
Str[0] := 1 (#1)

如果Str是字符串或者字符数组，应该是#1和#0

[阿发伯]

[Quote=引用 4 楼 kobaer 的回复:]
压缩存储类  中的压缩何解啊？
[/Quote]
使类的字段按字节对其，缺省是双字对齐

[kobaer]

不懂

[kobaer]

Boolean(Str[0]):=xxx <>nil;
这种写法和原来c#的有一种写法一样

估计。。。