Hola,
Puedes incluir los prototipos de las funciones de la DLL dentro de la "interface" de la unidad en donde quieras utilizarlas. O, de otro modo, puedes incluirlas dentro de la "interface" de una determinada unidad creada a tal efecto. Luego podrías incluir dicha unidad en otras en donde quisieras hacer uso de las funciones en cuestión.
Por ejemplo, mira cómo añadirlas en una determinada unidad:
Código Delphi
[-]
unit UMisFunciones;
interface
function MiFuncion(Variable: String): Integer; external 'MiLibreria.dll';
procedure MiProced(Variable: String): String; external 'MiLibreria.dll';
implementation
end.
Luego podrías incluir la unidad "UMisFunciones" allí donde quisieras hacer uso de ella.
La siguiente es una unidad "real" que contiene una función que se encuentra en determinada DLL:
Código Delphi
[-]
unit XpTheme;
interface
uses
Windows;
function IsThemeActive : BOOL; external 'uxtheme.dll' name 'IsThemeActive';
implementation
end.
En cualquier otra unidad podría hacer uso de la función "IsThemeActive" con solo añadir la unidad que la contiene:
Código Delphi
[-]
uses
XpTheme;
procedure TForm1.Button1Click(Sender: TObject);
begin
if IsThemeActive then
ShowMessage('El tema de Windows XP está activo')
else
ShowMessage('No hay ningún tema de Windows XP activo');
end;