VFP DEFINE CLASS HOW TO
VFP DEFINE CLASS CODE

Don't let the terminology throw you.īy definition, every class created in Visual FoxPro is a subclass of another class. Unfortunately, Microsoft uses the term parentclass to mean the same thing. The term superclass used here is in line with terminology used in most texts that discuss object orientation. This can be a built-in class provided with Visual FoxPro 6 or one that you create or purchase. is the name of the class and is the name of the class upon which the class is based.

VFP DEFINE CLASS CODE

All code between DEFINE and ENDDEFINE relates to this class. In the following sections you read about each portion of the construct separately.ĭEFINE CLASS AS This line of code tells Visual FoxPro that you are creating a class. The following sections provide a definitive look at the syntax of creating and using classes in Visual FoxPro.ĭefining ClassesYou define classes using the DEFINE CLASS/ ENDDEFINE construct. All the work was done in code, which is a good way to look at creating classes because it provides a clear view of what you can do when you create classes. That is temporary 'do and throw away' style builder.In Chapter 13, 'Introduction to Object-Oriented Programming,' you briefly learned some of the issues related to creating classes in Visual FoxPro. Onece you have the desired reference(s), you can add and arrange objects within that code window programmatically, select the code and execute selection (erase the controls, correct your code and retry if you can't do it right for the first time). Second, you would need to create your inner controls first and then add as needed to create the outermost object.ĪT designtime, you could go to command window, pop up a code window: modify command Īnd then using ASELOBJ() function you can get a reference to any object on the form you are designing. ĭefine class m圜ontainer as MyBeautifulContainer from m圜lasslib.vcx

Instead you would need to define a class in your code like this: define class form40 as formĪdd object m圜ontainer as M圜ontainer with. ie: add object m圜ontainer as MyBeautifulContainer from m圜lasslib.vcx First, to add a class from a class library you need to sepcify its source.

VFP DEFINE CLASS HOW TO

You can do any form and its controls in code (with the exception of one or two activex controls maybe) but you need to understand how to code container type controls. If you want to do this in code, then first you shouldn't depend view code as Tamar already pointed out. I suspect I could get around this by generating an Init method which calls ADDOBJECT() to add my control container to cntouter, but I'd rather have it in the class definition. Yet, this technique is used in the 'View Class Code' output. The problem is that apparently you can't, in the DEFINE CLASS command, ADD OBJECT to a member. Class cntctrls is the container that contains all the labels/radio buttons. The class frmae is a class (from a VCX) which includes a container called 'cntouter'. My actual problem is that the code output by 'View Class Code' seems to include invalid syntax: DEFINE CLASS form40 AS frmaeĪDD OBJECT 40 AS cntctrls WITH Then I wrote code to generate a PRG with all the pieces I need. So, rather than spend a huge fraction of my life dragging and dropping fields around, and realizing that I happen to have a handy list of all the fields, their options and default values, I used the 'View Class Code' option from the Class Browser to get a sample of what the code looks like as a base. We have several VCXs in our application which do something similar, but not with anywhere near as many individual controls. (and yes, I know that's a lot of radio buttons, but that's what the users want). I'm writing a program to generate a VFP form class with lots (90+ each) of labels and radio buttons on it.

Vfp define class