Скачать: CL | DM;

dll, что не так делаю...   Найти похожие ветки 

← →
destrs   (2007-12-14 17:33) [0]

library test;
uses
 Graphics, SysUtils, Classes;

var
 myBmp: TBitMap;

 procedure Init(opt: Boolean);
 begin
   if opt then myBmp:= TBitmap.Create else myBmp.free;
 end;

exports
  Init;

begin
end.

в проге:

implementation
procedure Init(optInit: Boolean); stdcall; external "test.dll";

{$R *.dfm}

procedure TForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 init(false);
end;

procedure TForm.FormCreate(Sender: TObject);
begin
 init(true);
end;

при запуске вылетает Access at adress 000000001
только начал изучать, пока не пойму что не так.. ;)

---

← →
Германн ©   (2007-12-14 17:36) [1]

> stdcall

---

← →
destrs   (2007-12-14 17:40) [2]

блин, спасибо Герман!
а в каких случаях stdcall ?

---

← →
Kolan ©   (2007-12-14 17:42) [3]

> а в каких случаях stdcall ?

Случаи описаны в справке оч. подробно.

---

← →
destrs   (2007-12-14 17:50) [4]

мне бы ещё визуальные настройки в библиотеке реализовать,
тоесть форму надо, как понимаю это не так просто...
если знаете, поделитесь ссылками где можно почитать про реализацию форм в dll

---

← →
Германн ©   (2007-12-14 17:52) [5]

> destrs   (14.12.07 17:40) [2]
>
> блин, спасибо Герман!
> а в каких случаях stdcall ?
>

Функция и в dll и в вызывающей программе должна быть описана одинаково.

---

← →
Kolan ©   (2007-12-14 17:53) [6]

> если знаете, поделитесь ссылками где можно почитать про
> реализацию форм в dll

В руководстве разработчика вроде есть(не помню в какой части).
http://www.ksoftware.ru/library.html

---

← →
destrs   (2007-12-14 17:57) [7]

Спасибо большое!
будем изучать..

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c