Open and CloseDisplay() question....
Posted: Thu Apr 15, 2010 12:33 am
Hi ALL!
In my program I've code that create, write on, and open a display to show some infos...
Since now no peobs but...
When I go to close the new display with the close gadget it will close all the program...
I've installed an event handler to check for "CloseWindow" but it was triggerd only when I close the main display...
It seems to me really weird...any idea on what I miss?
my code was:
CreateDisplay(2, { Width = 350, Height = 170, Color = $F0F0F0, NoHide = TRUE, Hidden = TRUE, Title = "Info file", Sizeable = FALSE }) ; Creo il mio Display che conterrĂ i dati Exif
SelectDisplay(2)
LOCAL q = 0
FOR LOCAL TAGPos = 1 TO 14
IF (TAGName[TAGPos] <> "") AND (ToString(TAGVAlue[TAGPos]) <> "99") AND (ToString(TAGVAlue[TAGPos]) <> "0")
TextOut(1, (1+((TAGPos-1-q)*12)), TAGName[TAGPos])
TextOut(88, (1+((TAGPos-1-q)*12)), TAGValue[TAGPos] .. "\n")
ELSE
q = q + 1
EndIF
NEXT
EndSelect()
OpenDisplay(2)
Really dunno what I made wrong...sorry!
Thank all for help!
In my program I've code that create, write on, and open a display to show some infos...
Since now no peobs but...
When I go to close the new display with the close gadget it will close all the program...
I've installed an event handler to check for "CloseWindow" but it was triggerd only when I close the main display...
It seems to me really weird...any idea on what I miss?
my code was:
CreateDisplay(2, { Width = 350, Height = 170, Color = $F0F0F0, NoHide = TRUE, Hidden = TRUE, Title = "Info file", Sizeable = FALSE }) ; Creo il mio Display che conterrĂ i dati Exif
SelectDisplay(2)
LOCAL q = 0
FOR LOCAL TAGPos = 1 TO 14
IF (TAGName[TAGPos] <> "") AND (ToString(TAGVAlue[TAGPos]) <> "99") AND (ToString(TAGVAlue[TAGPos]) <> "0")
TextOut(1, (1+((TAGPos-1-q)*12)), TAGName[TAGPos])
TextOut(88, (1+((TAGPos-1-q)*12)), TAGValue[TAGPos] .. "\n")
ELSE
q = q + 1
EndIF
NEXT
EndSelect()
OpenDisplay(2)
Really dunno what I made wrong...sorry!
Thank all for help!