Last updated: 7. 1.1998, 23:23
<*/NOWARN:F*> DEFINITION MODULE StrStuff; IMPORT WIN32; TYPE PSTRCB = PROCEDURE(WIN32.PSTR,WIN32.PVOID): BOOLEAN [EXPORT]; CONST MAX_STRINGS = 256; <*/PUSH*> %IF WIN32 %THEN <*/CALLS:WIN32SYSTEM*> %ELSE <*/CALLS:WINSYSTEM*> %END (*++++*****************************************************************) PROCEDURE AddString (pStringIn : WIN32.PSTR) : BOOLEAN [EXPORT]; (**********************************************************************) <*/POP*> <*/PUSH*> %IF WIN32 %THEN <*/CALLS:WIN32SYSTEM*> %ELSE <*/CALLS:WINSYSTEM*> %END (*++++*****************************************************************) PROCEDURE DeleteString (pStringIn : WIN32.PSTR) : BOOLEAN [EXPORT]; (**********************************************************************) <*/POP*> <*/PUSH*> %IF WIN32 %THEN <*/CALLS:WIN32SYSTEM*> %ELSE <*/CALLS:WINSYSTEM*> %END (*++++*****************************************************************) PROCEDURE GetStrings(pfnGetStrCallBack : PSTRCB; pParam : WIN32.PVOID) : INTEGER [EXPORT]; (**********************************************************************) <*/POP*> END StrStuff.