Text in %PS is mudded

Paul, a year ago %ps started to do these muddying things with the text when you switch tabs. The first clicked page is always OK but when you switch tabs the text starts to be muddy more and more.

http://postimg.org/image/k7cj1v8ml/

You had this fixed 3-4 months ago but now a month or so it reappeared again.

Do you have a small sample program that illustrates this?

Any example you have will work but the background bitmap must be added to get this issue.

Here is Salford Demo file Auto_PS.f95 with the only difference of added graphics bitmap background

 i=WINIO@('%wp[bkmesh01]&')	


module aps_top
   implicit none
   integer ::ptr

contains

   integer function cbupdate()
      use mswin
      call see_propertysheet_page@(ptr) 
      cbupdate=2
   end function cbupdate
end aps_top


!
!      *******************************************
!      *                                         *
!      *  Changes the bottom property sheet      *
!      *                                         *
!      *******************************************

module aps_bottom
   use mswin
   implicit none
   integer :: xptr
   
contains   

   integer function xcbupdate()
      implicit none
      call see_propertysheet_page@(xptr) 
      xcbupdate=2
   end function xcbupdate
end aps_bottom

winapp           

program propsht
   use mswin
   use aps_top
   use aps_bottom
   integer :: i
   integer :: ps1,ps2,ps3
   integer :: xps1,xps2,xps3    
    ps1=1;ps2=2;ps3=2;xps1=1;xps2=2;xps3=3 
         ptr=2;xptr=3
         
!****************************************************************************
!*                                                                          *
!* Changes the top property sheet                                           *
!*                                                                          *
!****************************************************************************
	 I=WINIO@('%wp[bkmesh01]&')	
         i=winio@('%ca[ Sheet 1]&')     
         i=winio@('Sheet one %bt[hellow aaa world]%sh',ps1) 
         I=WINIO@('%wp[bkmesh01]&')
         i=winio@('%ca[ Sheet 2]&')
         i=winio@('Sheet two %bt[hellow xxx world]%sh',ps2) 
	 I=WINIO@('%wp[bkmesh01]&')
         i=winio@('%ca[ Sheet 3]&')
         i=winio@('Sheet three %bt[hellow zzz world]%sh',ps3) 
         i=winio@('%ca[ Sheet 1]&')     
         i=winio@('Sheet one %bt[hellow aaa world]%sh',xps1) 
         i=winio@('%ca[ Sheet 2]&')
         i=winio@('Sheet two %bt[hellow xxx world]%sh',xps2) 
         i=winio@('%ca[ Sheet 3]&')
         i=winio@('Sheet three %bt[hellow zzz world]%sh',xps3) 
         i=winio@('%ca[Grave PS Example]&')
         i=winio@('%bg[btnface]&')
         i=winio@('%sy[thin_border]&')
         i=winio@('%ob[raised]&')
         i=winio@('This is property sheet 1%ff%nl&')
   i=winio@('%`3ps&',ps1,ps2,ps3,ptr) 
   i=winio@('%ff%nlView Sheet Number:-&')
   i=winio@('%`bg[window]%il%dd%3^rd&',1,3,1,ptr,cbupdate) 
   i=winio@('%cb&')
   i=winio@('%ff%nl%ob[raised]&')
   i=winio@('This is property sheet 2%ff%nl&')
   i=winio@('%`3ps&',xps1,xps2,xps3,xptr) 
   i=winio@('%ff%nlView Sheet Number:-&')
   i=winio@('%`bg[window]%il%dd%3^rd&',1,3,1,xptr,xcbupdate) 
   i=winio@('%cb')
end program propsht

resources
bkmesh01     BITMAP bkmesh01.bmp

OK thanks. I can see the effect.

Another long term issue with PS: please also look if you have made any restrictions on amount of memory or other resources allocated for PS somewhere in the Windows or Clearwin.

Things are that i have PS crashing the whole code. As a workaround I always start the code under SDBG then it works OK. Crash started to appear when PS size (the amount of tabs and amount of other controls inside the tabs) exceeds some limit. This large PS keeps all the settings of my code

We discussed that here before and your suggestion with SAVE statement helped in the smaller code but not larger one. I finally reproduced this effect but due to relatively large size of the PS code (and it being deep inside the other code) i can not yet extract and post it here, but will try to simplify it if there will be no other suggestions

The refresh problem when %wp is combined with %sh has been fixed for the next release.

Cool. Thanks Paul. That bug was pretty annoying.

And now what left is the last also mentioned above 'bug of all bugs' i still have when the whole program crashes at the time of closing property sheet. By mysterious reason it does not crash if i run EXE through the SDBG so that's kind of OK for now. I am circling near this bug for a year and made a progress but had no time to make minimum possible size demo. If i make demo from scratch all works fine no matter how large code size it is, which might be indicative of my own code hidden problems not the %PS ones. Hopefully in a month when time permits i will get the demo code. Mentioning here again in the hope that someone else had this problem too

Dan

It has proved necessary to revisit this and the original issue that you raised some time back regarding %wp with over-laid text.

With the next release you will need to use a tilda (~) modifier with %wp in order to get transparent text on top of wallpaper.