Re: ДинМас (Delphi)
Если бы я писал на С++, я бы применил шаблоны, а в Дельфи, извините, не знаю(((
> Есть три динамических массивов, типа
> A: array of Integer;
> B: array of TLabel;
> C: array of TButton;
> в цикле я заполняю у каждого массива один элемент, предварительно
> уведичиваю кол-во элементов в массиве, путем
> If High(X)=-1 Then
> SetLength(X,1)
> else
> SetLength(X,Length(X)+1);
> Где в мсето Х надо подставлять всякий раз имена динмассивов.
> Возможен и другой способ, но меня пока этот устраивает.
> Чего хочу: Вынести все это дело в отдельную ПП, типа
> procedure AdAlMas(Y)
> Begin
> If High(Y)=-1 Then
> SetLength(Y,1)
> else
> SetLength(Y,Length(Y)+1);
> End;
> НО, я не знаю какого типа должен быть параметр Y, что бы в нутри ПП он
> принимал значение динмассиво A,B и C
> --
> А на последок я вам скажу: Готов к труду и обороне своих доходов от налоговой
> инспекции!
> С Уважением Деонис (Из города святой Екатерины с горячим приветом)
>
>
> --
> ------------------------------------Info> Выпуск : 5512
> Подписчиков : 527
> Возраст листа : 2038 (дней)
> Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/847145
> >
Яндекс.Открытки на все случаи жизни http://cards.yandex.ru/
