Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АрхитектураБиологияГеографияДругоеИностранные языки
ИнформатикаИсторияКультураЛитератураМатематика
МедицинаМеханикаОбразованиеОхрана трудаПедагогика
ПолитикаПравоПрограммированиеПсихологияРелигия
СоциологияСпортСтроительствоФизикаФилософия
ФинансыХимияЭкологияЭкономикаЭлектроника

Изменить

Читайте также:
  1. Атализатор не может изменить состояние химического равновесия, которое зависит от пути реакции.
  2. Библия способна изменить жизнь человека
  3. Внимание! В стоимость тура включен минимальный тариф авиаперелета, который может измениться на момент бронирования. Просьба уточнять перед началом бронирования.
  4. Возможность Заказчика изменить условия контракта в соответствии с положениями Закона № 44-ФЗ.
  5. Возможность изменить мир
  6. Все свойства, которые необходимо изменить в программном коде, можно просмотреть в окне свойств (как называется, как правильно записывается, что означает).
  7. Если мужчина не понимает ценности вашего домашнего труда, в ваших силах изменить его воззрения.

publiclkod, lfio, lmest, lroz, lsmrt, lbio&&Объявлениеглобальныхпеременных

PUBLIC lflotm&& Флаг отмены действия ("Добавть" или "Изменить")

lflotm = "Изменить"

thisform.txtKod_avt.ReadOnly=.F. &&Доступна для ввода значение поля Kod_avt

thisform.txtFio.ReadOnly=.F. &&Доступна для ввода значение поля Fio

thisform.txtMest_roz.ReadOnly=.F. &&Доступна для ввода значение поля Mest_roz

thisform.txtData_roz.ReadOnly=.F. &&Доступна для ввода значение поля Data_roz

thisform.txtData_smrt.ReadOnly=.F. &&Доступна для ввода значение поля Data_smrt

thisform.txtBiograf.ReadOnly=.F. &&Доступна для ввода значение поля Biograf

thisform.txtKod_avt.setfocus&& Получение фокуса полем Kod_avt

thisform.command1.enabled=.F. &&He доступна "Начало"

thisform.command2.enabled=.F. && He доступна "Конец"

thisform.command3.enabled=.F. && He доступна "Вперёд"

thisform.command4.enabled=.F. && He доступна "Назад"

thisform.command10.enabled=.F. && He доступна "Выход"

thisform.command7.enabled=.F. && He доступна "Удалить"

thisform.command8.visible=.T. &&видимa кнопка "Применить"

thisform.command9.visible=.T. &&видимакнопка "Отменить"

thisform.command5.visible=.F. &&He видимакнопка "Добавить"

thisform.command6.visible=.F. &&He видимакнопка "Изменить"

&&глобальнымпеременнымlkod, lfio, lmest, lroz, lsmrt, lbio

&& присваивается новое значение, введенное в соответствующее поле

lkod=thisform.txtKod_avt.value

lfio=thisform.txtFio.value

lmest=thisform.txtMest_roz.value

lroz=thisform.txtData_roz.value

lsmrt=thisform.txtData_smrt.value

lbio=thisform.txtBiograf.value

Дата добавления: 2015-08-17; просмотров: 30 | Нарушение авторских прав

<== предыдущая страница | следующая страница ==>
Добавить| Отменить
mybiblioteka.su - 2015-2024 год. (0.005 сек.)