Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Автовыбор в Combo / 6 сообщений из 6, страница 1 из 1
03.04.2008, 15:21
    #35233320
Starannik
Starannik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автовыбор в Combo
Приветствую Всех!

У меня вопрос, имеется форма с текстбоксами и прочими атрибутами, так вот хотелось бы чтобы при вводе в соответствующий текстбокс скажем фамилии или отчества(мужского, женского)сombobox автоматом высвечивал пол "Муж" или "Жен" соответсвенно .Как это осуществить программно, может кто подскажет..:) .Сам никак не разберусь.
Спасибо !
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.04.2008, 16:04
    #35233480
PaulWist
PaulWist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автовыбор в Combo
Ответьте на вопрос, Цой или Гуцуляк - это кто по полу
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.04.2008, 16:17
    #35233511
Starannik
Starannik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автовыбор в Combo
PaulWistОтветьте на вопрос, Цой или Гуцуляк - это кто по полу

Я, тоже люблю пошутить :)
Но, вопрос вроде конретный, а насчет Цой или Гуцуляк и т.д. можно же сделать чтобы программа выдавала вопрос о ручном выборе пола :) или подтверждении.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.04.2008, 05:34
    #35234583
Galyamov Rinat
Galyamov Rinat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автовыбор в Combo
> У меня вопрос, имеется форма с текстбоксами и прочими атрибутами, так
> вот хотелось бы чтобы при вводе в соответствующий текстбокс скажем фамилии
> или отчества(мужского, женского)сombobox автоматом высвечивал пол "Муж"
> или "Жен" соответсвенно .Как это осуществить программно, может кто
> подскажет..:) .Сам никак не разберусь.
> Спасибо !

На lostFocus текстбокса вешаешь проверку:

lcOkonch=upper( Right( Rtrim (this.value) ,3) )

do case
case lcOkonch= 'ВИЧ'
Thisform.Combo.value='МУЖ'

case lcOkonch='ЕВА' or lcOkonch='ОВА'
Thisform.Combo.value='ЖЕН'

otherwise
Thisform.Combo.value='ОНО'
endcase


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.04.2008, 06:34
    #35234598
MiklS
MiklS
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автовыбор в Combo
По отчеству - запросто!
В Valid Текстбокса
Код: plaintext
1.
2.
3.
4.
IF UPPER(RIGHT(ALLTRIM(This.Value),  2 ))="ИЧ"
    ? "Мужской" && ThisForm.Combo1.DisplayValue="Муж."
ELSE
   ? "Женский"   && ThisForm.Combo1.DisplayValue="Жен."
ENDIF
В ините Combo1
Код: plaintext
1.
This.AddItem("Mуж.",  1 ,  1 )
This.AddItem("Жен.",  2 ,  1 )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.04.2008, 09:01
    #35234724
Starannik
Starannik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автовыбор в Combo
Спасибо мужики !

Все Ок!
Воистину Век живи- Век учись ! :))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Автовыбор в Combo / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 328ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1587937]:
 0ms
get settings:
 7ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 48ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 38ms
get tp. blocked users:
 1ms
others: 202ms
total:  328ms
x
x
Закрыть


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