Skip to main content

Pet Peeves: _SCREEN.Activeform

While it's a great product, there are just times that FoxPro really drives me nuts.

A great example? _SCREEN.Activeform.

I know people have ranted about this for years so now it's my turn.

_SCREEN.Activeform returns a pointer to the current form object. But what if there's no current form?

Does it return NULL? An empty string?

No. It errors out.

Does anyone know what the reasoning was here?

Now, you can verify it by doing

IF TYPE("_SCREEN.Activeform")="U"
** Now you KNOW there's no form there.

but then you still have to do a



Note that you can't use VARTYPE() because Activeform isn't a variable. (example : VARTYPE(_SCREEN.activeform)) - which is a shame because VARTYPE is the faster of the two.

In that blog post, if you read the comments, you'll hear things like "use PEMSTATUS" instead of Type for objects but the problem here is that ActiveForm IS a valid property for _SCREEN (unless you actually want to refer to it).

I thought I could be clever and maybe look at _SCREEN.FormCount but guess what? If a form is defined but hidden, the ActiveForm is still not there but FormCount is 1.

So the end result is you HAVE to use the slower, uglier type approach to get out of these annoying checks for _SCREEN.Activeform.

IF TYPE("_SCREEN.Activeform")<>"U"
** do something with it - _SCREEN.Activeform
** don't do anything otherwise you'll error out.

Now will users notice the performance penalty? That's a tough call - but I do know that it adds three unnecessary lines of code which adds to the Refactorability of a program.


Anonymous said…
I usually use
IF TYPE("_SCREEN.Activeform.Name") = "C"
*- Do something with it

The typecheck for the property digs into the object if it exists. The type-function internal error catch will catch the error (but sets the MESSAGE() returned value. what's up with that, anyhow?)
No need for the ISNULL() check.

Sietse Wijnker
Anonymous said…
If you have an ActiveX control on a form sometimes _SCREEN.ActiveForm refers to the control, not to the form it's on. I haven't tested if this bug has been fixed in the meantime, because our framework has a method to return the active form that deals with it.

Popular posts from this blog

Well, that explains CodePlex...

In a move that will be sure to anger open source (or rather anti-paid software, anti-Microsoft open source)  zealots, Microsoft is planning to buy GitHub . A year ago, I mused about why Microsoft would shut down CodePlex and how the world needs competing source code repositories to be strong. I'm not the only one per this Slashdot article  : "...   people have warned about GitHub becoming as large as it did as problematic because it concentrates too much of the power to make or break the open source world in a single entity, moreso because there were valid questions about GitHubs financial viability...." - Jacques Mattheij I will be interested in seeing this play out - whether developers jump ship or not. Have all the efforts Microsoft has made in pushing towards open source be seen as genuine or will all the zealots jump ship or maybe even attack? Microsoft's comment about why they shut down CodePlex referred to how spammers were using CodePlex. Well, GitHub

Attending Southwest Fox 2019 could change your life - Find out how

Southwest Fox is coming up in October and as I do every year, I spoke with the organizers Rick , Doug and Tamar on the FoxShow. Deadlines for Southwest Fox: Super-saver price (before July 1): $695 Early-bird price (before August 1): $770 Regular price (August 1 and later): $820 This year, I took a different approach with separate shows for each organizer but the main message is still the same : July 1st is their Go/No-Go date. Conferences don't talk about this very often. I don't think developers really question if Apple will hold their WWDC in June or Microsoft will hold their Build conference - but that's because those conferences are vendor-led. Southwest Fox is a community-driven conference - it's not driven by a company with an agenda. Listen to the interviews and you can hear how important each of the organizers feel the live connection between speakers and among attendees.

FoxInCloud Stats

FoxInCloud sent this link a while back about their statistics regarding visits to their site: What's interesting here is the breakdown of people. Yes, I think it's understandable that the Fox community is getting older. Another factor is the growth of the mobile and web environments taking over development. These environments really do push people towards the newer non-SQL or free SQL/hosted environments but more towards hosted storage options like Amazon and Google. A tool like FoxInCloud that helps MOVE existing applications to the cloud inherently competes with those environments. But FoxInCloud also allows developers to extend their application further by giving them a starting point using Javascript and the basic CSS (such as Bootstrap). If you're not rebuilding your application from scratch, it's certainly a great step forward. FoxPro VFP