[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Problem with units in ORCA/Pascal



          {This it the unit}
{$MemoryModel 1}
{$Segment 'Test', keep 'Test'}
 
Unit Test;
 
INTERFACE
uses
  {some tools}
 
    { declare here your variable and types for this unit}
procedure DoAnything (this, that, andsomeother : integer);
 
IMPLEMENTATION
 
procedure DoAnything;
begin
end;
 
END.
===================================================================
           {And now the Program}
{$MemoryModel 1}
{$keep 'MainProg'}
Program MainProg;
uses
  {some Tools}, Test;
===================================================================
for this example you must compile the unit and copy the test.int file
to 13:orcapascaldefs:, then create an lib file with
      makelib testLib +test.a
the copy the file testLib to 13:
===================================================================
            {or you take this MainProg}
{$MemoryModel 1}
{$keep 'MainProg'}
Program MainProg;
uses
  {some Tools},
{$LibPrefix 'theDirectoryWhereAreMyUnits:'}
  Test;
===================================================================
after compile the MainProg you must also link your files with
link MainProg theDirectoryWhereAreMyUnits:test.a keep=MainProg
 
For me this example Work fine. I hope this help You
 
Best regards from Germany
 
  Theo
 
 

-- 
   
   +****************************************************************+
   *  Theo Schneider       |       Tom Tooly Software Berlin        * 
	*  Babelsberger Str. 40 | Internet : tooly@zelator.in-berlin.de  *
   *  1000 Berlin 31       | Zerberus : T.Schneider@TeleMail.Zer    *
   *  Germany              | Phone    : ++49 30 854 29 72           *
   +****************************************************************+