Проблема с dll в KOL ! Помогите плиз!!!

← →
KisaNetik (2004-02-26 03:06) [0]

Доброго времени суток!
Существует такая проблема! создал dll в KOL в котором храню и вызываю форму
function PassEditor(User:string):integer;
var
Form1:PControl;
begin
Applet:=NewApplet("");
Form1:=NewForm(Applet,"..."+User);
Form1.ShowModal;
Result:=5;
end;

Exports
PassEditor index 1 name "PassEditor";

Потом вызываю эту форму в главной программе:

procedure TForm1.PMAdminN7Menu(Sender: PMenu; Item: Integer);
var
Handle:Cardinal;
PassEditor:function(User:string):integer;stdcall;
begin
Handle:=LoadLibrary("Utils.dll");
if Handle=0 then
begin
MsgBox("Error 54875",MB_OK);
exit;
end;
PassEditor:=GetProcAddress(Handle,"PassEditor");
if @PassEditor<>nil then MsgOK(Int2Str(PassEditor("1")));
FreeLibrary(Handle);
end;

Проблема 1 - Не передаются параметры! Загружается форма сразу при PassEditor:=GetProcAddress(Handle,"PassEditor");
Проблема 2 - При строчке if @PassEditor<>nil then MsgOK(Int2Str(PassEditor("1"))); возникает ошибка!!! В чём проблема? помогите...!!!! Утопаю в расстерянности!
Если делаю на VCL и просто функцию без формы в dll? то всё работает!

← →
KisaNetik (2004-02-26 03:13) [1]

с передачей параметра разобрался! Только-что осенило!!! Надо убрать просто в описании функции stdcall!!!!!! Но возникает другая ошибка - "Память не может быть read"!!! Что делать???

← →
mdw © (2004-02-26 10:25) [2]

А FAQ читать не пытался? И у Кладова на сайте, по моему, какой-то проимер был.

← →
SPeller © (2004-02-26 11:30) [3]

Form1: PForm1, а не PControl. А далее Form1.Form.XXX

← →
savva © (2004-02-26 11:35) [4]

http://bonanzas.rinet.ru/DemoModalVCL2KOLDLL.zip

← →
KisaNetik (2004-02-27 00:00) [5]

Пасибо!!!! Помогли разобратся!!!!!!! Всё типерь пашет!

← →
Gandalf © (2004-02-27 19:15) [6]

Мда еще - строки в dll это опастно...

← →
KisaNetik (2004-02-28 12:12) [7]

2KisaNetik

читай warning в pas-файле свежесозданной DLL

Народ его обычно игнорирует и удаляет ни разу не прочитав, а потом кричат - чей-то моя прога вылетает... Это корень зла - будь бдителен.

Проблема с dll в KOL ! Помогите плиз!!! Найти похожие ветки