Показать сообщение отдельно
  #2  
Старый 22.09.2011, 12:41
icWasya icWasya вне форума
Местный
 
Регистрация: 09.11.2010
Сообщения: 499
Репутация: 10
По умолчанию

Array of ... - это фича от Borland и непереносима.
напишите такое
Код:
type
  size_t = Integer;
  Tsize_tArray=array [0..(MaxInt Div SizeOf(size_t)-1)] of size_t;
  TDoubleArray=array [0..(MaxInt Div SizeOf(Double)-1)] of Double;
  Psize_tArray=^Tsize_tArray;
  PDoubleArray =^TDoubleArray;
и тогда
Код:
function nc_get_var1_double (ncid : integer; varid : integer; 
                     indexp : Psize_TArray; 
                     ip : PDoubleArray) : integer; cdecl; external 'netcdf.DLL'
Ответить с цитированием