VPF::PChar in/out аргумент в DLL функции - Форум программистов

ekianu

Дата 25.4.2010, 15:11 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 32
Регистрация: 7.11.2006

Репутация: нет
Всего: нет

Привет всем.

Код


// DLL side
// mydll.dpr
function DLLFunc(var s: PChar): Boolean;
begin
  Result := False;
  with TDLLForm.Create(Application) do begin
    DLLEdit.Text := s;
    StrDispose(s);
    if ShowModal = mrOK then
      s := StrNew(PChar(DLLEdit.Text));
      Result := True;
   end;
end;
exports
  DLLFunc;

// EXE side
// usedll.dpr
function DLLFunc(var s: PChar): Boolean; stdcall; external 'mydll.dll';

...
procedure CallDLLFunc;
var
  s: PChar;
begin
  s := StrNew(MyList.Items[0]);
  if DLLFunc(s) then
    MyList.Items[0] := s;
  if Assigned(s) then
    StrDispose(s);
end;

После выхода из EXE постоянно выдает ACCESS VIOLATION. Пожалуйста помогите.

Это сообщение отредактировал(а) ekianu - 25.4.2010, 15:12

Alexeis

Дата 25.4.2010, 15:48 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

Нельзя в Dll удалять выделенную в exe память, и наоборот. Такая операция допустима при наличии общего менеджера памяти. Кстати при создании шаблона Dll об написан неслабый фрагмент текста.

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

ekianu

Дата 25.4.2010, 16:00 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 32
Регистрация: 7.11.2006

Репутация: нет
Всего: нет

Значит нельзя использовать pchar in/out argument с Allocate/Deallocate.

Alexeis

Дата 25.4.2010, 16:10 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

Цитата(ekianu @ 25.4.2010, 15:00

)

Значит нельзя использовать pchar in/out argument с Allocate/Deallocate.

WinApi функции так не делают, за исключением COM, где используется общий COM-ский менеджер памяти. Delphi разрешает такое делать через объединение менеджеров памяти (см. модуль ShareMem) или через тот же комовский менеджер (WideString). Или через самопальные аналоги FastShareMem

--------------------

ekianu

Дата 25.4.2010, 16:21 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 32
Регистрация: 7.11.2006

Репутация: нет
Всего: нет

Спасибо Alexeis.

kami

Дата 25.4.2010, 21:50 (ссылка)

(голосов:1)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1806
Регистрация: 25.8.2007
Где: Санкт-Петербург

Репутация: 23
Всего: 72

Предлагаю еще обратить внимание на разные соглашения о вызовах при описании функции. Мне кажется, это основная проблема возникновения AV.
В dll вызов описан как fastcall

Цитата(ekianu @ 25.4.2010, 15:11

)

function DLLFunc(var s: PChar): Boolean;

а в exe - stdcall.

Цитата(ekianu @ 25.4.2010, 15:11

)

// EXE side
// usedll.dpr
function DLLFunc(var s: PChar): Boolean; stdcall; external 'mydll.dll';

Нужно привести к единому знаменателю.

Это сообщение отредактировал(а) kami - 25.4.2010, 21:55

CodeMonkey

Дата 26.4.2010, 10:55 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 38
Всего: 89

Читать.

--------------------

Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »