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 и в вызывающей программе должна быть описана одинаково.

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

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

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

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

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