传入动态数组

原创 2013年12月05日 19:03:36
TMyRec = record
    sName: string[15];
    Sex: integer;
  end;

  pMyRec = ^TMyRec;
  arr1 = array of pMyRec;

var
  a1: arr1;
function method(T1: arr1): arr1;
begin
  Result := T1;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  i: integer;
begin
  SetLength(a1, 5);
  for i := Low(a1) to High(a1) do
  begin
    New(a1[i]);
    a1[i].sName := IntToStr(i);
    ShowMessage(method(a1)[i].sName);
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  i: integer;
begin
  for i := High(a1) downto Low(a1) do
  begin
    ShowMessage(method(a1)[i].sName);
    Dispose(a1[i]);
  end;
end;

fortran 以动态数组为函数参数

fortran的传参是我见过的各种编程语言中最麻烦的一个。它完全不认识传进来的参数是什么,必须在函数体内把形参再定义一遍。如果函数参数是数组,尤其是高维数组,那就必须要同时定义数组的数据类型和元素个数...
  • meanwe712
  • meanwe712
  • 2012年10月27日 20:58
  • 3535

vc++动态数组作为参数传递注意的问题

以前我一直使用的是返回首地址的方式,例如我的程序要返回一个旬数组,但是月份是动态的:int* CJustWaterSatisfyRate::Fun_GetXun_Array(COleDateTime ...
  • red_hope
  • red_hope
  • 2007年10月09日 15:38
  • 3450

c++ vector 动态数组用法

在c++中,vector是一个十分有用的容器,下面对这个容器做一下总结。 1 基本操作 (1)头文件#include. (2)创建vector对象,vector vec; (3...
  • clover_hxy
  • clover_hxy
  • 2016年02月19日 17:03
  • 1063

动态数组对比STL vector及其实现(c/c++)

c/c++动态数组动态数组 顾名思义能 动态增加内存的数组。 STL标准库中的vector具有类似的功能,c标准库的realloc也具有类似的功能,那为何还需要自己实现动态内存方式呢?对于追求效率,和...
  • typename
  • typename
  • 2012年11月20日 11:29
  • 6338

asp动态数组

本文所说的 ASP 数组是指在 ASP 中以默认语言 VBScript 为语言的数组。 例子: Dim   MyArray()        for   i   =   0   to  ...
  • yyh1988923
  • yyh1988923
  • 2011年09月23日 09:36
  • 5367

算法(第四版)笔记<一>-------动态队列的数组实现(Java语言)

算法(第四版)笔记——-动态队列的数组实现(Java语言) 1)实现定长定数据类型的队列。 2)通过泛型的方式实现对多种类型数据元素的支持。 3)根据队内元素数量调整数组长度,实现队列长度的动态变化。...
  • sjtuldl
  • sjtuldl
  • 2016年05月18日 23:14
  • 430

C++动态数组使用方法

二维数组直接开辟内存,与JAVA非常相似只是多了一个星号,使用完毕需要释放,否则内存泄漏 int* arr1=new int[5]; for(int i=0;i...
  • miko_xiaoming
  • miko_xiaoming
  • 2015年08月31日 16:57
  • 1428

一维动态数组的实现(c语言)

编程输入一个班的某课程的学生成绩,计算其平均分,然后输出。班级人数由键盘输入。#include #include main() { int *p = NULL,i,n,sum; pr...
  • m_hahahaha1994
  • m_hahahaha1994
  • 2016年06月07日 16:15
  • 3194

一维动态数组和二维动态数组的创建和使用

c,c的动态数组,一维数组,二维数组
  • wj903829182
  • wj903829182
  • 2014年07月17日 08:09
  • 1733

fortran F90动态数组的基本使用示范

program sample parameter (row = 5) integer err_mesg integer ary1(:), ary11(:, :...
  • shifuwawa
  • shifuwawa
  • 2011年03月15日 21:28
  • 7451
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:传入动态数组
举报原因:
原因补充:

(最多只允许输入30个字)