Так же можно создать свой pas юнит с процедурами\функциями и, там, где нужно юзать процедуры\ф-ии из этого юнита, просто добавлять его в Uses. Причем наш юнит с процедурами\ф-ми можно вообще положить куда-нить на винт и юзать этот модуль вообще из любых своих проектов, просто добавив путь до папки в настройки среды (в Library path) и добавив в нужный проект в uses наш модуль, например:
типа наш юнит:
Код:
unit DFunctions;
interface
// used units & modules
uses
//...
const
//...
procedure CopyAllFiles(sFromFolder: String; sToFolder: String);
implementation
procedure CopyAllFiles(sFromFolder: String; sToFolder: String);
begin
//...
end;
end.
Кидаем этот юнит куда-нить на винт, отдельно от наших проектов.
Добавляем путь до папки в среду разработки, а потом, при написании проектов, если мы вдруг захотим юзать процедурку CopyAllFiles, то мы просто в Uses добавляем DFunctions, и спокойно в любом месте текущего нашего юнита вызываем эту процедурку.
Можно, чтобы было понятнее, откуда она, вызывать ее так:
Код:
DFunctions.CopyAllFiles(...);