Текущий архив: 2002.04.18;
Скачать: CL | DM;
Вниз
Ошибка при динамическом вызове 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, например
Страницы: 1 вся ветка
Текущий архив: 2002.04.18;
Скачать: CL | DM;
Память: 0.43 MB
Время: 0.005 c
