| View previous topic :: View next topic |
| Author |
Message |
GeoTrail
Valued Contributor
Joined: 18 Feb 2003
Posts: 572
Location: Bergen, Norway
|
 Posted: Mon Feb 24, 2003 10:11 pm Post subject: About window shows once... |
 |
|
I've made an about window in my program.
I works. But only the first time I run it.
The next time I try to display it nothing happens.
Someone mentioned something about this to me earlier, but I can't remember what 
_________________
 |
|
| Back to top |
|
 |
ShinobiSoft
Professional Member
Joined: 06 Nov 2002
Posts: 790
Location: Knoxville, Tn
|
| Posted: Mon Feb 24, 2003 10:13 pm Post subject: |
|
|
Can ya post a little of your source?
_________________
Bill Weckel
ShinobiSoft Software
"The way is known to all, but not all know it." |
|
| Back to top |
|
|
FreezingFire
Admin Team
Joined: 23 Jun 2002
Posts: 3508
|
| Posted: Mon Feb 24, 2003 10:15 pm Post subject: |
|
|
Perhaps clearing the event buffer would help? 
_________________
FreezingFire
VDSWORLD.com
Site Admin Team |
|
| Back to top |
|
|
GeoTrail
Valued Contributor
Joined: 18 Feb 2003
Posts: 572
Location: Bergen, Norway
|
| Posted: Mon Feb 24, 2003 10:17 pm Post subject: |
|
|
Wow, that was fast 
This includes the Evloop event and the about dialog it self.
I run the about window with a menu click event.
That works fine, but if I click the about menu again then nothing happens.
| Code: | :Evloop
wait event
%%Event = @event()
rem info %%Event
goto %%Event
:AboutMENU
rem Check if the about window is already opened.
if @WinExists(About %%AppTitle)
Goto Evloop
Else
DIALOG CREATE,About %%AppTitle,-1,0,356,310,NOSYS,ONTOP
DIALOG ADD,STYLE,BOLD,,,B,,
REM *** Modified by Dialog Designer on 24.02.2003 - 17:17 ***
DIALOG ADD,BUTTON,CloseAbout,280,286,64,24,Close
DIALOG ADD,SHAPE,SHAPE1,0,0,356,65,WHITE,BLACK,,RECTANGLE
DIALOG ADD,BITMAP,BITMAP1,1,1,356,64,%%Path\sa-about_top.bmp
DIALOG ADD,TEXT,COPYRIGHT,288,8,,,%%Copyright,,TRANSPARENT
DIALOG ADD,TAB,TAB1,68,2,354,208,About|History|Thanks to|Beta testers
DIALOG ADD,TEXT,FREEMEM,120,16,,,Free memory:,,TRANSPARENT,BOLD
DIALOG ADD,TEXT,FREEMEM1,120,112,,,%%FreeMem,,TRANSPARENT
DIALOG ADD,TEXT,UNDRDEVELOP,120,16,,,Still under development...,,TRANSPARENT,BOLD
DIALOG ADD,EDIT,CREDITSTEXT,136,24,304,112,%%Credits,,WRAP,MULTI,SCROLL,READONLY
DIALOG ADD,TEXT,CREDITSHEAD,120,16,,,SPECIAL THANKS TO:,,TRANSPARENT,BOLD
DIALOG ADD,TEXT,VERSION,136,16,,,Version:,,TRANSPARENT,BOLD
DIALOG ADD,TEXT,FILEVER,136,112,,,%%FileVer,,TRANSPARENT
DIALOG SHOW
DIALOG HIDE,UNDRDEVELOP
DIALOG HIDE,CREDITSTEXT
DIALOG HIDE,CREDITSHEAD
Goto Evloop
End |
_________________
|
|
| Back to top |
|
|
ShinobiSoft
Professional Member
Joined: 06 Nov 2002
Posts: 790
Location: Knoxville, Tn
|
| Posted: Mon Feb 24, 2003 10:21 pm Post subject: |
|
|
How are you closing the About dialog?
_________________
Bill Weckel
ShinobiSoft Software
"The way is known to all, but not all know it." |
|
| Back to top |
|
|
GeoTrail
Valued Contributor
Joined: 18 Feb 2003
Posts: 572
Location: Bergen, Norway
|
| Posted: Mon Feb 24, 2003 10:22 pm Post subject: |
|
|
Well, I couldn't figure out how to close the dialog properly without closing the whole program so I'm just using DIALOG HIDE.
Is that bad?
_________________
|
|
| Back to top |
|
|
ShinobiSoft
Professional Member
Joined: 06 Nov 2002
Posts: 790
Location: Knoxville, Tn
|
| Posted: Mon Feb 24, 2003 10:26 pm Post subject: |
|
|
Not really. But it's better to close it.
change in your :Evloop -> "%%Event = ..." to
| Code: |
parse "%%Event;%D",@event(D)
|
and then what I normally do in my :CLOSE label is:
| Code: |
:CLOSE
if @greater(%D,0)
dialog select,%D
dialog close
wait event
%E = @event()
goto Evloop
end
exit
|
And then change the NOSYS style for your About dialog to SMALLCAP
Then I think it should work for ya.
_________________
Bill Weckel
ShinobiSoft Software
"The way is known to all, but not all know it." |
|
| Back to top |
|
|
GeoTrail
Valued Contributor
Joined: 18 Feb 2003
Posts: 572
Location: Bergen, Norway
|
| Posted: Mon Feb 24, 2003 10:33 pm Post subject: |
|
|
Hmm weird.
That worked. But only if I click the X to close the about dialog.
If I click the Close button then it's the same.
_________________
|
|
| Back to top |
|
|
ShinobiSoft
Professional Member
Joined: 06 Nov 2002
Posts: 790
Location: Knoxville, Tn
|
| Posted: Mon Feb 24, 2003 10:34 pm Post subject: |
|
|
Because your CloseAboutBUTTON isn't closing the dialog window.
_________________
Bill Weckel
ShinobiSoft Software
"The way is known to all, but not all know it." |
|
| Back to top |
|
|
GeoTrail
Valued Contributor
Joined: 18 Feb 2003
Posts: 572
Location: Bergen, Norway
|
| Posted: Mon Feb 24, 2003 10:35 pm Post subject: |
|
|
He he he never mind.
I just removed some silly code in the :CloseAboutBUTTON label and now it works great.
I had a DIALOG HIDE action there.
Silly me.
Thanks alot bweckel 
_________________
|
|
| Back to top |
|
|
ShinobiSoft
Professional Member
Joined: 06 Nov 2002
Posts: 790
Location: Knoxville, Tn
|
| Posted: Mon Feb 24, 2003 10:36 pm Post subject: |
|
|
Glad to be of assistance.
And, please, the name's Bill.
_________________
Bill Weckel
ShinobiSoft Software
"The way is known to all, but not all know it." |
|
| Back to top |
|
|
GeoTrail
Valued Contributor
Joined: 18 Feb 2003
Posts: 572
Location: Bergen, Norway
|
| Posted: Mon Feb 24, 2003 10:40 pm Post subject: |
|
|
OK, Bill 
I'm Robert 
_________________
|
|
| Back to top |
|
|
|
|
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You can attach files in this forum
You can download files in this forum
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
@vdsworld