Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Код покупателя -> Покупатель - нужно без Grida / 9 сообщений из 9, страница 1 из 1
07.10.2004, 22:06
    #32728958
help123
help123
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
Уважаемые посетители, помогите, ато не понимаю:

Суть вопроса: есть форма в которой есть два поля TextBox: sellerk (код покупателя) и
seller (название покупателя) и есть две таблицы: mparent (таблица в которой эти
данные должны сохраняться - поля sellerk и seller и другие) и sell (таблица из которой эти данные берутся - поля sellerk и seller).
Необходимо сделать , чтобы в форме после ввода в поле sellerk кода покупателя и
нажатия таб или ентер (потеря фокуса) - в поле seller автоматически появлялось
название покупателя которое берется из таблицы sell.

В DataEnvironment формы курсоры связаны: mparent.sellerk -> sell.sellerk
В TextBox sellerk LostFocus: ThisForm.seller.Value = sell.seller
ThisForm.Refresh

Теперь то чего понять немогу : если в форме есть Grid, построенный по таблице

Как эта проблема решается, ато замучился уже (может глупый вопрос)
mparent -> то все работает, если его нет -> то данные в поле seller не обновляются.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 01:02
    #32728990
Spavel_74
Spavel_74
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
Не совсем понятно что хочется но попробуй так
В LostFocus sellerk
sellerk_=Alltrim(Upper(this.value))
Select sell
Select seller from sell where Alltrim(Upper(sellerk))==sellerk_ into Cursor q1
select q1
count all to countrec_
if countrec_=0
messagebox("покупатель в таблице sell ненайден")
endif
Tfisform.seller.value=Alltrim(q1.seller)
use
Select sell
Thisform.Refresh()
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 09:30
    #32729166
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
У тебя некорректная структура данных.

Нельзя дублировать название элемента справочника в рабочей таблице (mparent). В ней должен быть только код записи (sellerK), а собственно название необходимо брать непосредственно из таблицы-справочника (sell)

Т.е. в Grid делаешь примерно следующие настройки

Grid.Column1.ControlSource="mparent.sellerK"
Grid.Column2.ControlSource="sell.seller"
Grid.Column2.ReadOnly = .T.

Подробнее читай здесь

Раздел "Связи и отношения"
http://www.foxhelp.ru/SovetyNachinajushhim?v=1agr
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 11:05
    #32729398
help123
help123
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
Все-таки неполучается!??
Вот пример как я делаю - файл problem.zip

там две формы: work и dontwork соответственно в одной работает,
а в другой - нет
Прямо ерунда какая-то.

ПАМАГИТЕ!!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 11:26
    #32729493
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
Поставь самой первой командой в методе ThisForm.SellerK.LostFocus()

GO RECNO() IN Mparent
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 11:40
    #32729542
help123
help123
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
БОЛЬШОЕ СПАСИБО "ВЛАДИМИРМ" ВСЕ ЗАРАБОТАЛО.*******
************************************************

Да будет так
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 15:24
    #32730234
help123
help123
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
Если можно - то еще есть один вопрос:

А как теперь отловить событие, если в форме введен код покупателя, которого нету в таблице sell и вывести сообщение об этом....

заранее благодарен
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 15:44
    #32730283
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
Первые строки в методе ThisForm.SellerK.LostFocus()

Код: plaintext
1.
2.
3.
4.
5.
GO RECNO() IN MParent
IF FOUND('sell')=.F.
	MESSAGEBOX('ничего нету-ти')
ENDIF
ThisForm.seller.Value = sell.seller
ThisForm.Refresh
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2004, 16:03
    #32730324
help123
help123
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Код покупателя -> Покупатель - нужно без Grida
Все гениально и просто!!! Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Код покупателя -> Покупатель - нужно без Grida / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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