Código Delphi [-] unit libreria; interface uses dialogs; procedure dibujar; implementation procedure dibujar; begin showmessage('hola'); end; end.
unit libreria; interface uses dialogs; procedure dibujar; implementation procedure dibujar; begin showmessage('hola'); end; end.