Listing: 1 DEFINITION MODULE MsgBox2; 2 (* 3 * REPERTOIRE 4 * Release 1.6 5 * By Charles Bradford and Cole Brecheen 6 * (c) Copyright 1985-1992 PMI 7 * Green Bay, Wisconsin 8 * All rights reserved 9 * (414) 468-6040 10 * 11 * $Header: D:/logfiles/defs/msgbox2.dev 1.4 30 Dec 1990 18:02:32 coleb $ 12 * 13 *) 14 15 16 FROM GenLists IMPORT GenList; 17 FROM ScrnTypes IMPORT DisplayFrame; 18 FROM VWindows IMPORT Compass; 19 20 PROCEDURE FindExteriorCoords( locatn: Compass; 21 ListWidth, ListHeight: CARDINAL; VAR col1, 22 row1, col2, row2: CARDINAL ); 23 24 PROCEDURE FindBestCoords( TheFrame: 25 DisplayFrame; locatn: Compass; ListWidth, 26 ListHeight : CARDINAL; VAR col1, row1, col2, 27 row2: CARDINAL ); 28 29 PROCEDURE LstMsgBox( TheFrame: DisplayFrame; 30 locatn : Compass; VAR TheList: GenList ); 31 32 PROCEDURE LstMsgBoxExterior( TheFrame: 33 DisplayFrame; locatn : Compass; VAR TheList: 34 GenList ); 35 36 PROCEDURE MsgOkay( TheFrame: DisplayFrame; 37 locatn : Compass; TheStr : ARRAY OF CHAR ): ***** ^ not supported yet 38 BOOLEAN; 39 40 PROCEDURE StrMsgBox( TheFrame: DisplayFrame; 41 locatn : Compass; TheStr : ARRAY OF CHAR ); ***** ^ not supported yet 42 43 PROCEDURE StrMsgBoxExterior( TheFrame: 44 DisplayFrame; locatn : Compass; TheStr : 45 ARRAY OF CHAR ); ***** ^ not supported yet 46 47 PROCEDURE Init(); 48 49 END MsgBox2. ***** ^ not supported yet 4 errors