Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.07.01;
Скачать: 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 вся ветка

Текущий архив: 2007.07.01;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.019 c
15-1180526560
DeadMeat
2007-05-30 16:02
2007.07.01
Эксперимент


11-1164058662
ANTPro
2006-11-21 00:37
2007.07.01
Stream.Write


15-1180555805
Real
2007-05-31 00:10
2007.07.01
FAR


2-1180944925
iXT
2007-06-04 12:15
2007.07.01
Потомок TMemo


15-1180613756
Desdechado
2007-05-31 16:15
2007.07.01
gmail у кого-нибудь работает?