delphi 数组如何动态增加
//下面是一记录，三维坐标
type
Tposition = record
x:integer;
y:integer;
z:integer;
end;
//======下面是要在一个循环中动态地增加三维坐标数据的长度
//请问如何写会高效。
produce getposition(Sender: TObject)
var
position:array of record;
begin
。。。
for i =A to B do
if k then
position增加一个C（xc,yc,zc)的数; //这里如何写？
。。。
end;
请大侠指点。谢谢！！
SetLength
starluck：
具体如何写？
每次都用setlength?
SetLength(Length(position)+1)
position:array of record; //貌似应当是position:array of Tposition;
____________
SetLength(position, Length(position) + 1);
with position[Length(position) - 1] do
begin
x := xc;
y := yc;
z := zc;
end;
相关问答：
我尝试一个 idhttp 访问网站链接的程序
在设置代理端口的时候出错
编译没有错误
就是在运行的时候 出现了
80 is not a valid integer value 的问题
我已经把 函数分类出来的 port 转换为 integer 了 ......
比如在delphi代码里，对某个方法或者form不了解，按下ctrl键，用鼠标点一下，就会跳到这个form或方法的代码哪里去。
我刚学c#，先下了一个系统的源代码看，里面很多控件、方法不知道是哪里来的，也没法去找。 ......
请问如何设置一个按钮，一点到它就不断执行按钮上加载的事件，知道点击另一个按钮才会停止，因为写了个选号的小程序，希望可以像电视上那样，一点就不断的刷 而不是点一下刷一下！！
两种方法
1.用timer去控制执 ......
SQL.Add('SELECT formula,val(DMAF) as i from 配方诊断表 where 1=1 and formula ='''+Combobox3.Text+''' and formula ='''+Combobox4.Text+'''');
� ......
我从数据库中取出来值把它存储在了动态数组中，数组已经得到了该值，我现在要把该动态数组中的值取出来跟菜单对应起来。
最简单的，循环啊。
用MAP方式,压入,弹出.呵呵
没太明白
菜单项的tag对应数组的� ......
