Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / (TextBox) Свойство ReadOnly / 7 сообщений из 7, страница 1 из 1
15.08.2005, 15:59:07
    #33216002
Grumax_user
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(TextBox) Свойство ReadOnly
Ситуация такова... Есть форма на ней предположим 20 TextBox'ов, при запуске определенным пользователем буду передавать в форму параметр, который будет определять "Просмотр" - "Редактирование". Варианты:
1. Сделать поля не активными т.е. св-во ReadOnly = .T.
2. Сделать неактивным Update таблиц (пусть в полях делаю что хотят, но инфа не обновится)
Что лучше? Чисто с точки зрения программирования меня интересует 1 вопрос, потому что во 2 случае все решает конструкция IF...ENDIF. Мне интересно как динамически проставить для всех TextBox'ов только чтение, вариант макроподстановки состоящий из формирования "ThisForm.Text"+STR(n.lnI,1)+"ReadOnly" не подходит, т.к. имена TextBox'ов уникальны. Спасибо.

------------------------------------------------------------------------------------
Код: plaintext
Я во все дела суюсь -> всесторонне разовьюсь                                                         Visual FoxPro 8.0
...
Рейтинг: 0 / 0
15.08.2005, 16:06:59
    #33216035
Hel!Riser
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(TextBox) Свойство ReadOnly
привяжись тогда к сырцу контрола или базового класа. а их перебирать и выставлять пропертю в цикле по фсем контролам формы
...
Рейтинг: 0 / 0
15.08.2005, 16:09:31
    #33216043
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(TextBox) Свойство ReadOnly
SetAll("ReadOnly",.T.,"Textbox")
...
Рейтинг: 0 / 0
15.08.2005, 16:14:46
    #33216058
karly™
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(TextBox) Свойство ReadOnly
Можно на форме сделать две кнопки - "Сохранить" и "Выйти без сохранения". Если форма в режиме просмотра, то кнопку "Сохранить" недоступна, либо невидма совсем :-)
Так ты избежишь проколов, если у тебя кроме текстбоксов будут использоваться другие контролы для редактирования.
...
Рейтинг: 0 / 0
16.08.2005, 08:51:47
    #33216747
Grumax_user
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(TextBox) Свойство ReadOnly
Спасибо. Вариант с контейнером хочу попоробовать, если конечно понимаю всё правильно :-)). Допустим хочу разделить TextBox'ы на группы, хотя бы 2. В одной 5, в другой 15. В определенный момент нужно на чтение сделать 5, в другой 20.
Как добавить TextBox в контейнер? Что-то не получается :-(( Тогда ИМХО могу внутри контейнера SetAll делать.

------------------------------------------------------------------------------------
Код: plaintext
Я во все дела суюсь -> всесторонне разовьюсь                                                         Visual FoxPro 8.0
...
Рейтинг: 0 / 0
16.08.2005, 08:58:05
    #33216756
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(TextBox) Свойство ReadOnly
Как добавить TextBox в контейнер? Что-то не получается :-(( Тогда ИМХО могу внутри контейнера SetAll делать.
Контейнер\Правый клик\Редактировать
...
Рейтинг: 0 / 0
16.08.2005, 12:28:11
    #33217639
Igor Korolyov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(TextBox) Свойство ReadOnly
Hi Grumax_user!

> 2. Сделать неактивным Update таблиц (пусть в полях делаю что хотят, но
> инфа не обновится)

Плохо это. Не поймут тебя...

Вообще SetAll вещь полезная, а если ещё и текстбоксы от своего класса
делать, а в них свойство типа nMode с Assing методом - то через SetAll можно
будет выборочно отключать контролы - опять-же "знать" о том нужно им
включится или нет будет сам контрол - он сравнит This.nMode с какой-то
константой и определит надо ему стать ReadOnly или нет. Конечно это лишь
СХЕМА в деталях обычно всё посложнее бывает.

Posted via ActualForum NNTP Server 1.2
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / (TextBox) Свойство ReadOnly / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]