Форум: "Основная";
Текущий архив: 2003.07.31;
Скачать: [xml.tar.bz2];
ВнизКак передать в параметр процедуры массив? Найти похожие ветки
← →
_Санек_ (2003-07-16 10:12) [0]Есть такие компоненты - Async Professional. И есть метод ConcatFaxes у одного из компонетов этого пакета - TApdFaxJobHandler. Его описание таково:
procedure ConcatFaxes (DestFaxFile: ShortString; FaxFiles: Array of ShortString);
Не получается передать в этот метод массив FaxFiles.
Пытаюсь делать и так:
var ff : array of ShortString;
...
ConcatFaxes (DestFaxFile, ff); // Не проходит, говорит несоответствие типов Array и Dinamic Array
И так:
var ff : array [1..100] of ShortString;
...
ConcatFaxes (DestFaxFile, ff); // Incompatible types
Ничего не получается...
Единственное, что получается:
var ff : array [1..100] of ShortString;
...
ConcatFaxes (DestFaxFile, [file1.apf, file2.apf]);
Но так меня не удовлетворяет, я имена файлов получаю в процессе выполнения программы...
В исходниках компонентов лазить пока не хочется, там переделать это на какой-нить TStringList. Все таки, наверно же авторы как-то задумывали, что можно передать динамически туда имена файлов.
Подскажите, как?
Заранее, спасибо!
← →
Song (2003-07-16 10:21) [1]Через Type пробовал?
← →
_Санек_ (2003-07-16 10:43) [2]
type
TFL = Array of ShortString;
.........
var
FL : TFL;
.........
ConcatFaxes("ready.apf", FL); // [Error] threadTransmission.pas(180): Incompatible types: "Array" and "TFL"
← →
Palladin (2003-07-16 11:05) [3]var ff : array of ShortString;
...
ConcatFaxes (DestFaxFile, ff); // Не проходит, говорит несоответствие типов Array и Dinamic Array
у меня проходит...
правда у меня D6
← →
__Санек__ (2003-07-16 11:12) [4]Ладно, значит будем это считать ошибкой D5.
Я переписал этот метод под использование TStringList, и все заработало...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.07.31;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.009 c