Belotsky SergeПробовал я через
var , компилятор не дает. Что-то вроде того, что я не могу dynamic array присвоить static array.
Можете привести полный пример на моем исходнике?
Мне не хочется дублировать статический массив в памяти из-за размера.
Да я слегонца тупанул. Не сразу понял что Вы хотите.
А вот нифига я не понял: зачем такие сложности ?
У Вас есть константа, ну и используйте ее в коде.
Зачем ее преобразовывать в динамический массив.
В Вашем случае:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
procedure TDummyRec.Test;
var
i :integer;
C :integer;
SS :string;
begin
for i := Low(MemoryStatDynRec.Recs) to High(MemoryStatDynRec.Recs) do
with MemoryStatDynRec.Recs[i] do
begin
C := A;
SS := S;
end;
end;
Это почему? Pointer - он и в Африке. С учетом что и dll и приложение 32-х битные, а dll еще с дополнительном ограничением, должен быть скомпилирован в среде Delphi (чтобы не заморачиваться с некоторыми дельфовыми классами типа TList)
Pointer в Африке pointer. А структура на которую он указывает, в Африке может сильно отличаться от таковой в Европе.
К примеру Ваш TRec не объявлен как packed. Значит между поля структуры могут быть сдвинуты. string, который Вы передаете как одно из полей структуры, это по сути достаточно сложная структура, одно из полей которой ссылается на блок памяти, где значение строки определено. Но string в delphi, не может считаться dll безопасным. Структура описания строки может отличаться в зависимости от версии Delphi, настроек компиляции и т.д.
В общем массив структур, некоторые из полей которых - string нельзя передавать в dll по ссылке.
