Вниз
Скачать: CL | DM;

Функция в 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


 
isasa ©   (2005-08-02 16:06) [6]

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


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

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


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


 
Alexander Panov ©   (2005-08-02 16:18) [8]

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


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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.936 c
14-1122357632
GOOD90
2005-07-26 10:00
2005.08.21
Где найти программы для Motorola c650.


14-1122815252
ROCKER***
2005-07-31 17:07
2005.08.21
Ламоразмы


6-1114156012
Der1983
2005-04-22 11:46
2005.08.21
Клиент чата на TcpClient


14-1122908419
lookin
2005-08-01 19:00
2005.08.21
Удивительное место на Земле - остров Питкерн


14-1122382591
oldman
2005-07-26 16:56
2005.08.21
Задачка из программы "Спокойной ночи, малыши" :)




   Наверх