Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / PowerBuilder Новый топик    Ответить
 Окно Response в MDI  [new]
Vitaliy2
Guest
Тема: Окно 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 окт 07, 20:14    [4824664]     Ответить | Цитировать Сообщить модератору
 Re: Окно Response в MDI  [new]
Vitaliy2
Guest
Тема: Окно 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")

Что имеем:

К сообщению приложен файл. Размер - 0Kb
22 окт 07, 20:16    [4824668]     Ответить | Цитировать Сообщить модератору
 Re: Окно Response в MDI  [new]
Mykola
Member

Откуда:
Сообщений: 615
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 окт 07, 20:29    [4824690]     Ответить | Цитировать Сообщить модератору
 Re: Окно Response в MDI  [new]
Mykola
Member

Откуда:
Сообщений: 615
из вашего кода вы изменяете значения, но вы их не возвращаете в окно которое вызывало response окно.
22 окт 07, 20:33    [4824694]     Ответить | Цитировать Сообщить модератору
Все форумы / PowerBuilder Ответить