Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Окно Response в MDI / 4 сообщений из 4, страница 1 из 1
22.10.2007, 20:14
    #34886206
Vitaliy2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Окно Response в MDI
Тема: Окно 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.
тип проекта  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")

Что имеем:
...
Рейтинг: 0 / 0
22.10.2007, 20:16
    #34886210
Vitaliy2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Окно Response в MDI
Тема: Окно 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")

Что имеем:
...
Рейтинг: 0 / 0
22.10.2007, 20:29
    #34886228
Mykola
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Окно Response в MDI
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)

приятной работы
...
Рейтинг: 0 / 0
22.10.2007, 20:33
    #34886230
Mykola
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Окно Response в MDI
из вашего кода вы изменяете значения, но вы их не возвращаете в окно которое вызывало response окно.
...
Рейтинг: 0 / 0
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Окно Response в MDI / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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