Ошибка при динамическом вызове DLL [D5, Win2k]
Delph © (2002-04-08 12:29:00)
В 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:00) [1]
1)обязательно включить в uses первым sharemem
2)указать и в dll и в программе stdcall, например
Наверх 
ЧАТ |
Орешник |
|
