[RBASE-L] - Re: form size

[Ted Lienhard]

Hi Jim,   A while back there was another question about this.  I have taken the liberty to give you the entire thread in one message.  I apologize in advance if it is too much info!   Best regards, Ted   Ted Lienhard CNE NCT Golden Valley Consulting         >>> Jim Belisle<j...@kaypark.com> 12/30/2009 10:51 AM >>> What command do I use to adjust the form size to our various users?    They have different size monitors and desktop pixle settings.   Jim     Alastair,   You could also use the Form opening and closing behavior. Find it under FORM properties - Miscellaneous.   I like the options there but had to quit using them because I had a couple of users that would use remote desktop and depending on the connection it could take a while for the form to load because of the behavior.   Jan     -----Original Message----- From: "Alastair Burr" <alastair.b...@ntlworld.com> To: rbase-l@rbase.com (RBASE-L Mailing List) Date: Fri, 25 Sep 2009 14:12:50 +0100 Subject: [RBASE-L] - Re: Screen Resolution Thanks, Jan,   I had half-guessed that the EEP might not run as the form was "closed" but it does seem to do something so I half-guessed - the other half - that it would run if you see what I mean!   I suppose that I can put the code in a button's EEP and then do the exit but I'll have to block off the "Esc" key which I don't really want to do.   Regards, Alastair.   ----- Original Message ----- From: jan johansen To: RBASE-L Mailing List Sent: Friday, September 25, 2009 1:41 PM Subject: [RBASE-L] - Re: Screen Resolution   Alastair,   Nothing wrong with your code. But property commands only work while  the form is open. You can do some clean up work in the OnClose eep but that is all. You can't use it for error checking to return to the form because the form is now closed (or closing).   Jan     -----Original Message----- From: "Alastair Burr" <alastair.b...@ntlworld.com > To: rbase-l@rbase.com (RBASE-L Mailing List) Date: Fri, 25 Sep 2009 12:55:40 +0100 Subject: [RBASE-L] - Re: Screen Resolution The natural follow-up to this was to try to fade the form away so I created this in the On Exit EEP: SET VAR vCount = 255 PROPERTY RBASE_FORM AlphaBlendValue '255' PROPERTY RBASE_FORM ALPHABLEND 'TRUE' WHILE vCount > 0 THEN   SET VAR vCount = (. vCount - 2)   SET VAR vAlphaBlend = +     ('PROPERTY RBASE_FORM AlphaBlendValue' & '''' + ( CTXT(. vCount )) + '''')   &vAlphaBlend ENDWHILE The form flickers and fades but not as expected - rather, the detail disappears at once and the borders fade but that's not an accurate description as you need to see it.   Can anybody see my mistake or explain why it happens this way?   Thanks & regards, Alastair.     ----- Original Message ----- From: Alastair Burr To: RBASE-L Mailing List Sent: Friday, September 25, 2009 8:38 AM Subject: [RBASE-L] - Re: Screen Resolution   Ted, thanks in particular for the AlphaBlend bit of this.   I tried your technique on one of my forms but the display was so fast as to make the fading up imperceptible. I tried to slow it down with pauses but that was far too slow. Eventually, I came up with a loop which did display the form rather nicely:   SET VAR vCount = 0 -- pre-defined as integer SET VAR vAlphaBlend TEXT = NULL WHILE vCount < 255 THEN   SET VAR vCount = (. vCount + 2)   SET VAR vAlphaBlend = +     ('PROPERTY RBASE_FORM AlphaBlendValue' & '''' + ( CTXT (.vCount)) + '''')   &vAlphaBlend ENDWHILE PROPERTY RBASE_FORM ALPHABLEND 'FALSE' I found that adding 2 to the vCount variable worked best for me but, obviously, adjusting the value will vary the speed of display.   Regards, Alastair.     ----- Original Message ----- From: Ted Lienhard To: RBASE-L Mailing List Sent: Wednesday, September 23, 2009 6:18 PM Subject: [RBASE-L] - Re: Screen Resolution   Hi Tom,   There are probably two main ways to do this.  One is to set the "ALIGN" setting to client on the form.  This gives you a bigger main form, but the objects keep their relative position and size...looks like a webpage that isn't scalable.  I didn't like that look, so I came up with this solution, thanks to Razzak's training and some time spent finding the precise "scaleby" numbers for each resolution.  The default is very important for the resolutions for which you choose not to make a custom size.   Here is how I have done screen scaling: Set the Transparency by checking the Alphablend box in the Form properties, with an Alphablend value of 1.  THEN...    --First, In the beginning of the OnAfterStart EEP, I make sure the form is transparent: PROPERTY RBASE_FORM alphablend 'true' PROPERTY RBASE_FORM alphablendvalue '1'       --Then, using the CVAL function SCREENSIZE, I find out what the user's resolution is --and use the PROPERTY scaleby to set my form size:   SET VAR vscreen TEXT = (CVAL('SCREENSIZE')) SWITCH (.vscreen)   CASE '1024,768'     PROPERTY RBASE_FORM scaleby '1050'     BREAK   CASE '1280,1024'     PROPERTY RBASE_FORM scaleby '1050'     BREAK   CASE '1280,960'     PROPERTY RBASE_FORM scaleby '1050'     BREAK   CASE '1400,1050'     PROPERTY RBASE_FORM scaleby '1098'     BREAK   CASE '1600,1200'     PROPERTY RBASE_FORM scaleby '1098'     BREAK   CASE '2048,1536'     PROPERTY RBASE_FORM scaleby '1098'     BREAK   CASE '2560,1920'     PROPERTY RBASE_FORM scaleby '1098'     BREAK     DEFAULT     PROPERTY RBASE_FORM scaleby '1258'     --    PROPERTY RBASE_FORM scaleby '1335'     BREAK ENDSW   --Then, I make the form gradually appear (this "gradually" is relative to your CPU clock speed!): PROPERTY RBASE_FORM alphablendvalue '25' PROPERTY RBASE_FORM alphablendvalue '50' PROPERTY RBASE_FORM alphablendvalue '75' PROPERTY RBASE_FORM alphablendvalue '100' PROPERTY RBASE_FORM alphablendvalue '150' PROPERTY RBASE_FORM alphablendvalue '175' PROPERTY RBASE_FORM alphablendvalue '200' PROPERTY RBASE_FORM alphablendvalue '225' PROPERTY RBASE_FORM alphablendvalue '235' PROPERTY RBASE_FORM alphablend 'false'   Hope that helps!   Best regards, Ted     Ted Lienhard CNE NCT Golden Valley Consulting >>> Tom Frederick<tom.freder...@elmcity.org> 9/22/2009 10:17 AM >>>   Is there a way to automatically adjust screen resolutions to fit a monitor's capability? We mostly use wide screens and standardly set resolution to 1440x900. Works great. I use a small laptop to make sure the forms all fit so it fits there, they will fit everywhere. Worked well until I ran into some users who insist on a larger 1024x768 resolution for vision reasons. Causes endless problems that I normally never see: Using MAC OS theme, a bright blue bar pops down out of the top display line that repeats the caption phrase. 2-3 lines of a menu drift below the bottom of the screen and they are not reachable. I can manually adjust the displays to 1440x900 and make them work correctly then the user complains their regular programs are far too small for them to see once they exit. How do I automatically change to the resolution needed for the database, then return to whatever non-database resolution the user wants on their screen once they leave?  I know I will see more of this as we start to go wireless and start bringing netbooks and other portable devices into the mix. Tom Frederick Elm City Center 1314 W Walnut Jacksonville, IL 62650 O - 217-245-9504 F- 217-245-2350 Email - tom.freder...@elmcity.org