Amigo
CarlosHernandez >
Si vas a hacer una unidad con procedimientos y/o funciones que no van a pertenecer a ninguna clase pues puedes hacerlo así:
Código Delphi
[-]unit Unit2;
interface
uses Dialogs;
procedure Hola();
implementation
procedure Hola();
begin
ShowMessage('Hola');
end;
end.
Ahora si por el contrario vas a crear nuevas
clases entoces lo haces así:
Código Delphi
[-]unit Unit3;
interface
uses Dialogs;
type
MiClase = Class
private
public
procedure Hola(); end;
implementation
procedure MiClase.Hola;
begin
ShowMessage('Hola');
end;
end.
Espero que todo haya quedado claro.
.
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7