Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.019 c
6-94057
Dysan
2003-12-24 17:13
2004.02.29
как узнать что есть доступ в интернет?


1-94003
Альф
2004-02-16 16:25
2004.02.29
Про подсветку синтаксиса в Memo...


1-93868
Гиричев Руслан
2004-02-15 21:15
2004.02.29
Курсор - кажется что в нём такого, а...


14-94131
Думкин
2004-02-07 06:28
2004.02.29
С днем рождения! 7 февраля.


1-93901
able
2004-02-15 11:48
2004.02.29
Пароли...




   Наверх