ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Обнуление полей формы
6 сообщений из 6, страница 1 из 1
Обнуление полей формы
    #33530468
Igrok4
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Igrok4
Участник
Есть форма, на ней в контейнере есть два вида TextBox:
1). Редактируется в форме.
2). Не редактируется. Вычисляется на основе первого вида, при потере фокуса первого.

Conteiner1.Refresh обнуляет только первый вид. Как можно обнулить второй вид?
И ещё: имена полей идут по порядку, т.е. Text1.....TextN. Можно ли задать цикл, в котором бы менялось имя поля, чтобы не перечислять их все?
Спасибо!
...
Рейтинг: 0 / 0
08.02.2006, 10:37
| Ответить | Цитировать | Написать  
Обнуление полей формы
    #33530566
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Crispy
Гость
Можно задавать:
thisform.container1.text2.Value=''
А по поводу цикла - можно пользоваться подстановкой, т.е., что-то вроде
Код: plaintext
1.
2.
3.
4.
FOR i= 1  to n
   nam='thisform.text'+LTRIM(STR(i))+'.BackColor=_bckcolor'
   &nam
ENDFOR
Либо, если для этого свойства это возможно, использовать метод SetAll(). Посмотри в хэлпе про него, вроде все достаточно просто, разве что он не для всего пригоден.
...
Рейтинг: 0 / 0
08.02.2006, 10:58
| Ответить | Цитировать | Написать  
Обнуление полей формы
    #33530620
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex11100
Гость
Код: plaintext
1.
2.
3.
4.
5.
for each oControl in thisform.Controls
    if oControl.Baseclass ="Textbox"
       ? oControl.Name
    endif
endfor
...
Рейтинг: 0 / 0
08.02.2006, 11:11
| Ответить | Цитировать | Написать  
Обнуление полей формы
    #33530746
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Aleksey-K
Участник
1. Создать класс, например MytxtClass, на основе класса TextBox
2. Добавить объекты этого класса на форму (контейнер)
3. Для установки любого свойства ВСЕХ объектах данного класса на форме (контейнере):
THISFORM.container1.SetAll("Value", "", "MytxtClass")
THISFORM.container1.SetAll("BackColor", RGB(...), "MytxtClass")
и так далее.

С уважением, Алексей
...
Рейтинг: 0 / 0
08.02.2006, 11:39
| Ответить | Цитировать | Написать  
Обнуление полей формы
    #33531083
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Crispy
Гость
2Aleksey-K :

К сожалению НЕ любое свойство можно менять так просто через SetAll(). Есть некоторые глюки и недоработки у этого метода.
Вот хотя бы такой пример:
/topic/199118&hl=setall
...
Рейтинг: 0 / 0
08.02.2006, 12:54
| Ответить | Цитировать | Написать  
Обнуление полей формы
    #33539253
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Igor Korolyov
Участник
Hi Crispy!

Ну там всё-же не сам SetAll обсуждался то :) Он работает и вполне себе
надёжно работает, но конечно он ограничен - впрочем это и из его описания в
хелпе видно.

Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
12.02.2006, 02:35
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Обнуление полей формы
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&fpage=275&tid=1592381]:
 0ms
get settings:
 11ms
get forum list:
 21ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 71ms
get topic data:
 12ms
get forum data:
 4ms
get page messages:
 51ms
get tp. blocked users:
 2ms
others: 215ms
total:  395ms
созд. / загр.: 395ms
x
x
Закрыть


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