ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / теряю запись
18 сообщений из 18, страница 1 из 1
теряю запись
    #33077967
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
Помогите пожалуйста разобраться.
У меня одна форма которая содержит Grid (источником которого является представление) вызывает вторую

Код: plaintext
1.
2.
3.
4.
5.
Do Form KJobEdit With 'Edit' Linked to r_shifr 
select v_kjob
*wait r_shifr window
indexseek(r_shifr,.t.,'v_kjob','sh_job')
ThisForm.grdV_kjob.SetFocus
ThisForm.ReFresh

После этого указатель устанавливается на первую запись.

Но если третью строчку откоментировать, то все срабатывает нормально (курсор устанавливается на нужную запись).
...
Рейтинг: 0 / 0
20.05.2005, 18:51:25
| Ответить | Цитировать | Написать  
теряю запись
    #33078041
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Может, вместо IndexSeek() использовать обычную функцию Seek()?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Do Form KJobEdit With 'Edit' Linked to r_shifr 
select v_kjob
*wait r_shifr window

SEEK(r_shifr,'v_kjob','sh_job')

ThisForm.grdV_kjob.SetFocus
ThisForm.ReFresh

Или поставь небольшую задержку:

Код: plaintext
wait "" window timeout  0 . 1
...
Рейтинг: 0 / 0
20.05.2005, 19:36:25
| Ответить | Цитировать | Написать  
теряю запись
    #33078092
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
И просто Seek пробовала. Не помогает.
...
Рейтинг: 0 / 0
20.05.2005, 20:20:47
| Ответить | Цитировать | Написать  
теряю запись
    #33078093
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Sizov.
Гость
Зачем ты IndexSeek используешь ? Чтобы найти запись? Так она и не должна искать. Она только скажет есть ли такая запись или нет. Ищет Seek. Вот его и используй.
...
Рейтинг: 0 / 0
20.05.2005, 20:21:15
| Ответить | Цитировать | Написать  
теряю запись
    #33078095
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
А как это вообще объяснить можно?
Что происходит?
...
Рейтинг: 0 / 0
20.05.2005, 20:22:48
| Ответить | Цитировать | Написать  
теряю запись
    #33078107
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Sizov.
Гость
что происходит в таком варианте
Код: plaintext
1.
2.
3.
4.
5.
6.
Do Form KJobEdit With 'Edit' Linked to r_shifr 
select v_kjob
*wait r_shifr window
set orde to sh_job
seek(r_shifr)
ThisForm.grdV_kjob.SetFocus
ThisForm.ReFresh
и что в таком?
Код: plaintext
1.
2.
3.
4.
5.
6.
Do Form KJobEdit With 'Edit' Linked to r_shifr 
select v_kjob
*wait r_shifr window
set orde to sh_job
seek(r_shifr)
ThisForm.grdV_kjob.SetFocus
ThisForm.ReFresh
...
Рейтинг: 0 / 0
20.05.2005, 20:33:28
| Ответить | Цитировать | Написать  
теряю запись
    #33078108
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Sizov.
Гость
пардон, в торой вариант такой: :)
Код: plaintext
1.
2.
3.
Do Form KJobEdit With 'Edit' Linked to r_shifr 
select v_kjob
ThisForm.grdV_kjob.SetFocus
ThisForm.ReFresh
...
Рейтинг: 0 / 0
20.05.2005, 20:34:29
| Ответить | Цитировать | Написать  
теряю запись
    #33078118
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
To Sergey Sizov
Во всех случаях - одно и то же. Переход на первую запись.
...
Рейтинг: 0 / 0
20.05.2005, 20:51:41
| Ответить | Цитировать | Написать  
теряю запись
    #33078125
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Sizov.
Гость
каков результат вот таких манипуляций?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Do Form KJobEdit With 'Edit' Linked to r_shifr 
select v_kjob
?recn()
*wait r_shifr window
set orde to sh_job
seek(r_shifr)
?recn()
ThisForm.grdV_kjob.SetFocus
?recn()
ThisForm.ReFresh
?recn()
...
Рейтинг: 0 / 0
20.05.2005, 20:59:11
| Ответить | Цитировать | Написать  
теряю запись
    #33078129
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
Код: plaintext
wait "" window timeout  0 . 1
проходит нормально.
Странно...
...
Рейтинг: 0 / 0
20.05.2005, 21:03:13
| Ответить | Цитировать | Написать  
теряю запись
    #33078138
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
To Sergey Sizov

