![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Array of TmyRec [D6, XP]
webpauk © (2007-06-07 17:29:00)Извиняюсь за ламерство, вопрос звучит так:
type
TmyRec = record
T: Integer; S: String;
end;
procedure MyPrc(fArr: arrTmyRec)
как мне вызвать MyPrc, а fArr описать при вызове, т.е.:
MyPrc([(1, 'test1'), (2, 'Test2')]) - чую ошибку, но не знаю как правильно указать array of Tmyrec
webpauk (2007-06-07 18:26:00) [1]
> 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')]);
вопрос снят
G_M_S (2007-06-07 18:06:00) [2]Например так:
type
MyArr = array of TMyRec;
procedure MyPrc(fArr: TMyArr)
var
a:MyArr;
begin
SteLength(...);
..заполнение массива
MyPrc(a);