[Ksanatos]

2AVL
основная прога

uses
  MyUnit;
var
  VarWithTypeFromUnit : TypeFromUnit;

begin
  VarWithTypeFromUnit:=10;
  VarFromUnit:=VarFromUnit+'bla-bla';
end.

модуль

unit MyUnit;
interface
  type
    TypeFromUnit : integer;
  var
    VarFromUnit : string;

  procedure ScUnitInit;

implementation
  uses
    MyScUnit; // ответ на второй вопрос в посте 19

  procedure ScUnitInit;
  begin
    VarFromUnit:=ScUnitFunc;
  end;
end.

второй модуль

unit MyScUnit;
interface
  function ScUnitFunc : string;

implementation
  function ScUnitFunc : string;
  begin
    ScUnitFunc:='bla-bla ';
  end;

end.

2kizup
вроде бы в мп2 рекурсия модулей не реализованна, по крайней мере она там не работает. Насчет 3 версии не знаю, не проверял, но в хелпе ничего нового не замечал об этом.