delphi动态数组指针问题
就一个button事件
procedure TForm1.btn7Click(Sender: TObject);
Type
TMyArr = array of array of array of Integer; {定义一个三维动态数组类型}
Pint = ^TMyArr;
var
PArr: Pint; {动态数组指针变量}
i,j,k,ic,jc,kc: Integer;
begin
Memo1.Lines.Clear;
{用作维数的变量}
ic := 2;
jc := 3;
kc := 4;
{分配内存; 按说动态数组还需要 8 个管理字节, 我不知道 Delphi 是怎么协调的}
GetMem(PArr, ic * jc * kc * SizeOf(Integer));
{设置数组}
SetLength(PArr^, ic,jc,kc);
{赋值}
for i := 0 to ic - 1 do
for j := 0 to jc - 1 do
for k := 0 to kc - 1 do
PArr^[i][j][k] := Random(100);
{取值}
Memo1.Clear;
for i := 0 to ic - 1 do
for j := 0 to jc - 1 do
for k := 0 to kc - 1 do
Memo1.Lines.Add(Format('Arr[%d][%d][%d] = %d', [i, j, k, PArr^[i][j][k]]));
//Memo1.Lines.Add(Format('Arr[%d][%d][%d] = %d', [i, j, k, TMyArr(PArr)[i][j][k]]));
{按理说这种访问方法也对，可是这中方法在编译的时候能通的过去，在运行的就报错了}
{自己分配的内存要负责释放}
FreeMem(PArr);
end;
到setlength那个地方就出错，大家看看是怎么回事。。。
动态数组你执行GetMem做什么
SetLength(PArr^, ic,jc,kc);不就行了
相关问答：
请教各路高手。武林前辈。我将B.EXE做成资源文件，然后加到123.dll中。用A.EXE来调用123.dll中的B.EXE
请各位前辈帮忙指教下。A.exe如何来调用dll中的exe？代码又该如何写？
无人回答？
做成资源� ......
xml := CreateOleObject('Microsoft.XMLHTTP');
xml.Open('GET','http://www.google.com', False);
xml.Send;
xml.responseText;
使用xml.responseText可以获取网页源码,但是再次 ......
//DLL 放在EXE中没问题
function SkinForm(var skfrm:TForm):Integer;stdcall;
var
skf:TbsBusinessSkinForm;
nskfrm:TForm;
begin
frmUUMain:=skfrm;
skf:=TbsBus ......
我在Delphi的Tools/Editor Options/Color中设置了一下我的代码颜色，我编辑器当前行的背景色莫名其妙变成了粉色，我觉得看起来很不舒服？谁知道怎么设置回白色？
同样在Tools/Editor Options/Color中设置，先选中右 ......
谁知道，用什么工具?
用FreePascal可以
目前DELPHI不支持移动开发
学习了
不知道2011是否可以，拭目以待。
有人知道么~
貌似前段时间看到有支持的
prim
Delphi for iPhone 1.0 released!
......
