Цитата:
|
Сообщение от GeneTic
Так, в саму DLL массив я загнал, но как мне его использовать в Unit-ах (внутри DLL у меня есть две Form-ы, а у каждой из них по Unit-у)? А потом, после обработки, вернуть в программу...
|
А в чем проблема?
Код:
unit unit1; // form1
interface
var A: array of string
...
end.
/////////////////
unit unit2; // form2
...
implementation
uses unit1;
...
end.
///////////////////
library lib1;
...
uses unit1, unit2
...
function Test(var MyArr: array of string): integer
...
SetLength(A, Length(MyArr));
for X := 0 to Length(MyArr) do A[X] := MyArr[X]
...
for X := 0 to Length(MyArr) do MyArr[X] := A[X];
SetLength(A, 0);
Result := 0;
end;
...
end.
Вот как-то так... Массив A, объявленный в Unit1, доступен всем-всем-всем, работай везде с ним. А в конце работы вызываемой из DLL функции присвой переданному ей массиву значения A