david
7ebea5ffa7
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.jvcl@12 7f62d464-2af8-f54e-996c-e91b33f51cbe
18 lines
236 B
ObjectPascal
18 lines
236 B
ObjectPascal
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.
|