maestro_
Joined: 29 Jan 2003 Posts: 95
|
Posted: 04 Jun 2007 11:37 Post subject: Диалог своими силами.. |
|
|
Code: |
Dbeg:=Bom(date())
Dend:=eom(Date())
shadowbox('[ Ввод параметров ]',nrow, ncol, nrow+3, ncol+72)
@ nrow+1, ncol+1 SAY 'Начальная дата..............:' GET dBeg
@ nrow+2, ncol+1 SAY 'Конечная дата...............:' GET dEnd Valid dEnd>=dBeg
read
aDate:={Dbeg,dEnd}
|
есть вот такое диалоговое окошко. Сейчас наблюдаться немного странное поведение при вводе даты начала большей, чем дата окончания. Valid не дает покинуть дату окончания, пока не исправим дату на проходящую проверку. Такое поведение меня не устраивает.
Хотелось что бы происходил контроль на невозможность покидания формы при дате окончания меньше чем дата начала, а перемещение между полями допускалось.
Посоветуйте как реализовать!
Заранее большое спасибо! |
|