delete-frame(#<mswindows-frame "XEmacs"
0x12b5>)
# bind (event image-instance)
(lambda
(image-instance event) (isearch-dehighlight) (delete-frame (event-chan
nel
event)))(#<image-instance (widget) on #<window on "csh.cshrc" 0x12b6>
button
"Cancel" face=#<face widget "widget face"> 88x19 on
#<mswindows-frame> 0x001F03
10 0x13ad> #<misc-user-event (eval
(funcall (lambda ... ... ...) #<image-instanc
e (widget) on #<window on
"csh.cshrc" 0x12b6> button "Cancel" face=#<face widget
"widget
face"> 88x19 on #<mswindows-frame> 0x001F0310 0x13ad>
#<misc-user-event
(eval #1)>))>)
funcall((lambda
(image-instance event) (isearch-dehighlight) (delete-frame (ev
ent-channel
event))) #<image-instance (widget) on #<window on "csh.cshrc"
0x12b6
> button "Cancel" face=#<face widget "widget face"> 88x19 on
#<mswindows-frame>
0x001F0310 0x13ad> #<misc-user-event (eval
(funcall (lambda ... ... ...) #<image
-instance (widget) on #<window on
"csh.cshrc" 0x12b6> button "Cancel" face=#<fac
e widget "widget
face"> 88x19 on #<mswindows-frame> 0x001F0310 0x13ad>
#<misc-us
er-event (eval #1)>))>)
eval((funcall (lambda
(image-instance event) (isearch-dehighlight) (delete-fra
me ...))
#<image-instance (widget) on #<window on "csh.cshrc" 0x12b6> button
"Ca
ncel" face=#<face widget "widget face"> 88x19 on
#<mswindows-frame> 0x001F0310 0
x13ad> #<misc-user-event (eval
#0)>))
# (condition-case ... . error)
# (catch top-level
...)
__________________________________________________________________
黃得森
Sam WONG,
Tak-sum
ICQ#: 40412936
| Current ICQ status: |
|
( Home Tel#:
852-2569-0295
( Work Tel#: 852-2358-6655
( Cell
Tel#: 852-9206-3805
+ More ways
to contact me
__________________________________________________________________