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 

Font changes and automatic window sizing

 
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: 1021
Location: Morrison, CO, USA

PostPosted: Thu Mar 24, 2022 5:25 pm    Post subject: Font changes and automatic window sizing Reply with quote

The following sample exhibits the anomaly, specifically, the text displayed as BOLD is not fully displayed in the window. Each line should display the word "inclusive". Those that are bold do not. I used the string that was showing this problem. Shorter strings do not appear to have this particular issue, but I did not try all of the shorter ones to discover what would work.
Code:

   winapp
        use mswin
        integer:: i
        integer,external:: my_callback
        character*260:: buff='Copy From  Project:     Quad:PINE         State:CO Map Scale: 1 1:125000 From ID=1 to 60 inclusive'
        i = winio@('%ww[topmost,no_sysmenu,no_maxminbox]&')
        i = winio@('%fn[Courier]&')
        i = winio@('%ts&',1.0d0)
        i = winio@('%ws%nl&','Copy From  Project:     Quad:PINE         State:CO Map Scale: 1 1:125000 From ID=1 to 60 inclusive')
        i = winio@('%ws%nl&',trim(buff))
        i = winio@('%bf&')
        i = winio@('%ts&',1.0d0)
        i = winio@('%ws%nl&','Copy From  Project:     Quad:PINE         State:CO Map Scale: 1 1:125000 From ID=1 to 60 inclusive')
        i = winio@('%ws%nl&',trim(buff))
        i = winio@('%fn[Tahoma]&')

        i = winio@('%ws%nl&','Copy From  Project:     Quad:PINE         State:CO Map Scale: 1 1:125000 From ID=1 to 60 inclusive')
        i = winio@('%ws%nl&',trim(buff))
        i = winio@('%sf&')
        i = winio@('%bt[Call me]&')
        i = winio@('')
        stop
        end

https://capture.dropbox.com/9gjEB6wuI9thgwud
Back to top
View user's profile Send private message Visit poster's website
LitusSaxonicum



Joined: 23 Aug 2005
Posts: 2310
Location: Yateley, Hants, UK

PostPosted: Thu Mar 24, 2022 8:36 pm    Post subject: Reply with quote

Bill,

I can make the final 'inclusive' appear in those lines if instead of plain old %ws I use %-100ws. (The minus makes it left justified).

I suspect that there is an inbuilt limit of some kind to how big %ws can be by default.

Eddie
Back to top
View user's profile Send private message
wahorger



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

PostPosted: Thu Mar 24, 2022 9:11 pm    Post subject: Reply with quote

Yes, if I forced it, it will show. Thing is: I shouldn't have to force it.

It's not just one place where this can happen, and specifying a wide field makes all the other (smaller) instances look odd.

This occurred originally in a subroutine that is called from literally dozens of places. Sometimes with only a few dozen characters. Other times, long strings like this.

I separated out those portions of the routine and data that made this show itself to build an example that would demonstrate the problem.

Bill
Back to top
View user's profile Send private message Visit poster's website
PaulLaidler
Site Admin


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

PostPosted: Fri Mar 25, 2022 8:53 am    Post subject: Reply with quote

Bill

I am puzzled by this report of your experience. I don't get the reported behaviour and I have tested for both 32 bits and 64 bits.

There is nothing in the ClearWin+ code to give a clue. The internal buffer size is 1000 characters. There was a change to the code in December 2018 but the change should have no impact in this context.
Back to top
View user's profile Send private message AIM Address
mecej4



Joined: 31 Oct 2006
Posts: 1680

PostPosted: Fri Mar 25, 2022 12:06 pm    Post subject: Reply with quote

I took Bill's program and, as a casual/infrequent user of ClearWin, modified it to see if I could reproduce the truncation of strings on the right. On a 1920 X 1024 display, using FTN95 8.83 /64, I found that the following program shows that behaviour.

Code:
   winapp
        use mswin
        integer:: i
        integer,external:: my_callback
        character*60:: buff=' Is Paradise Lost   1 Is Paradise Lost   2  Is Paradise Lost'
        i = winio@('%ww[topmost,no_sysmenu,no_maxminbox]&')

        i = winio@('%fn[Courier]&')
        i = winio@('%ts&',1.2d0)
        i = winio@('%ws%nl&',buff)
        i = winio@('%ws%nl&',trim(buff))

        i = winio@('%bf&')
        i = winio@('%ts&',1.0d0)
        i = winio@('%ws%nl&',buff)
        i = winio@('%ws%nl&',trim(buff))

        i = winio@('%fn[Tahoma]&')
        i = winio@('%ws%nl&',buff)
        i = winio@('%ws%nl&',trim(buff))
        i = winio@('%sf&')
        i = winio@('%bt[Call me]&')
        i = winio@('')
        stop
        end


A screenshot showing the output of the program:



Note another item that has not been mentioned so far: the first four lines display extra spaces at the left.
Back to top
View user's profile Send private message
PaulLaidler
Site Admin


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

PostPosted: Fri Mar 25, 2022 1:02 pm    Post subject: Reply with quote

I get the same behaviour as mecej4 so I can investigate further.
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