Форум: "Основная";
Поиск по всему сайту: 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.013 c
1-57787           Rammst                2002-04-06 06:23  2002.04.18  
Клавиатура


1-57818           Demon Ltd             2002-04-07 01:27  2002.04.18  
Повторное обращение с помощью с Меню


4-57918           five                  2002-02-15 10:27  2002.04.18  
изменения в каталогах


1-57709           mike.dld              2002-04-06 00:22  2002.04.18  
Delphi4 vs Delphi6


6-57837           Андре                 2002-01-29 19:15  2002.04.18  
Socket error