|
|
|
Окно Response в MDI
|
|||
|---|---|---|---|
|
#18+
Тема: Окно Response в MDI Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. 14. 15. 16. 17. 18. 19. 20. 21. 22. 23. 24. 25. 26. 27. 28. 29. 30. 31. 32. 33. 34. 35. 36. 37. 38. 39. 40. 41. 42. 43. 44. 45. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 22.10.2007, 20:14 |
|
||
|
Окно Response в MDI
|
|||
|---|---|---|---|
|
#18+
Тема: Окно Response в MDI тип проекта MDI, Вызываю окно типа Response! (отклика) В котором ввожу 2 поля, значения которых Надо возвратить в вызывающее окно. Если пользоваться переменной типа глобальной структуры – проблем нет. Пытаюсь сделать это с помощью локальной переменной Типа структура – не выходит. w_assign_5_autoupdate – вызываЮЩее dialog window w_select_tn_and_date_1 – вызываЕМОЕ dialog window типа Response! (окно отклика) В вызываюЩем окне: gs_tn_date_1 ls_local_exampliar // одинаковая строка в обох окнах // инициализация для отладки: ls_local_exampliar.tn = 1802 ls_local_exampliar.date_1 = date('05.04.1977') string return_status OpenWithParm(w_select_Tn_and_date_1,ls_local_exampliar) return_status = Message.stringparm if return_status = 'OK' then // если был щелчёк на кнопке 'OK' into dialog window // типа 'Response' MessageBox("","31e.~nwas click on button 'OK' into dialog window of type 'Response!'~n" + & "of type 'Response!' - окне ОТКЛИКА~n~n" + & "ВызываЮЩее dialog window~n~n" + & "w_assign_5_autoupdate~n~n" + & "received two parameters" + & "~n~nls_local_exampliar.tn = " + string(ls_local_exampliar.tn) + & "~nls_local_exampliar.date_1 = " + string(ls_local_exampliar.date_1)) else // если был щелчёк на кнопке 'Cancel' into dialog window // типа 'Response' MessageBox("","31u.~nwas click on button 'Cancel' into dialog window~n" + & "of type 'Response!' - окно ОТКЛИКА") end if В вызываЕмом окне (окне Отклика): gs_tn_date_1 ls_local_exampliar // структура ( имя структуры gs_tn_date_1 как есть) ls_local_exampliar = Message.PowerObjectParm ls_local_exampliar.date_1 = date(sle_date.text) ls_local_exampliar.tn = long(em_1.text) CloseWithReturn(Parent, "OK") Что имеем: ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 22.10.2007, 20:16 |
|
||
|
Окно Response в MDI
|
|||
|---|---|---|---|
|
#18+
gs_tn_date_1 ls_local_exampliar // одинаковая строка в обох окнах // инициализация для отладки: ls_local_exampliar.tn = 1802 ls_local_exampliar.date_1 = date('05.04.1977') OpenWithParm(w_select_Tn_and_date_1,ls_local_exampliar) в структуру я б добавил признак в который будет писаться какая кнопка была нажата 1 - для Ок тода продолжение вашего кода ls_local_exampliar = Message.PowerObjectParm // анализ какая кнопка нажаьа и дальнейшие действия в окне response ls_local_exampliar.date_1 = date(sle_date.text) ls_local_exampliar.tn = long(em_1.text) // прописать значение для параметра какая кнопка нажата CloseWithReturn(Parent, ls_local_exampliar) приятной работы ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 22.10.2007, 20:29 |
|
||
|
|

start [/forum/topic.php?desktop=1&fid=15&tid=1336938]: |
0ms |
get settings: |
11ms |
get forum list: |
14ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
29ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
40ms |
get tp. blocked users: |
2ms |
| others: | 11ms |
| total: | 126ms |

| 0 / 0 |

Извините, этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
... ля, ля, ля ...