Скажу, что происходит, если ликбез проведете.
Куда у меня выводится
Код: plaintext
?recn()
Что там написать-то еще надо?
...
Рейтинг: 0 / 0
20.05.2005, 21:17:02
| Ответить | Цитировать | Написать  
теряю запись
    #33078142
Sergey Sizov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Sizov.
Гость
Выводится на активную форму
...
Рейтинг: 0 / 0
20.05.2005, 21:20:23
| Ответить | Цитировать | Написать  
теряю запись
    #33078153
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
То Sergey Sizov.
А как-нибудь по-другому можно?
У меня активная форма закрывается. Что-то типа логов (от умных людей слышала :)) )?
В файл бы отправить.
Извините за безграмотность.
...
Рейтинг: 0 / 0
20.05.2005, 21:40:07
| Ответить | Цитировать | Написать  
теряю запись
    #33078158
Sergey Sziov.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey Sziov.
Гость
А сложить самое необходимое в кучку, зазиповать и выложить сюда можешь?
...
Рейтинг: 0 / 0
20.05.2005, 21:44:02
| Ответить | Цитировать | Написать  
теряю запись
    #33078168
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
Можно, только позже.
Я сейчас дома сижу. Много дел домашних накопилось. :((
И никто не помогает. Хорошо, что хоть на форуме на поддержку расчитывать можно. :))
...
Рейтинг: 0 / 0
20.05.2005, 21:52:33
| Ответить | Цитировать | Написать  
теряю запись
    #33078186
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Еще вот так попробуй

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Do Form KJobEdit With 'Edit' Linked to r_shifr 

DOEVENTS

select v_kjob
indexseek(r_shifr,.t.,'v_kjob','sh_job')
ThisForm.grdV_kjob.SetFocus
ThisForm.ReFresh

Иногда, FoxPro не "успевает" завершить обработку какого-то метода. Что-то мешает. В этом случае обработка откладывается до первого удобного момента.

В твоем исходном примере, видимо что-то осталось не завершено в событиях открытия (или закрытия) формы KJobEdit. Вот это "что-то" и переместило указатель записи таблицы.
...
Рейтинг: 0 / 0
20.05.2005, 22:12:57
| Ответить | Цитировать | Написать  
теряю запись
    #33078247
k_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k_sv
Гость
Спасибо, ВладимирМ , работает!
Только что-то этот факт навеял мысль, что пишу я "грязновато". Не спроста же это. :(
И еще, где бы почитать про
Код: plaintext
DOEVENTS
да и другие команды на русском языке? В 3-м хелпе ее нету.

Еще раз спасибо.
...
Рейтинг: 0 / 0
21.05.2005, 00:17:45
| Ответить | Цитировать | Написать  
теряю запись
    #33078277
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Официально Help был переведен на русский язык только по 3 версии. HELP по поздним версиям уже не переводился.

Остается либо пытаться перевести то, что написано по английски в родном HELP, либо искать по разным сайтам и форумам разрозненные обрывки того же HELP, но переведенного на русский язык.

Здесь можно скачать HELP к разным версиям
http://vfp.narod.ru/Briefcase/Briefcase.htm

Здесь частично есть перевод HELP
http://www.foxhelp.ru/HomePage

Ну, и на форумах спрашивай. Как здесь, так и
http://www.foxclub.ru/
...
Рейтинг: 0 / 0
21.05.2005, 02:03:57
| Ответить | Цитировать | Написать  
18 сообщений из 18, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / теряю запись
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&gotonew=1&tid=1594199]:
 0ms
get settings:
 10ms
get forum list:
 21ms
check forum access:
 5ms
check topic access:
 5ms
track hit:
 89ms
get topic data:
 13ms
get first new msg:
 7ms
get forum data:
 3ms
get page messages:
 80ms
get tp. blocked users:
 2ms
others: 219ms
total:  454ms
созд. / загр.: 454ms
x
x
Закрыть


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