Вниз
Скачать: CL | DM;

Array of TmyRec   Найти похожие ветки 

← →
webpauk   (2007-06-07 17:29) [0]

Извиняюсь за ламерство, вопрос звучит так:

type
 TmyRec = record
     T: Integer; S: String;
  end;

procedure MyPrc(fArr: arrTmyRec)

как мне вызвать MyPrc, а fArr описать при вызове, т.е.:
MyPrc([(1, "test1"), (2, "Test2")]) - чую ошибку, но не знаю как правильно указать array of Tmyrec


← →
G_M_S ©   (2007-06-07 18:06) [1]

Например так:

type
 MyArr = array of TMyRec;

procedure MyPrc(fArr: TMyArr)

var
 a:MyArr;
begin
 SteLength(...);
 ..заполнение массива
 MyPrc(a);


← →
webpauk   (2007-06-07 18:26) [2]


> G_M_S ©   (07.06.07 18:06) [1]

неа...

я хотел типа:
function Point(AX, AY: Integer): TPoint;
begin
 Result := Types.Point(AX, AY);
end;

чтобы по аналогии: MyArrRec(1, "Test")
и соотв: MyPrc([MyArrRec(1, "Test"), MyArrRec(1, "Test")]);

вопрос снят



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.014 c
11-1163751537
Kirill
2006-11-17 11:18
2007.07.01
KolODBC


15-1180808132
Витян
2007-06-02 22:15
2007.07.01
Купил ноутбук, а драверов нет! Что делать?


15-1180624372
Bogdan1024
2007-05-31 19:12
2007.07.01
Диск на 30 дней


3-1175756389
vl
2007-04-05 10:59
2007.07.01
Тригеры


15-1180537337
Rule
2007-05-30 19:02
2007.07.01
демо ролик с сайта борланда




   Наверх