Освобождать динамические процедуры.

[Alex Cones]

Type
 TPROCNAME = Procedure(BLABLABLA); StdCall;
Var
 PROCNAME : TPROCNAME;

Далее динамически гружу проки и функи:

Извиняюсь за цветность, фоткал с остановленной VM.
И освобождаю:

FreeLibrary(DLLInstance);

Вопрос:
Нужно ли что-то делать с проками и функами по OnDestroy?

[raxp]

не нужно...
и еще, множество вызовов и инициализаций оформил-бы одной функой...

 button_start: function:boolean;stdcall; // приблизительно , параметров не знаю вызова ваших
 button_up: function:boolean;stdcall;
                           FLib: THandle;


function LinkProc(ProcName: string): Pointer; // функа
 begin
  try
   result:= GetProcAddress(FLib,PansiChar(ProcName));
   Win32Check(Assigned(Result))
  except end
 end;


...
   FLib:= LoadLibrary(pansichar(plib + DllName));
   Win32Check(FLib<>0); // проверяем загрузилась-ли
   //
   button_start := LinkProc('button_start'); // получили адрес точки входа и уже можем использовать
   button_up    := LinkProc('button_up');
...
и т.д.

upd
-------
ввел лишь как дополнительную проверку...

Функция проверяет результат выполнения функции Win32 API, которая в качестве результата возвращает величину булева типа.
Если вызов функции Win32 API вызвал ошибку (передано значение False), то функция Win32Check вызывает функцию RaiseLastWin32Error, которая, в свою очередь, вызывает исключение. Если функция Win32 API возвращает True, то Win32Check возвращает True, а иначе - False

[Alex Cones]

Не могли бы Вы расставить комментарии по строкам? Я д[лл]инамикой только недавно начал заниматься.
Особенно непонятен Win32Check

[Stilet]

С функциями и процедурами не нужно поступать так как с классами.
Виндовс с ними сам разберется в плане уборки мусора.

[Alex Cones]

Благодарю за все ответы.