Classe TMI_UI_InputBox_lcl

Unit

Declaração

type TMI_UI_InputBox_lcl = class(TForm)

Descrição

Hierarquia

Visão Geral

Campos

Public Action_HelpButton: TAction;
Public Action_CloseButton: TAction;
Public Action_CancelButton: TAction;
Public Action_OkButton: TAction;
Public ActionList1: TActionList;
Public ButtonPanel1: TButtonPanel;
Public DmxScroller_Form_Lcl1: TDmxScroller_Form_Lcl;
Public Mi_ScrollBox_LCL1: TMi_ScrollBox_LCL;
Public MI_UI_InputBox1: TMI_UI_InputBox;

Métodos

Public procedure DmxScroller_Form_Lcl1AddTemplate( const aUiDmxScroller: TUiDmxScroller);
Public procedure DmxScroller_Form_Lcl1CloseQuery(aDmxScroller: TUiDmxScroller; var CanClose: boolean);
Public procedure DmxScroller_Form_Lcl1Enter(aDmxScroller: TUiDmxScroller);
Public procedure DmxScroller_Form_Lcl1EnterField(aField: pDmxFieldRec);
Public procedure DmxScroller_Form_Lcl1Exit(aDmxScroller: TUiDmxScroller);
Public procedure DmxScroller_Form_Lcl1ExitField(aField: pDmxFieldRec);
Public procedure DmxScroller_Form_Lcl1NewRecord(aDmxScroller: TUiDmxScroller);
Public procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
Public procedure MI_UI_InputBox1EnterLocal(aDmxScroller: TUiDmxScroller);
Public function MI_UI_InputBox1InputBox(aTitle: AnsiString; aTemplate: AnsiString; aOnCloseQueryLocal: TOnCloseQueryLocal; aFont: AnsiString; aOnEnterLocal: TOnEnterLocal; aOnExitLocal: TOnExitLocal; aOnEnterFieldLocal: TOnEnterFieldLocal; aOnExitFieldLocal: TOnExitFieldLocal; aArgs: array of const; out aJSONObject: TJSONObject): TModalResult;
Protected Procedure Set_Template(aTemplate:AnsiString);
Public Procedure SetAlias(aTitle:AnsiString);
Public Procedure SetArgs(aArgs: array of const);
Public constructor Create(TheOwner: TComponent); override;
Public class Procedure testInputBox;

Propriedades

Public property Template: AnsiString read _Template write Set_Template;

Descrição

Campos

Public Action_HelpButton: TAction;
 
Public Action_CloseButton: TAction;
 
Public Action_CancelButton: TAction;
 
Public Action_OkButton: TAction;
 
Public ActionList1: TActionList;
 
Public ButtonPanel1: TButtonPanel;
 
Public DmxScroller_Form_Lcl1: TDmxScroller_Form_Lcl;
 
Public Mi_ScrollBox_LCL1: TMi_ScrollBox_LCL;
 
Public MI_UI_InputBox1: TMI_UI_InputBox;
 

Métodos

Public procedure DmxScroller_Form_Lcl1AddTemplate( const aUiDmxScroller: TUiDmxScroller);
 
Public procedure DmxScroller_Form_Lcl1CloseQuery(aDmxScroller: TUiDmxScroller; var CanClose: boolean);
 
Public procedure DmxScroller_Form_Lcl1Enter(aDmxScroller: TUiDmxScroller);
 
Public procedure DmxScroller_Form_Lcl1EnterField(aField: pDmxFieldRec);
 
Public procedure DmxScroller_Form_Lcl1Exit(aDmxScroller: TUiDmxScroller);
 
Public procedure DmxScroller_Form_Lcl1ExitField(aField: pDmxFieldRec);
 
Public procedure DmxScroller_Form_Lcl1NewRecord(aDmxScroller: TUiDmxScroller);
 
Public procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
 
Public procedure MI_UI_InputBox1EnterLocal(aDmxScroller: TUiDmxScroller);
 
Public function MI_UI_InputBox1InputBox(aTitle: AnsiString; aTemplate: AnsiString; aOnCloseQueryLocal: TOnCloseQueryLocal; aFont: AnsiString; aOnEnterLocal: TOnEnterLocal; aOnExitLocal: TOnExitLocal; aOnEnterFieldLocal: TOnEnterFieldLocal; aOnExitFieldLocal: TOnExitFieldLocal; aArgs: array of const; out aJSONObject: TJSONObject): TModalResult;
 
Protected Procedure Set_Template(aTemplate:AnsiString);

O Método Set_Template inicia o atributo _Template e criar a lista _FormSItem : PSitem

  • NOTAS

    • Criar em TObjectss.TStringList o método

Public Procedure SetAlias(aTitle:AnsiString);
 
Public Procedure SetArgs(aArgs: array of const);
 
Public constructor Create(TheOwner: TComponent); override;
 
Public class Procedure testInputBox;
 

Propriedades

Public property Template: AnsiString read _Template write Set_Template;

A propriedade Template é usada para criar uma lista de PSItem para ser usada como modelo do formulário.

  • NOTAS

    • Template é um string comum, onde cada linha é separada com ˆJ.

    • Template tem uma lista de string com formato Dmx.

      • Formato da propriedade Template:

        
        Template := '˜Nome do Aluno:˜\Sssssssssssssssssssssssss`ssssssssssssssss'+ChFN+'Nome'+lf+
                    '˜     Endereço:˜\Sssssssssssssssssssssssss`ssssssssssssssss'+ChFN+'endereco'+lf+
                    '˜          Cep:˜\##-###-###'+ChFN+'cep'+lf+
                    '˜       Bairro:˜\sssssssssssssssssssssssss'+ChFN+'bairro'+lf+
                    '˜       Cidade:˜\sssssssssssssssssssssssss'+ChFN+'cidade'+lf+
                    '˜       Estado:˜\SS'+ChFN+'estado'+lf+
                    '˜        Idade:˜\BB'+ChFN+'idade'+FldUpperLimit+#18+lf+
                    '˜    Matricula:˜\III'+ChFN+'matricula'+lf+
                    '˜     Valor da˜'+lf+
                    '˜    Mensalidade:˜\R,RRR.RR'+ChFN+'mensalidade';

    • SINTAXE

      • ˜ (til) : Limitador de rótulos do formulário;

      • s (s minúsculo) : caracteres alfanumérico incluindo os maiúsculas, minusculas, números e símbolos;

      • S (S maiúsculo) : caracteres alfanumérico incluindo os maiúsculas, números e símbolos;

      • # (# cancela) : Aceita somente números de 0 a 99

      • - (literal ) : Separador de números

      • B (B maiúsculo): Campo do tipo byte

      • FldUpperLimit : O caractere seguinte indica o limite superior da variável. No exemplo acima é 18 anos;

      • R : Indica um caractere de um campo do tipo double;

      • I : Indica um caractere de um campo do tipo interger. Faixa: -32000 a +32000;


Gerado por PasDoc 0.16.0.