sample - global constants and variables (uunit1).pas

jvcl driver development envionment

unit UUnit1;

uses UUnit2, UUnit3;

{const
  UConst = 'UUnit1.UConst';}
var
  UVar: TStringList;

function main: string;
begin
  //Result := UConst;
  //Result := UUnit2.UConst;
  Result := UUnit2.UFunction;
end;

end.