все привет. нашел такой пример в сети:

code:
type myproc = procedure; stdcall;

procedure Proc1;
begin
ShowMessage('Hello From Proc1');
end;

procedure TForm1.Button1Click(Sender: TObject);
var p: myproc; h: HWND;
begin
h := GetModuleHandle(nil);
p := GetProcAddress(h,'Proc1');
ShowMessage(IntToStr(h));
p; // вот он сам вызов процедуры
p := nil;
end;

Но, как я понимаю F1, GetProcAddress работает для процедур из dll. А как то же самое сделать, если моя процедура как обы ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83463