Package: u_xmlform Diagram Back to overview

TF_XMLForm
class

Description
Form created from XML

Inherits from: TF_CustomFrameWork
Attributes
Name Type Visibility
gcon_Last

Description
XML Creating

TControl   private
gwin_Parent
TWinControl   private
gi_LastFormFieldsHeight
Longint   private
gi_LastFormColumnHeight
Longint   private
lfws_Source2
TFWSource   private
gfin_FormIni
TOnFormInfoIni   private
FPageControl
TCustomTabControl   private
FPanelMain
TPanel   private
FActionPanel
TPanel   private
gr_Function
TLeonFunction   private
gfwe_Password
TFWEdit   private
gfwe_Login
TFWEdit   private
gcx_FormCreating
TDoCreateFromXML   private
gbtn_PrintButton
TFWPrintSources   private
gxml_SourceFile
TALXMLDocument   protected
gxml_classTemplate
TALXMLDocument   protected
gnod_classTemplate
TALXMLNode   protected
Fonction
  public
ActionPanel
  public
PanelMain
  public
PageControl
  public
Operations
Name Parameters Returns Visibility
fpc_CreatePageControl

Description
No LFM Bug

TWinControl awin_Parent
String as_Name
TWinControl apan_PanelOrigin
 
TPageControl   private
p_CloseLoginAction

Description
procedure p_CloseLoginAction Login close event

TObject AObject
TCloseaction ACLoseAction
 
  private
p_CreateArrayStructComponentsControls

Description
procedure p_CreateArrayStructComponentsControls Creating groupbox with controls

TFWTables ADBSources
TFWTable ADBSource
TFWTable lfwt_Source2
TFWFieldColumn affd_ColumnFieldDef
TALXMLNode anod_Field
TControl acon_control
TDoCreateFromXML acx_FieldColumn
Longint ai_Fieldcounter
 
  private
p_LoginCancelClick

Description
procedure p_LoginCancelClick Cancel Click event

TObject AObject
 
  private
p_LoginOKClick

Description
procedure p_LoginOKClick Login OK Button event AObject : Needed for event

TObject AObject
 
  private
p_setFunction

Description
procedure p_setFunction Creating the components of the form from TLeonFunction into array a_Value : Menu function

TLeonFunction a_Value
 
  private
p_ScruteComposantsFiche     protected
p_setChoiceComponent

Description
procedure p_setChoiceComponent After having read child node from choice node setting the height of choice node argr_Control : Choice component

TCustomRadioGroup argr_Control
 
  protected
fcon_CreateFieldComponentAndProperties

Description
procedure p_CreateFieldComponentAndProperties Creating the column components as_Table : Table Name anod_Field: Node field ai_FieldCounter : Field counter ai_Counter : Column counter awin_Parent : Parent component ab_Column : Second editing column afws_Source : XML form Column afd_FieldsDefs : Field Definitions

TALXMLNode anod_Fields
TALXMLNode anod_Field
TALXMLNode anod_FieldImport
TALXMLDocument adoc_ClassImport
TWinControl awin_parent
TControl awin_last
Longint ai_FieldCounter
TDoCreateFromXML acx_FormCreate
TFWSource afws_Source
Boolean ab_SeparateIfTooMuch
 
TControl   protected
flab_setFieldComponentProperties

Description
Function flab_setFieldComponentProperties creating the label component and setting the field component from child nodes anod_Field : component node awin_Control : created field component awin_Parent : Parent component afd_FieldDef : Field definitions ai_Counter : Field Counter afws_Source : XML Form Column ab_Column : Segund editing column afcf_ColumnField : Field Form column definitions

TALXMLNode anod_Field1
TALXMLNode anod_Field2
TControl acon_Control
String as_name
TWinControl awin_Parent
Integer ai_Counter
Boolean ab_Column
TFWFieldColumn afcf_ColumnField
 
TFWLabel   protected
p_SetFieldButtonsProperties

Description
procedure p_SetFieldButtonsProperties Setting the editing buttons anod_Action : Action node for buttons ai_Counter : column counter awin_Parent : Parent component

TALXMLNode anod_Action
Integer ai_Counter
 
  protected
p_setControlName

Description
procedure p_setControlName Setting control name from node

String as_FunctionName
TALXMLNode anod_FieldProperty
TControl awin_Control
Longint ai_Counter
 
  protected
fb_ChargementNomCol

Description
Function fb_ChargementNomCol Inherited function, just make it true

TFWSource AFWColumn
Integer ai_NumSource
 
Boolean   protected
p_AfterColumnFrameShow

Description
function fwin_CreateFieldComponent Creates some field components from anod_Field awin_Parent : Parent of created components anod_Field : Node which wants a component overrided procedure p_AfterColumnFrameShow aFWColumn : abstract Column showing

TFWSource aFWColumn
 
  protected
DoClose

Description
overrided procedure DoClose Free the XML Form Setting CloseAction to cafree

TCloseaction CloseAction
 
  protected
fb_ChargeDonnees   Boolean   protected
KeyUp

Description
procedure TF_XMLForm.KeyUp Auto OK Login key event AObject : Needed for event

Word Key
TShiftState Shift
 
  protected
fpan_GridNavigationComponents

Description
function fpan_GridNavigationComponents Create a complete Grid navigation with Navigators returning the child created ScrollBox for the editing form awin_Parent : The grid navigation and editing parent const as_Name : name for caption const ai_Counter : Column counter

TWinControl awin_Parent
String as_Name
Integer ai_Counter
 
TCustomControl   protected
fb_InsereCompteur
TDataset adat_Dataset
TFWFieldColumns aff_Cle
String as_ChampCompteur
String as_Table
String as_PremierLettrage
Char ach_DebutLettrage
Char ach_FinLettrage
Int64 ali_Debut
Int64 ali_LimiteRecherche
 
Boolean   public
DoShow     public
p_setLogin

Description
Déclarations publiques procedure p_setLogin Special Login model axml_Login : XML Document of login form

TALXMLDocument axml_Login
TJvXPButton axb_ident
TMenuItem amen_MenuIdent
TImageList aiml_Images
TBitmap abmp_DefaultImage
Longint ai_CountImages
 
  public
BeforeCreateFrameWork

Description
overrided procedure BeforeCreateFrameWork Creating invisible component and setting it Sender : needed

TComponent Sender
 
  public
DestroyComponents

Description
procedure DestroyComponents Destroy all the visible components for the form to be re-used Initiate the XML Form Parameter : acom_Parent : If not nil destroy only the controls child of acom_Parent

TWinControl acom_Parent
 
  public
p_CreateFormComponents

Description
procedure p_CreateFormComponents Create a form from XML File as_XMLFile : XML File as_Name : Name of form awin_Parent : Parent component ai_Counter : The column counter for other XML File

String as_XMLClass
String as_Name
TWinControl awin_Parent
 
  public
Create

Description
Recherche du nom de l'executable pour aller chercher la bonne fonction d'initialisation //////////////////////////////////////////////////////////////////////////////

TComponent AOwner
 
  public
Destroy

Description
Creating objects

    public