Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / PowerBuilder Новый топик    Ответить
 WebBrowser & Esc  [new]
AIS
Member

Откуда:
Сообщений: 1695
В окошке только OLE-WebBrowser. Когда им пользуются, т.е. он в фокусе, как через ESC закрыть окно?
Пробывал вариации:
- в событиях OLE - не получается.
- в событии окна - не получается, если фокус на OLE.
18 ноя 12, 14:12    [13490544]     Ответить | Цитировать Сообщить модератору
 Re: WebBrowser & Esc  [new]
Локшин Марк
Member

Откуда: Воронеж
Сообщений: 3154
AIS,

Точно там никаких событий типа onkeyup нет? В DHTML edit control есть например.
20 ноя 12, 00:31    [13497555]     Ответить | Цитировать Сообщить модератору
 Re: WebBrowser & Esc  [new]
AIS
Member

Откуда:
Сообщений: 1695
Локшин Марк,
как минимум я не нашел ничего подобного ни в описании, ни в гугле. WebBrowser вообще какой-то скудный по возможностям, но зато устанавливать не надо. Иногда это важнее.
Где-то говорилось, что он не принимает такие сообщения сам, а внутренне транслирует их родителю. Правда или нет не знаю, но и по "родителям" пробежал", но отловить не смог. :(
21 ноя 12, 19:12    [13509827]     Ответить | Цитировать Сообщить модератору
 Re: WebBrowser & Esc  [new]
PL99
Member

Откуда: Moscow
Сообщений: 1367
AIS
В окошке только OLE-WebBrowser. Когда им пользуются, т.е. он в фокусе, как через ESC закрыть окно?
Пробывал вариации:
- в событиях OLE - не получается.
- в событии окна - не получается, если фокус на OLE.
Есть один корявенький способ.
forward
global type w_test from window
end type
type ole_1 from olecontrol within w_test
end type
type cb_1 from commandbutton within w_test
end type
end forward

global type w_test from window
integer width = 4754
integer height = 1980
boolean titlebar = true
string title = "Untitled"
boolean controlmenu = true
boolean minbox = true
boolean maxbox = true
boolean resizable = true
long backcolor = 67108864
string icon = "AppIcon!"
boolean center = true
ole_1 ole_1
cb_1 cb_1
end type
global w_test w_test

on w_test.create
this.ole_1=create ole_1
this.cb_1=create cb_1
this.Control[]={this.ole_1,&
this.cb_1}
end on

on w_test.destroy
destroy(this.ole_1)
destroy(this.cb_1)
end on

type ole_1 from olecontrol within w_test
event endofstream ( long result )
event gomxerror ( long errorcode )
event gomxstate ( long state )
integer y = 168
integer width = 4699
integer height = 1440
integer taborder = 20
borderstyle borderstyle = stylelowered!
string binarykey = "w_test.win"
omactivation activation = activateondoubleclick!
omdisplaytype displaytype = displayascontent!
omcontentsallowed contentsallowed = containsany!
end type

type cb_1 from commandbutton within w_test
integer x = 133
integer y = 332
integer width = 517
integer height = 104
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
string text = "none"
boolean cancel = true
end type

event clicked;close(parent)
end event
Попробуйте.
Powerbuilder 9.0.3 Build 8836
21 ноя 12, 20:42    [13510074]     Ответить | Цитировать Сообщить модератору
Все форумы / PowerBuilder Ответить