Package: u_xmlform Diagram Back to overview

TFWXMLColumns
class

Description
Collection of FWXMLColumn

Inherits from: TFWSources
Operations
Name Parameters Returns Visibility
Add

Description
function Add Adding a column to form //////////////////////////////////////////////////////////////////////////////

  TFWXMLSource   public


TFWXMLSource
class

Description
TFWXMLColumn

Inherits from: TFWSource
Attributes
Name Type Visibility
FPageControlDetails
TPageControl   private
FPanelDetails
TPanel   private
PageControlDetails
  public
PanelDetails
  public


TF_XMLForm
class

Description
Form created from XML

Inherits from: TF_CustomFrameWork
Attributes
Name Type Visibility
gfin_FormIni

Description
Déclarations privées

TOnFormInfoIni   private
FPageControl
TPageControl   private
FMainPanel
TPanel   private
FActionPanel
TPanel   private
gr_Function
TLeonFunction   private
gfwe_Password
TFWEdit   private
gfwe_Login
TFWEdit   private
gbtn_PrintButton
TFWPrintSources   private
gxml_SourceFile
TALXMLDocument   protected
Fonction
  public
ActionPanel
  public
MainPanel
  public
PageControl
  public
Operations
Name Parameters Returns Visibility
fpc_CreatePageControl

Description
fonction fpc_CreatePageControl Creating a pagecontrol awin_Parent : Parent component as_Name : name of pagecontrol apan_PanelOrigin : Changing The non pagecontrol panel and adding it to the tabsheet getting 2 tabsheet

TWinControl awin_Parent
String as_Name
TWinControl apan_PanelOrigin
 
TPageControl   private
fscb_CreateTabSheet

Description
function fscb_CreateTabSheet Create a tabsheet and so a pagecontrol apc_PageControl : Page control to eventually create awin_ParentPageControl : Parent of pagecontrol awin_PanelOrigin : Panel not in a pagecontrol as_Name : Pagecontrol name as_Caption : old caption ai_Counter : COlumn counter

TPageControl apc_PageControl
TWinControl awin_ParentPageControl
TWinControl awin_PanelOrigin
String as_Name
String as_Caption
 
TScrollBox   private
p_CloseLoginAction

Description
procedure p_CloseLoginAction Login close event

TObject AObject
TCloseAction ACLoseAction
 
  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

TDBRadioGroup argr_Control
 
  protected
p_setControl
String as_BeginName
TWinControl awin_Control
TWinControl awin_Parent
TALXMLNode anod_Field
Longint ai_FieldCounter
Longint ai_counter
 
  protected
fdbc_CreateLookupCombo

Description
function TF_XMLForm.fdbc_CreateLookupCombo Create the lookup combo box from xml relation /////////////////////////////////////////////////////////////////////////////////////////

TWinControl awin_Parent
TDSSource ads_Connection
String as_Table
String as_FieldsID
String as_FieldsDisplay
String as_Name
TList alis_IdRelation
TList alis_DisplayRelation
Integer ai_FieldCounter
Integer ai_Counter
Boolean OneFieldToFill
 
TXMLFillCombo   protected
fdbg_GroupViewComponents

Description
function fdbg_GroupViewComponents Creates a full N-N or N-1 relationships management awin_Parent : the parent component of the created components anod_NodeRelation : The relationships node const alis_ListCrossLink : The other side relationships ai_FieldCounter : Table counter ai_Counter : Column Counter returns the main list

TFWXMLSource afws_source
TWinControl awin_Parent
Integer ai_Connection
TDSSource ads_Connection
String as_NameRelation
String as_ConnectionBind
String as_ClassRelation
String as_ClassBind
String as_OtherClass
String as_fieldsId
String as_fieldsDisplay
TRelationBind aa_FieldsBind
TList alis_IdRelation
TList alis_DisplayRelation
of String aa_FieldsDisplayNames
Integer ai_FieldCounter
Integer ai_Counter
 
TDBGroupView   protected
ffwc_getRelationComponent

Description
function ffwc_getRelationComponent Creates some relationships components, included the full Groupview relationships awin_Parent : Parent of all created components anod_Field : relationships node ab_IsLocal : is relationships not linked to data ? ai_FieldCounter : table counter ai_Counter : column counter

TFWXMLSource afws_source
TWinControl awin_Parent
TALXMLNode anod_Field
Integer ai_FieldCounter
Integer ai_Counter
 
TWinControl   protected
p_setComponentLeft
TControl awin_Control
Boolean ab_Column
 
  protected
p_setFieldComponentTop

Description
procedure p_setFieldComponent after having fully read the field nodes last setting of field component awin_Control : Component to set afw_Source : Form Column afw_columnField : Field Column ab_IsLocal : Not linked to data ab_Column : Second editing column

TWinControl awin_Control
Boolean ab_Column
 
  protected
p_setFieldComponentData
TWinControl awin_Control
TFWXMLSource afw_Source
TFWFieldColumn afw_columnField
Boolean ab_IsLocal
 
  protected
p_setLabelComponent

Description
procedure p_setLabelComponent after having fully read the field nodes last setting of label component awin_Control : Field Component alab_Label : Label to set ab_Column : Second editing column

TWinControl awin_Control
TFWLabel alab_Label
Boolean ab_Column
 
  protected
fb_setChoiceProperties

Description
function fb_setChoiceProperties After having read child nodes from component node setting the values of choice node anod_FieldProperty : Component Node argr_Control : Choice component

TALXMLNode anod_FieldProperty
TDBRadioGroup argr_Control
 
Boolean   protected
CreateSources

Description
function CreateSources overrided Create The TFWXMLColumns into the inherited TF_XMLForm returns original and inherited TFWXMLColumns

  TFWSources   protected
fwin_CreateFieldComponent

Description
No comment node to create the Control

TFWXMLSource afws_Source
TWinControl awin_Parent
TALXMLNode anod_Field
Boolean ab_isLarge
Boolean ab_IsLocal
Longint ai_FieldCounter
Longint ai_counter
 
TWinControl   protected
fwin_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

String as_Table
TALXMLNode anod_Field
Longint ai_FieldCounter
Longint ai_Counter
TWinControl awin_Parent
TWinControl awin_Last
Boolean ab_Column
TFWXMLSource afws_Source
 
TWinControl   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
 
TScrollBox   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_Field
TWinControl awin_Control
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
overrided procedure p_AfterColumnFrameShow aFWColumn : 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
fb_InsereCompteur
TDataset adat_Dataset
TStringlist aslt_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