Ding! Ding! Ding!  Karen wins!

The idea is to have a Main Menu and then cascade subsequent forms down and right as each one is opened.
Your prize, such as it is, is the code:
The Main Menu is an external form that is disconnected from the db. When an object is clicked a CFA runs that connects the db and gets the current location of the MainMenu:
GETPROPERTY RBASE_FORM LEFT 'gFormLeft'
GETPROPERTY RBASE_FORM TOP 'gFormTop'

When a form is opened, this code runs in the OAS EEP that bumps the top and left coordinates down and right and then positions the form; the form has alphablend set to zero:
SET VAR  +
  gFormLeft = (CTXT((NINT(.gFormLeft)) + 20)), +
  gFormTop = (CTXT((NINT(.gFormTop)) + 20))
PROPERTY RBASE_FORM LEFT .gFormLeft
PROPERTY RBASE_FORM TOP .gFormTop

PROPERTY RBASE_FORM ALPHABLENDVALUE 255

An On Close EEP in each form decrements the position:
SET VAR  +
  gFormLeft = (CTXT((NINT(.gFormLeft)) - 20)), +
  gFormTop = (CTXT((NINT(.gFormTop)) - 20))

Thanks Karen!
Doug
p.s. I use 'g' variables instead 'v' so I know they are global and not to be cleared in a form.

On 2/7/2020 11:54 AM, 'Karen Tellef' via RBASE-L wrote:
Hey I know this one!!!!  I've actually never done this, but knew I had it somewhere in my notes.



To make a form invisible, check Alpha-Blend and set the value to 0.
On form after start eep, do whatever, then PROPERTY RBASE_FORM ALPHABLENDVALUE 255




Karen


-----Original Message-----
From: Doug Hamilton <[email protected]>
To: R:Base List <[email protected]>
Sent: Fri, Feb 7, 2020 11:45 am
Subject: [RBASE-L] - Hide form while repositioning

When a form is first opened, how do I hide it until it is in a desired
location?

Forms normally open in the center of the screen.  I have an On After
Start EEP that uses PROPERTY RBASE_FORM LEFT 'nnn' and PROPERTY
RBASE_FORM TOP 'nnn' to locate the form elsewhere.  The form briefly
appears in the center of the screen and then locates to the assigned
position.

What I want to do is have the equivalent of Hide-On-Startup for the
form, position it and then issue a PROPERTY RBASE_FORM VISIBLE 'TRUE'.

I tried PROPERTY RBASE_FORM VISIBLE 'FALSE' as the first line in the
On-After-Start EEP but it was too late - the form was already visible.
PROPERTY RBASE_FORM VISIBLE 'FALSE' didn't work in the On Before Start
EEP cuz you can't hide something that isn't there yet :)

I played around with Gravitation on New Form Behavior but couldn't get
what I wanted.

BTW, the PROPERTY LEFT and TOP are in a RUN SELECT that is called in the
form's On After Start EEP; I run that in all my forms to set Captions,
some hints and generic form stuff.

Ideas?

TIA,
Doug
RB X.5E 20114

--
For group guidelines, visit http://www.rbase.com/support/usersgroup_guidelines.php
---
You received this message because you are subscribed to the Google Groups "RBASE-L" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. <mailto:[email protected].> To view this discussion on the web visit https://groups.google.com/d/msgid/rbase-l/aac71212-2ef0-234c-8532-ccea63a69453%40wi.rr.com.
--
For group guidelines, visit http://www.rbase.com/support/usersgroup_guidelines.php
---
You received this message because you are subscribed to the Google Groups "RBASE-L" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected] <mailto:[email protected]>. To view this discussion on the web visit https://groups.google.com/d/msgid/rbase-l/1427773212.974810.1581098060265%40mail.yahoo.com <https://groups.google.com/d/msgid/rbase-l/1427773212.974810.1581098060265%40mail.yahoo.com?utm_medium=email&utm_source=footer>.

--
For group guidelines, visit 
http://www.rbase.com/support/usersgroup_guidelines.php
--- You received this message because you are subscribed to the Google Groups "RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
To view this discussion on the web visit 
https://groups.google.com/d/msgid/rbase-l/a19d6d52-00e2-1abe-e173-4772de8371c2%40wi.rr.com.

Reply via email to