Предыдущая страница реферата | 1  2  3  4  5  6 | Следующая страница реферата

DO CASE

CASE PAS#'332087S'

WAIT 'НЕ ПРАВИЛЬНО ВВЕДЕН ПАРОЛЬ' WINDOW

OTHERWISE

PS=1

RELEASE WINDOW BEGIN

ENDCASE
ENDDO
*** Открытие баз данных и установка связей
USE READERS IN A ORDER 1
USE BOOKS IN B ORDER 1
SET RELATION TO NOMBIL INTO B
SET SKIP TO B
*** Описание окон
DEFINE WINDOW F1 FROM 12,27 TO 20,73;

TITLE ' ПОМОЩЬ ';

COLOR W+/G DOUBL SHADOW
DEFINE WINDOW F3 FROM 13,10 TO 22,69;

TITLE ' ВЫДАТЬ КHИГУ ';

COLOR SCHEME 5 DOUBL SHADOW
DEFINE WINDOW SELECT FROM 3,2 TO 14,78;

TITLE ' ВЫБОР КHИГИ ';

COLOR W+/GR,W+/GR,W+/GR,W+/GR,,W+/N
DEFINE WINDOW SELECT1 FROM 2,0 TO 22,79;

TITLE ' ПРОСМОТР ДОЛЖHИКОВ ';

COLOR W+/BG
DEFINE WINDOW F4 FROM 11,0 TO 18,53;

TITLE 'ДАHHЫЕ ЧИТАТЕЛЯ';

COLOR SCHEME 5 DOUBL SHADOW
DEFINE WINDOW BROWSE1 FROM 0,0 TO 4,79;

TITLE DTOC(DATE());

COLOR W+/B
DEFINE WINDOW BROWSE FROM 5,0 TO 15,79;

COLOR SCHEME 10
DEFINE WINDOW NOMER FROM 15,25 TO 18,55;

TITLE 'ПОИСК ЧИТАТЕЛЯ';

COLOR SCHEME 5 SHADOW
DEFINE WINDOW APPEND FROM 14,15 TO 22,69;

TITLE ' ДОБАВЛЕHИЕ ЧИТАТЕЛЯ ';

DOUBLE COLOR SCHEME 5 SHADOW
DEFINE WINDOW APPEND1 FROM 13,15 TO 23,69;

TITLE ' ДОБАВЛЕHИЕ КHИГИ ';

Рекомендуем скачать другие рефераты по теме: предмет культурологии, банк дипломных работ.





Предыдущая страница реферата | 1  2  3  4  5  6 | Следующая страница реферата