xcom!!!

ZXNet эхоконференция «code.zx»

От 812/08.16 Кому Paul Falcon 21.10.1997

Рад приветствовать тебя, Paul! Возможно тебе будет интересно глянуть как у меня в текствритере описывается окнo: ================================================================ ;Main Window db x,y,len,hgt,"window name:",0 dw OК ;если юзер нажал Enter dw CANCEL ;если юзер нажал Escape ;дальше идут различные структуры управления их можно ставить в любой последовательности db LocalWindow ;код(имя) структуры db x,y,len,hgt,"local name 1",0 db x,y,len,hgt,"local name 2",0 db x,y,len,hgt,"local name 3",0 db #FF ; маркер конца структуры db PushButton db x,y,len dw CallAddress1 ; если юзер "нажал", выполнить подпрограмму db "OK",0 ; текст кнопки db x,y,len dw CallAddress2 ; если юзер "нажал", выполнить подпрограмму db "Cancel",0 ; текст кнопки db #FF db RadioButtons dw SOUND ; адрес переменной в которой хранится состояние кнопок db x,y,"Off",0 db x,y,"Beeper",0 db x,y,"AY-8910",0 db #FF db CheckBox dw BRIGHT ; адрес переменной db x,y,"Bright ",0 dw EMODE ; адрес переменной db x,y,"Text Mode ",0 db #FF db #FF ================================================================ С уважением, Denis. -+- ZX WORD