Code:

type

// описания типов функций модуля

TGetModuleInfo=function:TModuleInfo;stdcall;

TInitialize=procedure;stdcall;

TRun=procedure;stdcall;

TTerminate=procedure;stdcall;

TSetData=procedure(Kind:TDataKind;const Buffer;Size:Integer);stdcall;

// непосресдвенно сам класс

TModule=class

private

   FFileName:String;  //имя файла

   FHandle:THandle;   // дескриптор библиотеки

   FModuleInfo:TModuleInfo;  // информация о модуле

   // адреса функций плагина

   FGetModuleInfo:TGetModuleInfo; // функция получения информации о модуле

   FInitialize:TInitialize;  // процедура инициализации

   FRun:TRun;  // процедура запуска

   FTerminate:TTerminate;  // процедура останова

   FSetData:TSetData;  // процедура передачи данных

public

   constructor Create(AFileName:String;var IsValidModule:Boolean);

   destructor Destroy;override;

   // вызов функций плагина

   function GetModuleInfo:TModuleInfo;

   procedure Initialize;

   procedure Run;

   procedure Terminate;

   procedure SetData(Kind:TDataKind;const Buffer;Size:Integer);

   // свойства плагина

   property FileName:String read FFileName;

   property Handle:THandle read FHandle;

   property ModuleInfo:TModuleInfo read FModuleInfo;

end;