Тема: CallDLL
Показать сообщение отдельно
Старый 22.05.2007, 19:20   #10
butcher
Оператор ЭВМ
 
Регистрация: 17.04.2007
Сообщений: 31
Написано 0 полезных сообщений
(для 0 пользователей)
Опечатался малек :
params=CreateBank(8)
PokeFloat params,0,1.1
PokeFloat params,4,3.2
results=CreateBank(4)
result#=CallDLL( "System\systems.dll","Bmin",params,results ) 
Я писал dll в Delphi вот:
library systems;
uses
  SysUtils,
  Classes;
{$R *.res}
function Bmin(num1,num2:integer):integer;  cdecl(stdcall);
begin
Result:=num2*num1;
end;
exports Bmin name 'Bmin' ;
begin
end.
Вроде все ок!!! В Game Maker все работает!!!
(Offline)
 
Ответить с цитированием