[Эллурн]

Столкнулся сегодня с такой проблемой: в библиотеке у меня определена функция, тип результата которой - array of string. Динамические массива - штука не страшная, и в ходе выполнения функции задать размер массива - естественно, не проблема.
Проблема кроется в следующем: при определении функции в самой программе, используется тот же тип (array of string). И, естественно, я не смогу получить данные из библиотеки до тех пор, пока не укажу размер массива.
Собственно, сам вопрос: как мне узнать размер динамического массива, создаваемого в dll, до того, как его значения будут переданы в основную программу?

Вот код, используемый в библиотеке (в AdoQuery у меня стоит оператор SELECT)

Код:

type
  TNHArray = array of string;

function notesload(uid: integer): TNHArray;
var
  i: integer;
begin
  with datamodule5.adoquery1 do
  begin
    sql[1]:='nheader';
    sql[3]:=inttostr(uid);
    active;
    setlength(result, recordcount);
    for i:=0 to recordcount do
    begin
      result[i]:=fields[i].asstring;
    end;
  end;
end;

З. Ы. Я знаю, что пропустил некоторые строки кода, необходимые для передачи строковых переменных. Представим, что это - целочисленный тип (к примеру)
З. З. Ы. Возможно, есть более изящное решение задачи, но я его не вижу... Если поможете найти его вместо решения возникшей проблемы, тоже буду очень благодарен

[lmikle]

Решение - передача в упакованном виде в PChar.

[Эллурн]

Спасибо большое за совет.
Увы, я перерыл всю собственную литературу, долго искал информацию в интернете, но в результате остался с кучей почти никак не связанных обрывков информации. Что значит "упакованный" PChar? И как его упаковать? Насколько я понимаю, ответив на предыдущие 2 вопроса, я получу ответ на вопрос "Как в одну строку поместить где-то с 15 строковых переменных"?

Извиняюсь за назойливость, но тяга к знаниям одолевает Диплом уже есть, а я все никак не успокоюсь

[lmikle]

0. пишем в dll функцию, которая освобождает блок памяти указанного размера.
1. Анализируем массив (список) строк. Нам надо получить суммарный размер строк + 1 символ для каждой строки + еще 1 символ.
2. Выделяем кусок памяти в PChar размером из п.1.
3. Зануляем его.
4. начинаем запихивать в него наши строки (КОПИРОВАНИЕМ!!!). В конце каждой строки стоит #0, и в конце всего блока памяти стоит еще один #0 (т.е. в самом конце будет #0#0).
5. возвращаем через var параметры указатель на сам блок памяти и переменную с его размером.

6. В основной программе разворачиваем это все обратно и вызываем функцию из п.0 для освобождения памяти. Почему так - не спрашивай. Просто запомни, что память должна быть освобождена в том модуле (dll, exe), где она выделена. Если очень интересно, то читай об управлении памятью. Но проще просто запомнить вышесказанное правило.

А вообще, подключи модуль ShareMem (и в exe и в dll) и передавай сразу строки. Только тогда не на Дельфе не получится ничего написать в такую систему.

[Эллурн]

Спасибо большое за развернутый ответ

А можно еще подробней по некоторым пунктам? :-[
1. Что значит "Занулить память"?
2. Что значит "запихивать копированием"? Оператор присвоения ":=" не пройдет?

Как раз задумался о том, что с обычными строками лучше не надо делать: вполне возможно, будет вестись разработкамодулей и на других языках... В общем, как проект раскручу, так и будет)

Остальное, вроде бы, понятно, завтра вечерком примусь за реализацию

[lmikle]

1. FillChar(P,#0);
2. StrCpy()