Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / теряю запись / 18 сообщений из 18, страница 1 из 1
20.05.2005, 18:51:25
    #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, 19:36: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, 20:20:47
    #33078092
k_sv
k_sv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
И просто Seek пробовала. Не помогает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 20:21:15
    #33078093
Sergey Sizov.
Sergey Sizov.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
Зачем ты IndexSeek используешь ? Чтобы найти запись? Так она и не должна искать. Она только скажет есть ли такая запись или нет. Ищет Seek. Вот его и используй.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 20:22:48
    #33078095
k_sv
k_sv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
А как это вообще объяснить можно?
Что происходит?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 20:33:28
    #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:34:29
    #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:51:41
    #33078118
k_sv
k_sv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
To Sergey Sizov
Во всех случаях - одно и то же. Переход на первую запись.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 20:59:11
    #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, 21:03:13
    #33078129
k_sv
k_sv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
Код: plaintext
wait "" window timeout  0 . 1
проходит нормально.
Странно...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 21:17:02
    #33078138
k_sv
k_sv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
To Sergey Sizov

Скажу, что происходит, если ликбез проведете.
Куда у меня выводится
Код: plaintext
?recn()
Что там написать-то еще надо?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 21:20:23
    #33078142
Sergey Sizov.
Sergey Sizov.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
Выводится на активную форму
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 21:40:07
    #33078153
k_sv
k_sv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
То Sergey Sizov.
А как-нибудь по-другому можно?
У меня активная форма закрывается. Что-то типа логов (от умных людей слышала :)) )?
В файл бы отправить.
Извините за безграмотность.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 21:44:02
    #33078158
Sergey Sziov.
Sergey Sziov.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
А сложить самое необходимое в кучку, зазиповать и выложить сюда можешь?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 21:52:33
    #33078168
k_sv
k_sv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
Можно, только позже.
Я сейчас дома сижу. Много дел домашних накопилось. :((
И никто не помогает. Хорошо, что хоть на форуме на поддержку расчитывать можно. :))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 22:12:57
    #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
| Ответить | Цитировать | Написать  
21.05.2005, 00:17:45
    #33078247
k_sv
k_sv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
теряю запись
Спасибо, ВладимирМ , работает!
Только что-то этот факт навеял мысль, что пишу я "грязновато". Не спроста же это. :(
И еще, где бы почитать про
Код: plaintext
DOEVENTS
да и другие команды на русском языке? В 3-м хелпе ее нету.

Еще раз спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.05.2005, 02:03:57
    #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
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / теряю запись / 18 сообщений из 18, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 460ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1594199]:
 0ms
get settings:
 9ms
get forum list:
 10ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 169ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 226ms
total:  460ms
x
x
Закрыть


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