hg/stx-libjava: JavaEmbeddedFrameView.st@b189800c0d92 (annotated)

545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	1	"
2151 c0b6570c6f9b Jan's version Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2116 diff changeset	2	COPYRIGHT (c) 1996-2011 by Claus Gittinger
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	3
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	4	This software is furnished under a license and may be used
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	5	only in accordance with the terms of that license and with the
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	6	inclusion of the above copyright notice. This software may not
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	7	be provided or otherwise made available to, or used by, any
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	8	other person. No title to or ownership of the software is
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	9	hereby transferred.
2151 c0b6570c6f9b Jan's version Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2116 diff changeset	10	"
681 c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	11	"{ Package: 'stx:libjava' }"
c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	12
233 fc91b8aba669 intitial checkin cg parents: diff changeset	13	JavaView subclass:#JavaEmbeddedFrameView
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	14	instanceVariableNames:'codeURL codeBaseURL documentURL archiveURL parameterDictionary
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	15	embeddedAppletFrame applet appletID appletThread
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	16	infoDisplayReceiver autoSetupApplet autoStartApplet
2087 2e1a2d10b891 * empty log message * Claus Gittinger <cg@exept.de> parents: 2084 diff changeset	17	autoDestroyApplet isNS40 attributeHashTable appletIsPreloaded'
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	18	classVariableNames:'NextSequentialAppletID'
233 fc91b8aba669 intitial checkin cg parents: diff changeset	19	poolDictionaries:''
2108 ca8c4e7db2e8 category change Claus Gittinger <cg@exept.de> parents: 2087 diff changeset	20	category:'Languages-Java-Views-Support'
233 fc91b8aba669 intitial checkin cg parents: diff changeset	21	!
fc91b8aba669 intitial checkin cg parents: diff changeset	22
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	23	!JavaEmbeddedFrameView class methodsFor:'documentation'!
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	24
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	25	copyright
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	26	"
2151 c0b6570c6f9b Jan's version Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2116 diff changeset	27	COPYRIGHT (c) 1996-2011 by Claus Gittinger
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	28
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	29	This software is furnished under a license and may be used
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	30	only in accordance with the terms of that license and with the
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	31	inclusion of the above copyright notice. This software may not
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	32	be provided or otherwise made available to, or used by, any
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	33	other person. No title to or ownership of the software is
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	34	hereby transferred.
2084 69ecd5609bb3 * empty log message * Claus Gittinger <cg@exept.de> parents: 749 diff changeset	35	"
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	36	!
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	37
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	38	documentation
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	39	"
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	40	a wrapper view, which allows for Java Applets to be embedded
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	41	in a smalltalk view.
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	42	This requires a netscape to be installed on the system.
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	43
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	44	[Author:]
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	45	Claus Gittinger
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	46	"
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	47	! !
233 fc91b8aba669 intitial checkin cg parents: diff changeset	48
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	49	!JavaEmbeddedFrameView class methodsFor:'support'!
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	50
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	51	newAppletContext
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	52	\|jMozillaAppletContextClass\|
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	53
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	54	"/ this makes it a modzilla applet context ...
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	55	jMozillaAppletContextClass := Java classForName:'netscape.applet.MozillaAppletContext'.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	56	jMozillaAppletContextClass isNil ifTrue:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	57	self warn:'no netscape.applet.MozillaAppletContext class'.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	58	^ nil
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	59	].
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	60	jMozillaAppletContextClass instVarNamed:'debug' put:1.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	61
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	62	^ jMozillaAppletContextClass new.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	63
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	64	"Created: / 20.10.1998 / 15:40:08 / cg"
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	65	"Modified: / 20.10.1998 / 15:43:47 / cg"
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	66	! !
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	67
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	68	!JavaEmbeddedFrameView methodsFor:'accessing'!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	69
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	70	applet
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	71	^ applet
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	72
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	73	"Created: / 26.1.1999 / 13:51:10 / cg"
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	74	!
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	75
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	76	appletID
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	77	"return the value of the instance variable 'appletID' (automatically generated)"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	78
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	79	^ appletID
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	80
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	81	"Created: / 28.1.1998 / 21:08:54 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	82	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	83
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	84	appletID:something
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	85	"set the value of the instance variable 'appletID' (automatically generated)"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	86
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	87	appletID := something.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	88
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	89	"Created: / 28.1.1998 / 21:08:54 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	90	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	91
2087 2e1a2d10b891 * empty log message * Claus Gittinger <cg@exept.de> parents: 2084 diff changeset	92	appletIsPreloaded:aBoolean
2e1a2d10b891 * empty log message * Claus Gittinger <cg@exept.de> parents: 2084 diff changeset	93	appletIsPreloaded := aBoolean.
2e1a2d10b891 * empty log message * Claus Gittinger <cg@exept.de> parents: 2084 diff changeset	94	!
2e1a2d10b891 * empty log message * Claus Gittinger <cg@exept.de> parents: 2084 diff changeset	95
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	96	appletThread
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	97	^ appletThread
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	98
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	99	"Created: / 28.1.1998 / 21:39:42 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	100	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	101
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	102	archiveURL:anArchiveURLString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	103	archiveURL := anArchiveURLString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	104
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	105	"Created: / 28.1.1998 / 21:00:38 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	106	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	107
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	108	codeBaseURL:aCodeBaseURLString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	109	codeBaseURL := aCodeBaseURLString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	110
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	111	"Created: / 28.1.1998 / 20:59:34 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	112	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	113
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	114	codeURL:aCodeURLString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	115	codeURL := aCodeURLString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	116
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	117	"Created: / 28.1.1998 / 21:10:11 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	118	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	119
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	120	documentURL:aDocumentURLString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	121	documentURL := aDocumentURLString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	122
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	123	"Created: / 28.1.1998 / 21:00:03 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	124	"Modified: / 28.1.1998 / 21:00:28 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	125	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	126
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	127	embeddedAppletFrame
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	128	^ embeddedAppletFrame
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	129
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	130	"Created: / 28.1.1998 / 21:39:35 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	131	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	132
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	133	infoDisplayReceiver
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	134	"return the value of the instance variable 'infoDisplayReceiver' (automatically generated)"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	135
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	136	^ infoDisplayReceiver
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	137
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	138	"Created: / 28.1.1998 / 21:43:54 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	139	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	140
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	141	infoDisplayReceiver:something
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	142	"set the value of the instance variable 'infoDisplayReceiver' (automatically generated)"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	143
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	144	infoDisplayReceiver := something.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	145
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	146	"Created: / 28.1.1998 / 21:43:54 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	147	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	148
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	149	parameterAt:key put:valueString
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	150	parameterDictionary isNil ifTrue:[
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	151	parameterDictionary := IdentityDictionary new.
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	152	].
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	153	parameterDictionary at:key put:valueString.
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	154	attributeHashTable
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	155	perform:#'put(Ljava/lang/Object;Ljava/lang/Object;)Ljava/lang/Object;'
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	156	with:(Java as_String:key)
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	157	with:(Java as_String:valueString)
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	158
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	159	"Created: / 26.1.1999 / 13:46:01 / cg"
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	160	"Modified: / 28.1.1999 / 17:59:36 / cg"
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	161	!
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	162
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	163	parameterDictionary:aParameterDictionary
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	164	parameterDictionary := aParameterDictionary
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	165
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	166	"Created: / 28.1.1998 / 21:01:20 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	167	! !
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	168
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	169	!JavaEmbeddedFrameView methodsFor:'applet control'!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	170
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	171	appletDESTROY
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	172	\|ev\|
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	173
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	174	isNS40 ifTrue:[
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	175	"/ ev = netscape.applet.AppletEvent(APPLET_DESTROY);
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	176	ev := (Java classForName:'netscape.applet.AppletEvent')
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	177	newWith_int:(embeddedAppletFrame class instVarNamed:'APPLET_DESTROY').
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	178	embeddedAppletFrame
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	179	perform:#'sendEvent(Lnetscape/applet/NEvent;)V'
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	180	with:ev.
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	181	^ self
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	182	].
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	183	embeddedAppletFrame
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	184	perform:#'sendEvent(I)V'
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	185	with:(embeddedAppletFrame class instVarNamed:'APPLET_DESTROY').
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	186
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	187	"Created: / 28.1.1998 / 21:41:45 / cg"
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	188	"Modified: / 13.11.1998 / 14:19:49 / cg"
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	189	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	190
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	191	appletDISPOSE
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	192	\|ev\|
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	193
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	194	isNS40 ifTrue:[
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	195	"/ ev = netscape.applet.AppletEvent(APPLET_DISPOSE);
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	196	ev := (Java classForName:'netscape.applet.AppletEvent')
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	197	newWith_int:(embeddedAppletFrame class instVarNamed:'APPLET_DISPOSE').
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	198	embeddedAppletFrame
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	199	perform:#'sendEvent(Lnetscape/applet/NEvent;)V'
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	200	with:ev.
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	201	^ self
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	202	].
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	203	embeddedAppletFrame
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	204	perform:#'sendEvent(I)V'
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	205	with:(embeddedAppletFrame class instVarNamed:'APPLET_DISPOSE').
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	206
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	207	"Created: / 28.1.1998 / 21:41:57 / cg"
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	208	"Modified: / 13.11.1998 / 14:19:43 / cg"
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	209	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	210
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	211	appletINIT
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	212	\|ev\|
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	213
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	214	isNS40 ifTrue:[
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	215	"/ ev = netscape.applet.AppletEvent(APPLET_INIT);
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	216	ev := (Java classForName:'netscape.applet.AppletEvent')
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	217	newWith_int:(embeddedAppletFrame class instVarNamed:'APPLET_INIT').
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	218	embeddedAppletFrame
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	219	perform:#'sendEvent(Lnetscape/applet/NEvent;)V'
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	220	with:ev.
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	221	^ self
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	222	].
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	223	embeddedAppletFrame
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	224	perform:#'sendEvent(I)V'
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	225	with:(embeddedAppletFrame class instVarNamed:'APPLET_INIT').
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	226
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	227	"Created: / 28.1.1998 / 21:17:51 / cg"
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	228	"Modified: / 13.11.1998 / 14:19:35 / cg"
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	229	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	230
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	231	appletLOAD
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	232	\|ev\|
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	233
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	234	isNS40 ifTrue:[
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	235	"/ ev = netscape.applet.AppletEvent(APPLET_LOAD);
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	236	ev := (Java classForName:'netscape.applet.AppletEvent')
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	237	newWith_int:(embeddedAppletFrame class instVarNamed:'APPLET_LOAD').
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	238	embeddedAppletFrame
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	239	perform:#'sendEvent(Lnetscape/applet/NEvent;)V'
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	240	with:ev.
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	241	^ self
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	242	].
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	243	embeddedAppletFrame
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	244	perform:#'sendEvent(I)V'
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	245	with:(embeddedAppletFrame class instVarNamed:'APPLET_LOAD').
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	246
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	247	"Created: / 28.1.1998 / 21:17:37 / cg"
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	248	"Modified: / 13.11.1998 / 14:19:31 / cg"
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	249	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	250
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	251	appletSTART
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	252	\|ev\|
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	253
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	254	isNS40 ifTrue:[
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	255	"/ ev = netscape.applet.AppletEvent(APPLET_START);
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	256	ev := (Java classForName:'netscape.applet.AppletEvent')
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	257	newWith_int:(embeddedAppletFrame class instVarNamed:'APPLET_START').
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	258	embeddedAppletFrame
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	259	perform:#'sendEvent(Lnetscape/applet/NEvent;)V'
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	260	with:ev.
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	261	^ self
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	262	].
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	263	embeddedAppletFrame
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	264	perform:#'sendEvent(I)V'
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	265	with:(embeddedAppletFrame class instVarNamed:'APPLET_START').
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	266
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	267	"Created: / 28.1.1998 / 21:18:01 / cg"
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	268	"Modified: / 13.11.1998 / 14:19:21 / cg"
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	269	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	270
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	271	appletSTOP
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	272	\|ev\|
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	273
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	274	isNS40 ifTrue:[
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	275	"/ ev = netscape.applet.AppletEvent(APPLET_STOP);
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	276	ev := (Java classForName:'netscape.applet.AppletEvent')
50d24dc93f8b checkin from browser cg parents: 429 diff changeset	277	newWith_int:(embeddedAppletFrame class instVarNamed:'APPLET_STOP').
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	278	embeddedAppletFrame
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	279	perform:#'sendEvent(Lnetscape/applet/NEvent;)V'
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	280	with:ev.
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	281	^ self
9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	282	].
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	283	embeddedAppletFrame
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	284	perform:#'sendEvent(I)V'
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	285	with:(embeddedAppletFrame class instVarNamed:'APPLET_STOP').
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	286
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	287	"Created: / 28.1.1998 / 21:41:33 / cg"
451 50d24dc93f8b checkin from browser cg parents: 429 diff changeset	288	"Modified: / 13.11.1998 / 14:19:14 / cg"
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	289	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	290
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	291	autoDestroyApplet:aBoolean
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	292	"set/clear the autoDestroy flag.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	293	If set, the applet will be shutDown whenever the I get destroyed.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	294	if clear, the applet is not automatically shutDown and must be
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	295	terminated by someone else.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	296	The default is false."
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	297
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	298	autoDestroyApplet := aBoolean.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	299
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	300	"Created: / 29.1.1998 / 15:18:50 / cg"
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	301	"Modified: / 29.1.1998 / 15:21:01 / cg"
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	302	!
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	303
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	304	autoSetupApplet:aBoolean
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	305	"set/clear the autoSetup flag.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	306	If set, the appletFrame will be setup whenever the I get realized
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	307	for the first time.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	308	If clear, the frame is not automatically setup and must be
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	309	setup by someone else.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	310	The default is true."
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	311
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	312
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	313	autoSetupApplet := aBoolean.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	314
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	315	"Created: / 29.1.1998 / 15:18:41 / cg"
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	316	"Modified: / 29.1.1998 / 20:45:37 / cg"
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	317	!
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	318
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	319	autoStartApplet:aBoolean
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	320	"set/clear the autoStart flag.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	321	If set, the applet will be loaded & started whenever the I get realized
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	322	for the first time.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	323	If clear, the applet is not automatically started and must be
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	324	started by someone else.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	325	The default is false."
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	326
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	327
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	328	autoStartApplet := aBoolean.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	329
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	330	"Created: / 29.1.1998 / 15:18:41 / cg"
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	331	"Modified: / 29.1.1998 / 15:20:54 / cg"
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	332	!
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	333
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	334	startApplet
681 c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	335	"/ ensure its initialized when the first event comes;
c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	336	"/ therefore, raise my prio above the event dispatchers prio for a while.
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	337
681 c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	338	Processor activeProcess withPriority:(Processor activePriority + 1)
c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	339	do:[
c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	340	self startAppletThread.
c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	341
2087 2e1a2d10b891 * empty log message * Claus Gittinger <cg@exept.de> parents: 2084 diff changeset	342	appletIsPreloaded ifFalse:[self appletLOAD].
681 c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	343	self appletINIT.
c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	344	].
c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	345
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	346	self appletSTART
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	347
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	348	"Modified: / 28.1.1998 / 21:30:24 / cg"
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	349	!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	350
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	351	startAppletThread
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	352	\|appletName\|
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	353
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	354	appletThread := JavaProcess
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	355	for:[
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	356	"/ passnotifications to the documentFrame ...
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	357	Object informationSignal handle:[:ex \|
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	358	JavaVM javaConsoleStream showCR:ex errorString.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	359	ex proceed.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	360	] do:[
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	361	Object activityNotificationSignal handle:[:ex \|
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	362	infoDisplayReceiver notNil ifTrue:[
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	363	infoDisplayReceiver infoDisplay:ex errorString.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	364	] ifFalse:[
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	365	Transcript showCR:ex errorString
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	366	].
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	367	ex proceed.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	368	] do:[
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	369	[
2116 6178a12902ca Rename AbsoluteTime to Timestamp Stefan Vogel <sv@exept.de> parents: 2108 diff changeset	370	"/ Transcript showCR:(Timestamp now printString , ' start embeddedAppletFrame').
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	371	embeddedAppletFrame perform:#'run()V'.
2116 6178a12902ca Rename AbsoluteTime to Timestamp Stefan Vogel <sv@exept.de> parents: 2108 diff changeset	372	] ensure:[
690 c9faa0d724d6 * empty log message * cg parents: 683 diff changeset	373	appletThread notNil ifTrue:[
c9faa0d724d6 * empty log message * cg parents: 683 diff changeset	374	appletThread terminateAllSubprocesses.
c9faa0d724d6 * empty log message * cg parents: 683 diff changeset	375	].
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	376	Transcript showCR:'JAVA applet startup finished'.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	377	]
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	378	]
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	379	]
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	380	]
681 c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	381	priority:(Processor activePriority "- 1").
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	382
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	383	appletName := codeURL asFilename withoutSuffix baseName.
417 d60d5b5da5f9 applet thread name changed. cg parents: 397 diff changeset	384	appletThread name:('JAVA-' , appletName , '-applet' , ' [startup]').
653 a98a3634389a make processes restartable (for snapshot restart of java threads) cg parents: 644 diff changeset	385	appletThread restartable:true.
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	386	appletThread resume.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	387	^ appletThread.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	388
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	389	"Created: / 28.1.1998 / 21:30:32 / cg"
653 a98a3634389a make processes restartable (for snapshot restart of java threads) cg parents: 644 diff changeset	390	"Modified: / 24.12.1999 / 02:58:50 / cg"
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	391	!
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	392
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	393	stopApplet
311 b23c5e132b8c hardterminate javaThread, if it did not terminate after 10 tries. cg parents: 303 diff changeset	394	\|n n2\|
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	395
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	396	(appletThread notNil
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	397	and:[appletThread isDead not])ifTrue:[
318 8720093188f7 debugPrints cg parents: 311 diff changeset	398	"/ 'EmbeddedAppletFrame [info]: send APPLET_STOP ...' infoPrintCR.
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	399	self appletSTOP.
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	400
318 8720093188f7 debugPrints cg parents: 311 diff changeset	401	"/ 'EmbeddedAppletFrame [info]: send APPLET_DESTROY ...' infoPrintCR.
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	402	self appletDESTROY.
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	403
318 8720093188f7 debugPrints cg parents: 311 diff changeset	404	"/ 'EmbeddedAppletFrame [info]: send APPLET_DISPOSE ...' infoPrintCR.
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	405	self appletDISPOSE.
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	406
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	407	"/
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	408	"/ give it a chance to stop ...
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	409	"/
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	410	Processor yield.
311 b23c5e132b8c hardterminate javaThread, if it did not terminate after 10 tries. cg parents: 303 diff changeset	411	n2 := 0.
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	412	[appletThread isDead] whileFalse:[
455 36fffdce84f7 checkin from browser cg parents: 451 diff changeset	413	"/ give it a second to shut down ...
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	414	n := 0.
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	415	[n < 10 and:[appletThread isDead not]] whileTrue:[
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	416	Delay waitForSeconds:0.1.
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	417	n := n + 1.
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	418	].
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	419	appletThread isDead ifFalse:[
455 36fffdce84f7 checkin from browser cg parents: 451 diff changeset	420	"/ after 3 seconds, kill it.
311 b23c5e132b8c hardterminate javaThread, if it did not terminate after 10 tries. cg parents: 303 diff changeset	421	Transcript showCR:'EmbeddedAppletFrame [info]: JAVA thread did not stop - soft terminate ...'.
527 7eb6f6291fea * empty log message * cg parents: 455 diff changeset	422	appletThread == JavaVM javaScreenUpdaterThread ifTrue:[self halt].
653 a98a3634389a make processes restartable (for snapshot restart of java threads) cg parents: 644 diff changeset	423	appletThread == JavaVM javaEventQueueThread ifTrue:[self halt].
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	424	appletThread terminate.
311 b23c5e132b8c hardterminate javaThread, if it did not terminate after 10 tries. cg parents: 303 diff changeset	425	n2 := n2 + 1.
455 36fffdce84f7 checkin from browser cg parents: 451 diff changeset	426	n2 > 3 ifTrue:[
311 b23c5e132b8c hardterminate javaThread, if it did not terminate after 10 tries. cg parents: 303 diff changeset	427	Transcript showCR:'EmbeddedAppletFrame [info]: JAVA thread did not stop - shooting down ...'.
b23c5e132b8c hardterminate javaThread, if it did not terminate after 10 tries. cg parents: 303 diff changeset	428	appletThread terminateNoSignal
b23c5e132b8c hardterminate javaThread, if it did not terminate after 10 tries. cg parents: 303 diff changeset	429	]
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	430	].
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	431	].
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	432	].
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	433	appletThread := nil
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	434
653 a98a3634389a make processes restartable (for snapshot restart of java threads) cg parents: 644 diff changeset	435	"Modified: / 24.12.1999 / 02:35:25 / cg"
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	436	! !
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	437
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	438	!JavaEmbeddedFrameView methodsFor:'initialize / release'!
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	439
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	440	destroy
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	441	autoDestroyApplet == true ifTrue:[
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	442	self stopApplet
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	443	].
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	444	super destroy.
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	445
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	446	"Created: / 29.1.1998 / 15:21:45 / cg"
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	447	"Modified: / 29.1.1998 / 15:28:26 / cg"
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	448	!
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	449
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	450	initialize
2087 2e1a2d10b891 * empty log message * Claus Gittinger <cg@exept.de> parents: 2084 diff changeset	451	appletIsPreloaded := false.
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	452	super initialize.
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	453	viewBackground := Color black.
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	454
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	455	"Modified: / 28.1.1999 / 17:44:11 / cg"
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	456	!
6a841644c5e9 checkin from browser cg parents: 527 diff changeset	457
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	458	realize
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	459	autoSetupApplet ~~ false ifTrue:[
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	460	self setupAppletFrameIn:nil initializeJava:true
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	461	].
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	462	autoStartApplet == true ifTrue:[
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	463	embeddedAppletFrame notNil ifTrue:[
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	464	self startApplet
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	465	]
681 c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	466	].
c41ba2e76c65 start applet with higher prio, cg parents: 653 diff changeset	467	super realize.
286 da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	468
da220fe69de3 applet startup & shutDown now all done here; cg parents: 282 diff changeset	469	"Created: / 29.1.1998 / 15:21:30 / cg"
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	470	"Modified: / 20.10.1998 / 15:46:32 / cg"
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	471	! !
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	472
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	473	!JavaEmbeddedFrameView methodsFor:'private'!
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	474
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	475	setupAppletFrameIn:anAppletContextOrNil
644 0294a6ed677e checkin from browser cg parents: 545 diff changeset	476	^ self setupAppletFrameIn:anAppletContextOrNil initializeJava:true.
0294a6ed677e checkin from browser cg parents: 545 diff changeset	477	!
0294a6ed677e checkin from browser cg parents: 545 diff changeset	478
0294a6ed677e checkin from browser cg parents: 545 diff changeset	479	setupAppletFrameIn:anAppletContextOrNil initializeJava:initializeJava
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	480	\|appletContext
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	481	jEmbeddedAppletFrameClass jDerivedAppletFrameClass
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	482	toolkit peer attribs id
644 0294a6ed677e checkin from browser cg parents: 545 diff changeset	483	jCodeBaseURL jDocumentURL jArchiveURL u fn\|
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	484
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	485	embeddedAppletFrame notNil ifTrue:[
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	486	"/ already setup
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	487	^ self
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	488	].
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	489
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	490	codeBaseURL isNil ifTrue:[
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	491	^ self
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	492	].
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	493
644 0294a6ed677e checkin from browser cg parents: 545 diff changeset	494	initializeJava ifTrue:[
0294a6ed677e checkin from browser cg parents: 545 diff changeset	495	Java startupJavaSystem.
653 a98a3634389a make processes restartable (for snapshot restart of java threads) cg parents: 644 diff changeset	496	] ifFalse:[
a98a3634389a make processes restartable (for snapshot restart of java threads) cg parents: 644 diff changeset	497	JavaVM initializeVMIfNoEventThreadRunning
644 0294a6ed677e checkin from browser cg parents: 545 diff changeset	498	].
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	499
644 0294a6ed677e checkin from browser cg parents: 545 diff changeset	500	"/ if its a relative file-URL, make it relative under
0294a6ed677e checkin from browser cg parents: 545 diff changeset	501	"/ java...
0294a6ed677e checkin from browser cg parents: 545 diff changeset	502	u := URL fromString:codeBaseURL.
0294a6ed677e checkin from browser cg parents: 545 diff changeset	503	u method = 'file' ifTrue:[
0294a6ed677e checkin from browser cg parents: 545 diff changeset	504	fn := Smalltalk getSystemFileName:u file.
0294a6ed677e checkin from browser cg parents: 545 diff changeset	505	fn isNil ifTrue:[
0294a6ed677e checkin from browser cg parents: 545 diff changeset	506	fn := Smalltalk getPackageFileName:('stx/libjava/' , u file).
0294a6ed677e checkin from browser cg parents: 545 diff changeset	507	]
0294a6ed677e checkin from browser cg parents: 545 diff changeset	508	].
0294a6ed677e checkin from browser cg parents: 545 diff changeset	509	fn notNil ifTrue:[
0294a6ed677e checkin from browser cg parents: 545 diff changeset	510	fn := 'file:' , fn asFilename pathName
0294a6ed677e checkin from browser cg parents: 545 diff changeset	511	] ifFalse:[
0294a6ed677e checkin from browser cg parents: 545 diff changeset	512	fn := codeBaseURL
0294a6ed677e checkin from browser cg parents: 545 diff changeset	513	].
0294a6ed677e checkin from browser cg parents: 545 diff changeset	514	jCodeBaseURL := Java as_URL:fn.
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	515	documentURL notNil ifTrue:[
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	516	jDocumentURL := Java as_URL:documentURL.
644 0294a6ed677e checkin from browser cg parents: 545 diff changeset	517	] ifFalse:[
0294a6ed677e checkin from browser cg parents: 545 diff changeset	518	jDocumentURL := Java as_URL:fn
288 d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	519	].
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	520	archiveURL notNil ifTrue:[
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	521	jArchiveURL := Java as_URL:archiveURL.
d71bacb73ff7 checkin from browser cg parents: 286 diff changeset	522	].
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	523
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	524	id := appletID.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	525	id isNil ifTrue:[
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	526	NextSequentialAppletID isNil ifTrue:[
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	527	NextSequentialAppletID := 1.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	528	].
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	529	id := NextSequentialAppletID.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	530	NextSequentialAppletID := NextSequentialAppletID + 1
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	531	].
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	532
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	533	attribs := Dictionary new.
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	534	width notNil ifTrue:[attribs at:'width' put:width printString].
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	535	height notNil ifTrue:[attribs at:'height' put:height printString].
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	536
644 0294a6ed677e checkin from browser cg parents: 545 diff changeset	537	codeURL notNil ifTrue:[
0294a6ed677e checkin from browser cg parents: 545 diff changeset	538	attribs at:'code' put:codeURL
384 9c0f24e91237 started some support for NS4.0 cg parents: 318 diff changeset	539	].
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	540	parameterDictionary notNil ifTrue:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	541	attribs declareAllFrom:parameterDictionary
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	542	].
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	543	attributeHashTable := Java as_Hashtable:attribs.
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	544
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	545	anAppletContextOrNil notNil ifTrue:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	546	appletContext := anAppletContextOrNil
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	547	] ifFalse:[
420 7d5ce7e030d4 checkin from browser cg parents: 419 diff changeset	548	appletContext := self class newAppletContext.
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	549	appletContext isNil ifTrue:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	550	self warn:'no netscape.applet.MozillaAppletContext class'.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	551	^ false
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	552	].
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	553	].
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	554
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	555	jEmbeddedAppletFrameClass := Java classForName:'netscape.applet.EmbeddedAppletFrame'.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	556	jEmbeddedAppletFrameClass isNil ifTrue:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	557	self warn:'no netscape.applet.EmbeddedAppletFrame class'.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	558	^ false
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	559	].
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	560	jDerivedAppletFrameClass := Java classForName:'netscape.applet.DerivedAppletFrame'.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	561	jDerivedAppletFrameClass notNil ifTrue:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	562	"/ ns4.0
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	563	embeddedAppletFrame := jDerivedAppletFrameClass new.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	564	isNS40 := true.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	565	] ifFalse:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	566	"/ ns3.x
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	567	embeddedAppletFrame := jEmbeddedAppletFrameClass new.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	568	isNS40 := false.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	569	].
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	570	embeddedAppletFrame instVarNamed:'pData' put:self.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	571
429 99990a8a3509 * empty log message * cg parents: 420 diff changeset	572	toolkit := (Java classForName:'java.awt.Toolkit') perform:#'getDefaultToolkit'.
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	573	peer := toolkit
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	574	perform:#'createFrame(Ljava/awt/Frame;)Ljava/awt/peer/FramePeer;'
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	575	with:embeddedAppletFrame.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	576
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	577	(embeddedAppletFrame respondsTo:#'<init>(Ljava/net/URL;Ljava/net/URL;Ljava/net/URL;Ljava/util/Hashtable;Lnetscape/applet/MozillaAppletContext;Ljava/lang/Integer;Z)V')
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	578	ifTrue:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	579	"/ 4.0 netscape
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	580	embeddedAppletFrame
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	581	perform:#'<init>(Ljava/net/URL;Ljava/net/URL;Ljava/net/URL;Ljava/util/Hashtable;Lnetscape/applet/MozillaAppletContext;Ljava/lang/Integer;Z)V'
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	582	withArguments:
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	583	(Array
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	584	with:jDocumentURL
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	585	with:jCodeBaseURL
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	586	with:jArchiveURL
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	587	with:attributeHashTable
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	588	with:appletContext
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	589	with:(Java as_Integer:id)
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	590	with:0 "/ reloadClasses-boolean
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	591	).
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	592	] ifFalse:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	593	(embeddedAppletFrame respondsTo:#'<init>(Ljava/net/URL;Ljava/net/URL;Ljava/net/URL;Ljava/util/Hashtable;Lnetscape/applet/MozillaAppletContext;Ljava/lang/Integer;)V')
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	594	ifTrue:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	595	"/ 3.01 netscape
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	596	embeddedAppletFrame
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	597	perform:#'<init>(Ljava/net/URL;Ljava/net/URL;Ljava/net/URL;Ljava/util/Hashtable;Lnetscape/applet/MozillaAppletContext;Ljava/lang/Integer;)V'
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	598	with:jDocumentURL
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	599	with:jCodeBaseURL
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	600	with:jArchiveURL
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	601	with:attributeHashTable
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	602	with:appletContext
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	603	with:(Java as_Integer:id).
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	604	] ifFalse:[
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	605	"/ oldStyle netscape
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	606	embeddedAppletFrame
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	607	perform:#'<init>(Ljava/net/URL;Ljava/net/URL;Ljava/util/Hashtable;Lnetscape/applet/MozillaAppletContext;I)V'
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	608	with:jDocumentURL
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	609	with:jCodeBaseURL
545 6a841644c5e9 checkin from browser cg parents: 527 diff changeset	610	with:attributeHashTable
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	611	with:appletContext
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	612	with:id.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	613	].
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	614	].
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	615
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	616	embeddedAppletFrame instVarNamed:'peer' put:peer.
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	617
ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	618	self javaPeer:peer.
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	619
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	620	^ true
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	621
397 ff55215c1eac fixes to allow multiple java applets in one frame; cg parents: 384 diff changeset	622	"Created: / 20.10.1998 / 15:47:04 / cg"
653 a98a3634389a make processes restartable (for snapshot restart of java threads) cg parents: 644 diff changeset	623	"Modified: / 24.12.1999 / 01:38:17 / cg"
282 80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	624	! !
80e840e0139f now holds all applet setup code cg parents: 233 diff changeset	625
303 0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	626	!JavaEmbeddedFrameView methodsFor:'resizing'!
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	627
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	628	sizeChanged:how
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	629	super sizeChanged:how.
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	630	^ self.
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	631	embeddedAppletFrame notNil ifTrue:[
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	632	(embeddedAppletFrame perform:#'isResizable()Z') ~~ 0 ifTrue:[
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	633	self windowGroup sensor
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	634	pushDamageEvent:(WindowEvent
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	635	for:self
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	636	type:#configureX:y:width:height:
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	637	arguments:(Array with:left with:top with:width with:height)).
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	638	"/ embeddedAppletFrame
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	639	"/ perform:#'appletResize(II)V'
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	640	"/ with:self width
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	641	"/ with:self height.
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	642	]
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	643	]
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	644
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	645	"Modified: / 1.2.1998 / 19:15:07 / cg"
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	646	! !
0b95d5f40bf2 checkin from browser cg parents: 288 diff changeset	647
233 fc91b8aba669 intitial checkin cg parents: diff changeset	648	!JavaEmbeddedFrameView class methodsFor:'documentation'!
fc91b8aba669 intitial checkin cg parents: diff changeset	649
fc91b8aba669 intitial checkin cg parents: diff changeset	650	version
2259 25d241dbe673 fixed: #version_SVN ($ to §) Claus Gittinger <cg@exept.de> parents: 2162 diff changeset	651	^ '$Header: /cvs/stx/stx/libjava/JavaEmbeddedFrameView.st,v 1.28 2011-11-24 11:52:46 cg Exp $'
25d241dbe673 fixed: #version_SVN ($ to §) Claus Gittinger <cg@exept.de> parents: 2162 diff changeset	652	!
25d241dbe673 fixed: #version_SVN ($ to §) Claus Gittinger <cg@exept.de> parents: 2162 diff changeset	653
25d241dbe673 fixed: #version_SVN ($ to §) Claus Gittinger <cg@exept.de> parents: 2162 diff changeset	654	version_CVS
25d241dbe673 fixed: #version_SVN ($ to §) Claus Gittinger <cg@exept.de> parents: 2162 diff changeset	655	^ '$Header: /cvs/stx/stx/libjava/JavaEmbeddedFrameView.st,v 1.28 2011-11-24 11:52:46 cg Exp $'
2151 c0b6570c6f9b Jan's version Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2116 diff changeset	656	!
c0b6570c6f9b Jan's version Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2116 diff changeset	657
c0b6570c6f9b Jan's version Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2116 diff changeset	658	version_SVN
2162 415c8bb27655 copyright fixed Claus Gittinger <cg@exept.de> parents: 2151 diff changeset	659	^ '�Id: JavaEmbeddedFrameView.st,v 1.26 2011/08/18 18:42:48 vrany Exp �'
2084 69ecd5609bb3 * empty log message * Claus Gittinger <cg@exept.de> parents: 749 diff changeset	660	! !

author	Claus Gittinger <cg@exept.de>
	Thu, 24 Nov 2011 13:02:05 +0100
changeset 2330	b189800c0d92
parent 2259	25d241dbe673
child 2353	fa7400d022a0
permissions	-rw-r--r--