Здравствуйте, Аноним, Вы писали:

А>Здравствуйте, GlebZ, Вы писали:

GZ>>Здравствуйте, Аноним, Вы писали:

VD>>>>Приведи описание структуры на С/С++.

А>>>На С++ это выглядело бы так (просто реально библиотека на Delphi)
GZ>>Нет, тогда уж лучше на Delphi. А то разница между ними кардинальная.

GZ>>С уважением, Gleb.

PAAAA = ^AAAA;
AAAA = packed record
name : array[0..32] of WideChar;
company : array[0..32] of WideChar;
end;

PAAAAArray = ^AAAAArray;
AAAAArray = array [0..MAXINT div SizeOf(AAAA) — 1] of AAAA;


PBBBB = ^BBBB;
BBBB = packed record
Count: Integer;
P: PAAAAArray;
end;

то есть вот так