[[seoane]]

Prueba asi

Código Delphi [-]
unit global;

interface
Var nom,app,apm,calu,carr,sem,tur:string;
implementation
uses principal;

end.