Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Вниз

Проблема в работе с массивом 


gary-gary   (2002-02-18 10:57) [0]

Есть объявленный динамический массив

var
SPI:array of array of Extended;
II,JJ:integer;
Begin
SetLength(SPI,NA);
for II := Low(SPI) to High(SPI) do
begin
SetLength(SPI[II],NA+2);
for JJ := Low(SPI[II]) to High(SPI[II]) do
begin
SPI[II,JJ] :=JJ*4;
end;
end;
DLIT1(SPI)
End

Этот массив требуется передать поцедуре , которая находится в другом модуле , в качестве параметра .

Eсли в объявлении процедуры пишу так .
procedure DLIT1(SPI:array of Extended)

Ругается на этапе компиляции при обращении к процедуре
Incompatible types ‘Array’ and ‘dynamic array’

Если так . procedure DLIT1(SPI:array of array of Extended)
То ругается при компиляции в модуле где объявлена процедура , выдает сообщение .
Identifier expected but ‘ARRAY’ found .

Что делать , если кто то сталкивался с аналогичной проблемой или знает как ее разрешить прошу , ответить мне по адресу gary-gary@mtu-net.ru и дать рекомендации .



Виктор Щербаков   (2002-02-18 11:02) [1]

Путаешь динамические массивы и открытые массивы. Поэтому ошибка о несоответствии типов.



DieHard   (2002-02-18 11:31) [2]

Объяви новый тип
TSPI=array of array of Extended;
а процедуру объяви следующим образом:
procedure DLIT1(SPI:TSPI)




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.021 c
3-19047           harismatik            2002-02-06 16:55  2002.03.07  
Аналог команды RecNo в Interbase


3-19102           Siberia               2002-02-11 11:45  2002.03.07  
Подскажите где взять компоненты для печати


1-19241           Baz                   2002-02-19 15:14  2002.03.07  
Хэндл чего я взял?


1-19170           Александр             2002-02-20 21:43  2002.03.07  
Вопрос по работе с файлами


1-19144           ZEE                   2002-02-06 04:14  2002.03.07  
Создание/удаление компонентов в RunTime