home *** CD-ROM | disk | FTP | other *** search
- {$A+,B-,D-,E-,F+,G-,I-,L-,N-,O+,P-,Q-,R-,S-,T-,V-,X-}
- (*===================================================================*)
- (* Euro_.PAS *)
- (* European-Font im Overlay *)
- (*===================================================================*)
-
- UNIT Euro_;
-
- INTERFACE
-
- FUNCTION ReadEuropeanFont: POINTER;
-
- IMPLEMENTATION
-
- PROCEDURE EuropeanFontProc; EXTERNAL; {$L EURO.OBJ }
-
- FUNCTION ReadEuropeanFont: Pointer;
- BEGIN
- ReadEuropeanFont := @EuropeanFontProc;
- END;
-
- END.
-