1. Using "dialogs.e" (Irv's DOS gui)
- Posted by John F Dutcher <John_Dutcher at urmc.rochester.edu> Nov 19, 2004
- 492 views
This code works but the empty sequence used as the first parameter still in the "Input" call generates a large box surrounding the single line with the "prompt" and "response line" on it.... it can't be true that this "Box" which is at the left of the prompt sting and covers 5 or 6 lines can't be gotten rid of ??
include machine.e include get.e include dll.e include graphics.e include dialogs.e -- main code integer i sequence acct --, inrejamt, otrejamt, inflenam, otflenam, recd clear_screen() SetColors(BLACK, WHITE) acct = Input("",{"Please enter the account number: "},"____________") puts(1, acct) puts(1, "press any key to continue") i = wait_key()