Unit test1;
interface
procedure line1;
procedure line2;
implementation
procedure line1;
begin
Writeln;
Writeln('-----------------------------------------------------------------------------------------------');
end;
procedure line2;
begin
Writeln;
Writeln('___________________________________________________________________');
end;
end.
как его компильнуть в модуль *.tpu А потом подключить в тело какой нить проги???