передача данных из/в DLL

[like_cloud]

доброго времени суток,господа.

пишу программку с использованием dll. В самой dll находится некоторая функция, реагирующая на события в винде и посылающее сообщение в программу,если происходит необходимое событие. Поразмыслив,решил что лучше всего будет реализовать это не через функцию,которая возвращает значения в программу,а через Postmessage(). Собственно в postmessage() надо указать handle формы, которой передаем сообщение (т.е. той же форме,что и вызвала dll). Возникает 2 вопроса:

как в dll передать handle формы? Предполагаю,что через функцию,т.е. примерно так:

код программы:

....
var
MyFunction (MYhandle:Thandle) : function : boolean;
....
begin
....
MYHANDLE:=Form.Handle;
MyFunction:=nil;
MYDLL:=LoadLibrary('MYDLL.dll');
   if   MYDLL>=32 then  begin
        @MyFunction:=GetProcAddress(MYDLL,'GetHandle');
          if @MyFunction<>nil then
          MyFunction(MYHANDLE);
....
end;

код dll:

....
var
MyHandle:THandle;
....
function GetHandle(:THandle):boolean;stdcall;export;
begin
  MyHandle:=MHNDL;
  result:=true;
end;

т.е. утрированно из программы мы вызываем функцию GetHandle в dll и через аргумент это функции передаем handle формы в dll. Но компилятор ругается на то,как я объявил функцию MyFunction в коде самой программы. Как правильно это сделать? Понимаю,вопрос слегка глуповат,но гугл меня не привел к ответу.


второй вопрос: предположим у приложения,вызвавшего dll нет формы. Как тогда передать сообщение в программу ведь handle по сути нет?

[Selestis]

Вродк так надо:

type TMyFunction = function(MYhandle:Thandle): boolean;
var f: TMyFunction;

[mihali4]

компилятор ругается на то,как я объявил функцию MyFunction в коде самой программы

...
function MyFunction (MYhandle:Thandle): Boolean; external 'Mydll';

var
  Form1: TForm1;
...

Как получить хэндл окна консольного приложения
http://www.rsdn.ru/article/qna/ui/conhandl.xml

[GunSmoker]

Как тогда передать сообщение в программу ведь handle по сути нет?

Не использовать оконные сообщения. Они не для этого предназначены.

Простой callback не устроит?

[3D Hunter]

Что значит "передать в DLL чего-то там"? формулировка неверная заранее. Правильнее реализовать в дллке не функцию, а класс, и в конструкторе передавать хэндл окна как параметр. Но правильно сказали, что и в этом случае класс из длл не сможет перехватывать сообщения, ведь посылаются они окну. В этом случае логично создать в приложении callback-метод перехвата всех сообщений форме, который будет ретранслировать их в метод класса из длл на обработку.