FreePascal.ru

Вот дурак я невнимательный был. Сделал по аналогии с дельфийским:

library p1;

{$mode objfpc}

uses
Classes
{ add your units here };

procedure Insert(i: cardinal); cdecl;
begin
Writeln('DLL: Insert');
end;

procedure Dll_Process_Detach_Hook_Func(dllparam : longint);
begin ...

Sergei I. Gorelkin писал(а):Есть нехорошее ощущение, что код библиотеки, устанавливающий обработчики dll_thread_attach и dll_process_attach, выполняется уже после самих этих обработчиков...

А как быть?

Хочу отловить момент, когда dll цепляется к процессу.

Пишу самую элементарную DLL:


library p1;

{$mode objfpc}{$H+}

uses
Classes
{ add your units here };

procedure Insert(i: cardinal); cdecl;
var F:TextFile;
begin
AssignFile(F, 'c&#58 ...