Unit sin clases pero con funciones

[roman]

Debes declarar las funciones en la parte interface

Código Delphi [-]
unit libreria;

interface

uses dialogs;

procedure dibujar;

implementation

procedure dibujar;
begin
showmessage('hola');
end;

end.

// Saludos