forums.silverfrost.com Forum Index forums.silverfrost.com
Welcome to the Silverfrost forums
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Child window and scrollbars (Win32 vs Win64)

 
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> ClearWin+
View previous topic :: View next topic  
Author Message
wahorger



Joined: 13 Oct 2014
Posts: 1012
Location: Morrison, CO, USA

PostPosted: Tue May 11, 2021 4:07 am    Post subject: Child window and scrollbars (Win32 vs Win64) Reply with quote

All done in Plato.

In the following code, the first window appears, the second does not, and the print statement does not appear (Checkmate Win32). Basically, the program terminates with no error codes.

In Checkmate Win64, a message appears that a %sz is needed/expected. This matches the documentation for %ch using scrollbars. A subtlety I had missed in my production code.

BTW, when a %sz whose arguments are set to 0, all appears normally (as expected).

Code:

   winapp
   integer:: a,b
        call setup(a)
        b = winio@('%ww%ca[This is window 1]&')
        b = winio@('%ch',a)
        call setup(a)
        b = winio@('%ww%ca[This is window 2]&')
        b = winio@('%ch[hscrollbar,vscrollbar]',a)
        print *,'I have stopped'
        stop
        end
        subroutine setup(a)
        integer:: a
        integer:: c
        c = winio@('%sh&',a)
        c = winio@('This is some strange text%2nl&')
        c = winio@('')
        return
        end

An interesting artifact: When I acknowledge the error in Checkmate 64, Plato quits when I close the black "DOS box". Is that unusual?
Back to top
View user's profile Send private message Visit poster's website
PaulLaidler
Site Admin


Joined: 21 Feb 2005
Posts: 7160
Location: Salford, UK

PostPosted: Tue May 11, 2021 7:06 am    Post subject: Reply with quote

Bill

On occasion I find that Plato does crash after a spawned ClearWin+ program fails but at the moment a don't have a fix for that.

Plato has a recovery mechansm so it is unlikely that code changes will be lost.
Back to top
View user's profile Send private message AIM Address
Display posts from previous:   
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> ClearWin+ All times are GMT + 1 Hour
Page 1 of 1

 
Jump to:  
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


Powered by phpBB © 2001, 2005 phpBB Group