Функция в dll

← →
КодеКорешь (2005-08-02 14:35) [0]

function GetVideoCardName(const Nom: Integer): String;
var
lpDisplayDevice: TDisplayDevice;
begin
lpDisplayDevice.cb := sizeof(lpDisplayDevice);
EnumDisplayDevices(nil,Nom,lpDisplayDevice,0);
Result:=lpDisplayDevice.DeviceString;
end;

Выше приведдный код функции прекрасно работает в исполняемом файли, а если вызвать его из dll то поднимается ошибка Invalid pointer operation, при этом возвращается правильное значение, в чем может быть проблема?

← →
Alexander Panov © (2005-08-02 14:40) [1]

Читай комментарии в модуле после исползования DLL-Wizard.

← →
КодеКорешь (2005-08-02 14:53) [2]

Добавил ShareMem теперь при закрытии приложения та же ошибка...

← →
Alexander Panov © (2005-08-02 15:03) [3]

КодеКорешь (02.08.05 14:53) [2]
Добавил ShareMem

Куда добавил?

← →
Leonid Troyanovsky © (2005-08-02 15:03) [4]

> КодеКорешь (02.08.05 14:53) [2]

>> Читай комментарии в модуле после исползования DLL-Wizard.

> Добавил ShareMem теперь при закрытии приложения та же
> ошибка...

Читай вдумчивей.

--
Regards, LVT.

← →
КодеКорешь (2005-08-02 15:52) [5]

Куда добавил?
в interface

uses
ShareMem,....
в модуль приложения и DLL

не выдержал!
в вызывающий и DLL, оба, и ShareMem первый, там и там.

← →
КодеКорешь (2005-08-02 16:11) [7]

не выдержал!
в вызывающий и DLL, оба, и ShareMem первый, там и там

да так и сделано!
Ладно бог сним переписал все с ShortString и все ок!

isasa © (02.08.05 16:06) [6]
в вызывающий и DLL, оба, и ShareMem первый, там и там.

не в вызывающий модуль, а в файл проекта и в модуль с dll первым в uses-список.

Функция в dll Найти похожие ветки