STEIN@UCONNVM.BITNET (Alan Stein) (07/31/89)
I am trying to create a dialog box using Orca/C. Without any examples in the documentation, I am having some difficulty. The following code creates a box but the box is empty and the program hangs. I'd appreciate it if someone either pointed out my glaring errors or sent a sample of a dialog creation. /**************************************************************** * * FileNew - Open a New File * ****************************************************************/ static void FileNew () { char name[255]; static ItemTemplate okbutton = { 1, 60, 60, 72, 360, buttonItem, "\pOK", 0, 0, NULL }; static ItemTemplate cancelbutton = { 2, 120, 150, 140, 350, buttonItem, "\pCancel", 0, 0, NULL }; static ItemTemplate message = { 3, 80, 100, 92, 300, itemDisable+statText, "\pClass Name", 0, 0, NULL } static ItemTemplate inputline = { 4, 60, 60, 92, 300, editLine, NULL, 255, 0, NULL }; static DialogTemplate dialogRec = /* dialog box */ { 50, 50, 150,450, 1, 0, NULL, NULL, NULL, NULL, 0 }; GrafPortPtr dialogptr; Word result; dialogRec.dtItemList[0] = (ItemTempPtr) &okbutton; dialogRec.dtItemList[1] = (ItemTempPtr) &cancelbutton; dialogRec.dtItemList[2] = (ItemTempPtr) &message; dialogRec.dtItemList[3] = (ItemTempPtr) &inputline; dialogptr = GetNewModalDialog (&dialogRec); result = ModalDialog(0); while (result != 1 || result != 2) result = ModalDialog(0); if (result == 1) { GetIText(dialogptr,4,name); } CloseDialog(dialogptr); } /* FileNew */ Alan H. Stein | stein@uconnvm.bitnet Department of Mathematics | stein%uconnvm.bitnet@mitvma.mit.edu University of Connecticut | ...psuvax1!UCONNVM.BITNET!STEIN 32 Hillside Avenue | Waterbury, CT 06710 | Compu$erve 71545,1500 (203) 757-1231 | GEnie ah.stein