Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];




Вниз

Ошибка при динамическом вызове DLL 


Delph   (2002-04-08 12:29) [0]

В DLL:

function _GetForm(IdObject: LongInt; FormName: String; var Source: String): boolean; export;

В вызывающей программе:

_GetForm = function (IdObject: LongInt; FormName: String; var Source: String): boolean;

procedure TForm1.Button3Click(Sender: TObject);
var
S: String;
begin
iLib:=LoadLibrary("c:\storige\storige.dll");
GetForm := _GetForm(GetProcAddress(iLib,"_GetForm"));
GetForm(1, "Stroka", S);
ShowMessage(S);
end;


При выходе из обработчика "Invalid pointer operation". Как избавиться, что неправильно? Спасибо.



MBo   (2002-04-08 12:44) [1]

1)обязательно включить в uses первым sharemem
2)указать и в dll и в программе stdcall, например




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.022 c
7-57901           ATLANTIDO             2002-01-25 13:35  2002.04.18  
кЛАВА


6-57834           _Alex_                2002-02-04 16:44  2002.04.18  
как узнать список(hostname) доступных компов в сети


1-57694           Rammst                2002-04-08 06:50  2002.04.18  
Kylix


3-57583           Sysoper               2002-03-26 12:27  2002.04.18  
At End Of Table


1-57736           pusrg                 2002-04-03 20:33  2002.04.18  
Получение значения по указателю.