неопределенное число параметров BP7

← →
syte_ser78 © (2004-02-09 12:35) [0]

Подскажите, возможно ли передать процедуре (Борланд Паскаль 7) неопределенное число параметров. Тоесть доустим имеем процедуру my_window() которая рисует окно и выводит в нем с новой строки текст переданый параметром.
Вобщем чтобы my_window("1","2","3","4"....)
делало
1
2
3
4

← →
Anatoly Podgoretsky © (2004-02-09 12:38) [1]

Не помнб, поддерживалась ли такая форма как const array of const в BP7 или нет, проверь.

← →
Игорь Шевченко © (2004-02-09 12:39) [2]

Вроде, невозможно

← →
pasha_golub © (2004-02-09 12:49) [3]

Вообще низзя, не поддерживалось. Но можно передать вершину стека или голову списка, так всегда делал.

type PRecord = ^TRecord; TRecord = record Data: TData; Nwext: PRecord; end; ... procedure DoSmth(AHead: PRecord); var Elem: PRecord; begin Elem := AHead; while Elem <> nil do begin tram-pam-pam Elem := Elem^.Next; end; end;

← →
Palladin © (2004-02-09 12:54) [4]

проще передать указатель на массив...

type
PArray=^TArray;
TArray=array [0..0] of TData;

← →
pasha_golub © (2004-02-09 13:22) [5]

Palladin © (09.02.04 12:54) [4]
Угу, точно. Или так.

в BP7 появилась возможность использовать в параметрах процедур/функций массивы открытого типа.

Но открытые массивы поддерживались.

Спасибо

неопределенное число параметров BP7 Найти похожие ветки