Главная страница
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.013 c
15-1180936975
G_M_S
2007-06-04 10:02
2007.07.01
Сессия...


3-1175625608
Hydroliskus
2007-04-03 22:40
2007.07.01
BDE выдает ошибку row fetch limit exceeded


11-1164289862
Psychedelic
2006-11-23 16:51
2007.07.01
Unit mirror was compiled with a different version of KOL.TOnChar


15-1180945623
Галинка
2007-06-04 12:27
2007.07.01
Решить систему нелинейных уравнений


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