Главная страница
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.023 c
2-1181210608
leonidus
2007-06-07 14:03
2007.07.01
Проблема с обращением к dll


3-1175712325
Seme
2007-04-04 22:45
2007.07.01
Не могу подключиться к MySQL.


2-1181471032
Sapos
2007-06-10 14:23
2007.07.01
Удаление файла


6-1165408740
Квэнди
2006-12-06 15:39
2007.07.01
IDTCPServer и Ip адрес клиента


15-1180445669
Kolan
2007-05-29 17:34
2007.07.01
Ищу тконки «Play» и «Stop» в стиле XP.