ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Подскажите плиз
11 сообщений из 11, страница 1 из 1
Подскажите плиз
    #36500466
Svikator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Svikator
Гость
Ребят заранее пардон за глупые вопросы но в этом деле новичок!Подскажите плиз какую команду нужно прописать чтобы осуществлялся выход из меню с запросом?Какая команда нужна чтобы открыть форму из меню для редактирования и почему у меня не работает поиск таблицы klient при нажатии кнопки в форме:

f=thisform.text1.Value
BROWSE FIELDS fam_kli, ima_kli, otch_kli FOR UPPER(f) $ UPPER(fam_kli)
use
...
Рейтинг: 0 / 0
03.03.2010, 17:08
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36500850
reware
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
reware
Участник
SvikatorРебят заранее пардон за глупые вопросы но в этом деле новичок!Подскажите плиз какую команду нужно прописать чтобы осуществлялся выход из меню с запросом?Какая команда нужна чтобы открыть форму из меню для редактирования и почему у меня не работает поиск таблицы klient при нажатии кнопки в форме:

f=thisform.text1.Value
BROWSE FIELDS fam_kli, ima_kli, otch_kli FOR UPPER(f) $ UPPER(fam_kli)
use
Заранее пардон за глупые ответы, но не могу более - "а который сейчас час, и водички бы попить, да и переспать негде :) Модератор, не бей больно ногами.
...
Рейтинг: 0 / 0
03.03.2010, 19:10
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36500870
Svikator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Svikator
Гость
Помидорами только вот закидывать не надо)))
...
Рейтинг: 0 / 0
03.03.2010, 19:19
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36500979
piva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
piva
Участник
SvikatorРебят заранее пардон за глупые вопросы но в этом деле новичок!Подскажите плиз какую команду нужно прописать чтобы осуществлялся выход из меню с запросом?Какая команда нужна чтобы открыть форму из меню для редактирования и почему у меня не работает поиск таблицы klient при нажатии кнопки в форме:

f=thisform.text1.Value
BROWSE FIELDS fam_kli, ima_kli, otch_kli FOR UPPER(f) $ UPPER(fam_kli)
use

Четыре раза прочитал - но ничего не понял
"А у нас сегодня кошка родила вчера котоят" (c)
...
Рейтинг: 0 / 0
03.03.2010, 20:25
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36501021
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
SvikatorПодскажите плиз какую команду нужно прописать чтобы осуществлялся выход из меню с запросом?
Это невозможно, поскольку не существует такой операции как "выход из меню".

Может быть только выбор какого-то пункта меню, который осуществляет выход. Ну вот в процедуре, вызываемой по этому пункту меню, и написать запрос

SvikatorКакая команда нужна чтобы открыть форму из меню для редактирования
Вы можете вызвать форму. А будет ли эта форма для редактирования или просмотра определяется уже самой формой.

Стандартный вызов формы

Код: plaintext
DO FORM MyForm.scx

Svikatorпочему у меня не работает поиск таблицы klient при нажатии кнопки в форме:

Код: plaintext
1.
2.
f=thisform.text1.Value
BROWSE FIELDS fam_kli, ima_kli, otch_kli FOR UPPER(f) $ UPPER(fam_kli)
use

Что Вы подразумеваете под словами "не работает поиск"? Что именно у Вас происходит? По каким критериям Вы решили, что "поиск не сработал"?
...
Рейтинг: 0 / 0
03.03.2010, 20:50
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36501027
guest12345
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
guest12345
Участник
по первому вопросу: ПУНКТ МЕНЮ ВЫХОД ИЗ ПРОГРАММЫ

IF MESSAGEBOX("Закрыть программу?",1,"Диалог выхода из программы")=1
WAIT "Закрытие программы...." window timeout 2
QUIT
ELSE
WAIT "Продолжаем работу ...." window timeout 2
ENDIF
...
Рейтинг: 0 / 0
03.03.2010, 20:53
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36501365
Koryuu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Koryuu
Участник
попробуйте
Код: plaintext
1.
2.
f=ALLTRIM(thisform.text1.Value)
BROWSE FIELDS fam_kli, ima_kli, otch_kli FOR UPPER(f) $ UPPER(fam_kli)
use

Выход из меню с запросом.... подозреваю, что вам надо покопаться по поводу BAR()

На будущее - создавать темы с названиями "Помогите", "Хелп плиз" и т.п. - считается плохим тоном на любом форуме.
...
Рейтинг: 0 / 0
04.03.2010, 08:36
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36501961
Svikator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Svikator
Гость
С 2 пунктами разобрался...Поиск не работает находит пустые поля вместо существующих значений в таблице.
...
Рейтинг: 0 / 0
04.03.2010, 12:02
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36502387
Koryuu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Koryuu
Участник
Ну, на Вашем месте я бы поставил брекпоинт после первой строчки и проверил бы значение переменной f. Ну и вообще, запустите эту команду из командного окна. Проверьте, отработает ли.
Совсем дикий вариант - а может в вашей таблице нет того значения, которое вы набираете?
...
Рейтинг: 0 / 0
04.03.2010, 14:00
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36503754
Svikator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Svikator
Гость
Значение существует...
...
Рейтинг: 0 / 0
04.03.2010, 20:37
| Ответить | Цитировать | Написать  
Подскажите плиз
    #36504003
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
SvikatorЗначение существует...
Кодовая страница таблицы DBF совпадает с кодовой страницей среды FoxPro? Т.е. что возвращают

Код: plaintext
1.
?CPCURRENT()
?CPDBF()

Также желательно проверить кодовую страницу формы, в которой находится объект Text1. Ее можно посмотреть при активном окне проекта через пункт меню Project - Project Info - закладка "Files"

Нет ли каких-либо активных фильтров на таблице? Т.е. если открыть просто командой BROWSE визуально, глазами, можно найти нужную запись? Открыть не из командного окна, а там, где осуществляется поиск
...
Рейтинг: 0 / 0
05.03.2010, 00:19
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Подскажите плиз
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=36501961&tid=1585535]:
 0ms
get settings:
 9ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 123ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 46ms
get tp. blocked users:
 1ms
others: 12ms
total:  226ms
созд. / загр.: 226ms
x
x
Закрыть


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