Hola.
Aquí te pongo un ejemplo de un programa que utiliza una unidad creada por el programador.
***************************************************************************
Program enlazado1;
uses crt, Program2;
begin
ClrScr;
Writeln('Esta seccion pertenece al programa 1');
Escribir;
Escribir2;
ReadKey
end.
**************************************************************************
Unit Program2;
Interface
uses Crt;
procedure Escribir;
procedure Escribir2;
Implementation
Procedure Escribir;
begin
Writeln('Esta seccion pertenece al programa 2');
end;
Procedure Escribir2;
begin
Writeln('Esta seccion tambien pertenece al programa 2');
end;
end.
***************************************************************************
Precaución: Debes utilizar el mismo identificador para el nombre de la unidad y del archivo en el que guardarás el código!. Si la unidad se llama Program2.pas, esta empieza con:
Unit Program2;
Interface
Etc,etc,..
Y en el programa principar pones:
uses crt,program2;
Saludos!
