ZXNet эхоконференция «code.zx»
тема: xcom!!!
от: 812/08.16
кому: Paul Falcon
дата: 21 Oct 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
|