Forums

by Torrie Moore >> Sun, 10 Oct 1999 20:13:12 GMT

Does anyone know how to tell if a form has been setup as a printer form rather than a screen form?

Torrie Moore
Concept Engineering

by Kevin R. Luck >> Wed, 13 Oct 1999 3:04:16 GMT

In the Painter open up the New Form dialog. In the Existing Forms listbox click on the form you want to check. The Form Type option buttons will indicate which type of form it is.

Cheers, k

by Kevin R. Luck >> Wed, 13 Oct 1999 3:10:58 GMT

Oops. I meant Form Style option buttons...

by Torrie Moore >> Wed, 13 Oct 1999 3:40:32 GMT

That's cool.

In code, is there a way to tell whether the form has been setup as a printer form. I can;t see a style property.

Torrie

by Paul Mathews >> Mon, 13 Dec 1999 16:56:03 GMT

That's cool.

In code, is there a way to tell whether the form has been setup as a printer form. I can;t see a style property.

The properties are

Form _createdControls ControlOrdList 0 3
Form _eventMappings Binary 0 0
Form _formBuildData Binary 0 0
Form _modifiedTimeStamp TimeStamp 0 0
Form _saveControlData ObjectNameDict 0 3
Form actualWindowState Integer 0 0
Form allowClose Boolean 0 0
Form applications AppNameDict 0 3
Form backBrush Binary 0 0
Form caption String 0 0
Form clientHeight Integer 0 0
Form clientWidth Integer 0 0
Form clipControls Boolean 0 0
Form controlBox Boolean 0 0
Form controlList ControlOrdList 0 3
Form icon Binary 0 0
Form locale Locale 0 0
Form maxButton Boolean 0 0
Form mdiChild Integer 0 0
Form mdiClientScrollHorzPos Integer 0 0
Form mdiClientScrollVertPos Integer 0 0
Form mdiFrame Boolean 0 0
Form menuList MenuOrdList 0 3
Form minButton Boolean 0 0
Form modalResult Integer 0 0
Form paintedDialogBaseUnits Integer 0 0
Form printerForm Boolean 0 0
Form scaleForm Boolean 0 0
Form scrollBars Integer 0 0
Form scrollHorzPos Integer 0 0
Form scrollVertPos Integer 0 0
Form secureForm Boolean 0 0
Form userProfile UserProfile 0 3
Form webEncodingType Character 0 0
Form webFileName String 0 0
Form webForm Boolean 0 0
Form windowState Integer 0 0

webForm and printerForm above, but they are protected, however can
write methods getWebForm and getPrinterForm on the form class to
display them.

List of properties generated from

propertyNDict();

vars
vCurrentClass : Class;
vPropertyNDict : PropertyNDict;
vProperty : Property;begin

vCurrentClass := Form; // InstanceType ??
while vCurrentClass <> null do
vPropertyNDict := vCurrentClass.getProperties();
foreach vProperty in vPropertyNDict do
write vCurrentClass.name & ' ' &
vProperty.name & ' ' & vProperty.type.name & ' ' & vProperty.type.access.Integer.String & ' ' & vProperty.type.subAccess.Integer.String;
endforeach;
break;
vCurrentClass := vCurrentClass.getSuperclass;
if vCurrentClass = Object then
vCurrentClass := null;
endif;
endwhile;
end;

Both suggestions originally came from Paul Daigneault, Jade Support

Regards


Paul Mathews
pem@cmsystemsgroup.com.au
Phone: [612] (99717384) Fax[612] (99711679)
(Dee Why,Sydney,Australia)

Please visit our homepage cmsystemsgroup.com.au.