最好能说一下它的原理和用途?
解决方案 »
- MySQL的Double字段计算后的结果不对
- [正确就结贴]初混D区今天四个三角散一下分求鼓励
- 【简单问题】TProfDateTimePicker 的 font.color 属性怎么改变不了?
- 请问一下谁有比较的源码下载呀?
- delphi中调用外部程序(ShellExecute)为什么老说没有定义呀,各位帮忙解释一下!
- 界面象PowerPoint的切换效果,能用代码实现吗?
- 马上结贴!
- 怎么拿DBLookupComboBox选定项的其他FIELD的值呢?
- GreenWaterBlueSky来收分
- 请问如何在数据库里表示下列树性结构并在DXDBTREEVIEW里显示出来???
- 高分!如何把数据输出到word中特定的表格中!
- ★★我有下载了一个 FlatStyle平面界面控件,不知如何安装及使用?请大虾教我,详细点。谢谢!
MyRecord = Record
I: Integer;
C: Char;
end;var OneMyRecord: MyRecord;SizeOf(OneMyRecord.I) //为4
SizeOf(OneMyRecord.C) //为4 (因为不压缩,编译器将C的长度和I的长度自动对齐)如果定义为压缩:
MyRecord = Packed Record
I: Integer;
C: Char;
end;
则:
SizeOf(OneMyRecord.I) //为4
SizeOf(OneMyRecord.C) //为1—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样,删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
那么packed array
都有什么数据类型能够定义为packed