Текущий архив: 2004.02.29;
Скачать: CL | DM;
Вниз
неопределенное число параметров 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]
Угу, точно. Или так.
← →
Val © (2004-02-09 13:23) [6]в BP7 появилась возможность использовать в параметрах процедур/функций массивы открытого типа.
← →
Думкин © (2004-02-09 13:26) [7]Но открытые массивы поддерживались.
← →
syte_ser78 © (2004-02-09 14:21) [8]Спасибо
Страницы: 1 вся ветка
Текущий архив: 2004.02.29;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.018 c
