| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849 |
- DEFINITION MODULE MsgBox2;
- (*
- * REPERTOIRE
- * Release 1.6
- * By Charles Bradford and Cole Brecheen
- * (c) Copyright 1985-1992 PMI
- * Green Bay, Wisconsin
- * All rights reserved
- * (414) 468-6040
- *
- * $Header: D:/logfiles/defs/msgbox2.dev 1.4 30 Dec 1990 18:02:32 coleb $
- *
- *)
- FROM GenLists IMPORT GenList;
- FROM ScrnTypes IMPORT DisplayFrame;
- FROM VWindows IMPORT Compass;
- PROCEDURE FindExteriorCoords( locatn: Compass;
- ListWidth, ListHeight: CARDINAL; VAR col1,
- row1, col2, row2: CARDINAL );
- PROCEDURE FindBestCoords( TheFrame:
- DisplayFrame; locatn: Compass; ListWidth,
- ListHeight : CARDINAL; VAR col1, row1, col2,
- row2: CARDINAL );
- PROCEDURE LstMsgBox( TheFrame: DisplayFrame;
- locatn : Compass; VAR TheList: GenList );
- PROCEDURE LstMsgBoxExterior( TheFrame:
- DisplayFrame; locatn : Compass; VAR TheList:
- GenList );
- PROCEDURE MsgOkay( TheFrame: DisplayFrame;
- locatn : Compass; TheStr : ARRAY OF CHAR ):
- BOOLEAN;
- PROCEDURE StrMsgBox( TheFrame: DisplayFrame;
- locatn : Compass; TheStr : ARRAY OF CHAR );
- PROCEDURE StrMsgBoxExterior( TheFrame:
- DisplayFrame; locatn : Compass; TheStr :
- ARRAY OF CHAR );
- PROCEDURE Init();
- END MsgBox2.
|