Форум: "Базы";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
ВнизDynamic Array Найти похожие ветки
← →
Digitman (2001-12-07 11:16) [3]
type
TMyOpenArray = array of string;
procedure FileFormat(f_name : string; var ExtEr : TMyOpenArray ; var rsm
: integer);
var
.....
begin
........
rsm := <новое значение>;
SetLength(ExtEr,rsm);
end;
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.008 c