[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 *
+****************************************************************+