Unit mi_rtl_ui_Dmxscroller

Descrição
Uses
Classes, Interfaces, Objetos e Registros
Funções e Procedimentos
Tipos
Constantes
Variáveis

Descrição

A unit mi_rtl_ui_Dmxscroller implementa a classe TUiDmxScroller e registro TDmxFieldRec.

Uses

Visão Geral

Classes, Interfaces, Objetos e Registros

Nome Descrição
Interface IMi_rtl_ui_Form  
Classe TFldEnum_Lookup  
Registro TDmxFieldRec  
Classe TMiBufDataset  
Classe TDataFields  
Classe TFields  
Classe TUiDmxScroller  

Funções e Procedimentos

function Message(Receiver: TObjectsMethods; What, Command: Word;InfoPtr: Pointer): Pointer;

Tipos

PSItem = TUiMethods.PSItem;
tString = TUiMethods.tString;
ptString = TUiMethods.Ptstring;
TDates = mi.rtl.objects.Methods.dates.TDates;
PValue = TUiMethods.PValue;
TValue = TUiMethods.TValue;
TEvent = TUiMethods.TEvent;
SmallWord = TUiMethods.SmallWord;
TEnClientsApplication = TUiMethods.TEnClientsApplication ;
TNameClientsApplication = TUiMethods.TNameClientsApplication;
pDmxFieldRec = ˆTDmxFieldRec;
TOnGetTemplate = function (aNext: PSItem) : PSItem of Object unimplemented;
TOnAddTemplate = Procedure(const aUiDmxScroller:TUiDmxScroller) of Object unimplemented;
TEndProc = Procedure(Const AOwner:TUiDmxScroller; Const ADmxFieldRec:PDmxFieldRec);
TOnEnter = Procedure(aDmxScroller:TUiDmxScroller) of Object unimplemented;
TOnExit = Procedure(aDmxScroller:TUiDmxScroller) of Object unimplemented;
TOnNewRecord = Procedure(aDmxScroller:TUiDmxScroller) of Object unimplemented;
TOnCloseQuery = Procedure(aDmxScroller:TUiDmxScroller; var CanClose:boolean) of Object unimplemented;
TOnEnterField = Procedure(aField:pDmxFieldRec) of Object unimplemented;
TOnExitField = Procedure(aField:pDmxFieldRec) of Object unimplemented;
TOnCalcField = Procedure(aField:pDmxFieldRec) of Object unimplemented;
TOnChangeField = Procedure(aField:pDmxFieldRec) of Object unimplemented;
TOnBeforeInsert = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;
TOnAfterInsert = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;
TOnBeforeUpdate = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;
TOnAfterUpdate = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;
TOnBeforeDelete = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;
TOnAfterDelete = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;
TOnCalcFields = Procedure(const aUiDmxScroller:TUiDmxScroller) of Object unimplemented;
TEn_OnEvent_DmxFieldRec = (...);
TMiDataPacketFormat = (...);

Constantes

AccNormal = TUiMethods.AccNormal;
LF = TConsts.LF;

Descrição

Funções e Procedimentos

function Message(Receiver: TObjectsMethods; What, Command: Word;InfoPtr: Pointer): Pointer;
 

Tipos

PSItem = TUiMethods.PSItem;
 
tString = TUiMethods.tString;
 
ptString = TUiMethods.Ptstring;
 
TDates = mi.rtl.objects.Methods.dates.TDates;
 
PValue = TUiMethods.PValue;
 
TValue = TUiMethods.TValue;
 
TEvent = TUiMethods.TEvent;
 
SmallWord = TUiMethods.SmallWord;
 
TEnClientsApplication = TUiMethods.TEnClientsApplication ;

O tipo TEnClientsApplication é usado para identificar o tipo de aplicação atual.

TNameClientsApplication = TUiMethods.TNameClientsApplication;

O tipo TNameClientsApplication é usado nos metodos que retornam nome de arquivos.

pDmxFieldRec = ˆTDmxFieldRec;

O tipo pDmxFieldRec aponta para o campo do tipo TDmxFieldRec

TOnGetTemplate = function (aNext: PSItem) : PSItem of Object unimplemented;

Usado para criar modelos de formulários dinamicamente usando como parâmetro listas de PSItems.

TOnAddTemplate = Procedure(const aUiDmxScroller:TUiDmxScroller) of Object unimplemented;

O tipo TOnAddTemplate é usado para criar modelos de formulários dinamicamente usando o método add

  • EXEMPLO 

    
Procedure AddTemplate(const aUiDmxScroller:TUiDmxScroller);
begin
  with aUiDmxScroller do
  begin
    add('˜EXEMPLO DE TEMPLATE˜');
    add('');
    add('˜Alfanumérico maiúscula com 15 posições:˜\SSSSSSSSSSSSSSS');
    add('˜Alfanumérico maiúscula e minuscula com 30 posições:˜');
    add('˜˜\ssssssssssssssssssssssssssssssssssssss');
    add('˜Alfanumérico com a primeira letra maiúscula:˜\Sssssssssssssss');
    add('˜Valor double.......:˜\RRR,RRR.RR');
    add('˜Valor SmalInt......:˜\II,III');
    add('˜Valor Byte.........:˜\BBB');
    add('˜Valor Smallword....:˜\WW,WWW');
    add('˜Sexo...............:˜'+ CreateEnumField(TRUE, accNormal, 0,
                                  NewSItem(' indefinido ',
                                  NewSItem(' Masculino',
                                  NewSItem(' Feminino',
                                          nil)))));
    add('˜Estado Civil              ˜\KA Indefinido  '+chFN+'Sexo');
    add('˜˜\X Casado?                \KA Masculino    ');
    add('˜˜\X Pretende se divorciar? \KA Feminino     ');
    add('˜˜\X Tens filhos?          ');
    add('');
  end;
end;

procedure TForm1.DmxScroller_Form1AddTemplate(const aUiDmxScroller: TUiDmxScroller);
begin
  AddTemplate(aUiDmxScroller);
end;

TEndProc = Procedure(Const AOwner:TUiDmxScroller; Const ADmxFieldRec:PDmxFieldRec);

O tipo TEndProc é usado para fazer pesquisa genérica no banco de dados quando a tecla F7 é pressionada.

TOnEnter = Procedure(aDmxScroller:TUiDmxScroller) of Object unimplemented;

O tipo TOnEnter é usado para implementar evento onEnter da classe TUiDmxScroller

TOnExit = Procedure(aDmxScroller:TUiDmxScroller) of Object unimplemented;

O tipo TOnExit é usado para implementar evento onExit da classe TUiDmxScroller

TOnNewRecord = Procedure(aDmxScroller:TUiDmxScroller) of Object unimplemented;

O tipo TOnNewRecord é usado para implementar evento onNewRecord da classe TUiDmxScroller

TOnCloseQuery = Procedure(aDmxScroller:TUiDmxScroller; var CanClose:boolean) of Object unimplemented;

O tipo TOnCloseQuery é usado para implementar evento OnCloseQuery da classe TUiDmxScroller

  • NOTA*

    • Este evento é disparado antes de desativar a classe **TUiDmxScroller

    .

    • Obs: Se o parâmetro CanClose for false, então a classe TUiDmxScroller não é desativado.

TOnEnterField = Procedure(aField:pDmxFieldRec) of Object unimplemented;

O tipo TOnEnterField é usado no evento OnEnterField e disparado em TDmxFieldRec.DoOnEnter()

TOnExitField = Procedure(aField:pDmxFieldRec) of Object unimplemented;

O tipo TOnExitField é usado no evento OnExitField

TOnCalcField = Procedure(aField:pDmxFieldRec) of Object unimplemented;

O tipo TOnCalcField é usado no evento para calcular um campo, é executado em TDmxFieldRec.DoOnEnter() e TDmxFieldRec.DoOnExit()

TOnChangeField = Procedure(aField:pDmxFieldRec) of Object unimplemented;

O tipo TOnChangeField é usado para fazer calculos quando um valor campo é alterado.

  • PARÂMETROS:

    • aUiDmxScroller : Classi que edita o campo;

    • Previous_value : Valor do campo antes da auteração

    • Current_value : Valor do campo atual.

TOnBeforeInsert = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;

O tipo TOnBeforeInsert é usado para criar o evento OnBeforeInsert e disparado no método TUiDmxScroller.AddRec

TOnAfterInsert = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;

O tipo TOnAfterInsert é usado para criar o evento OnAfterInsert e disparado no método TUiDmxScroller.AddRec

TOnBeforeUpdate = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;

O tipo TOnBeforeUpdate é usado para criar o evento OnBeforeUpdate e disparado no método TUiDmxScroller.PutRec

TOnAfterUpdate = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;

O tipo TOnAfterUpdate é usado para criar o evento OnAfterUpdate e disparado no método TUiDmxScroller.PutRec

TOnBeforeDelete = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;

O tipo TOnBeforeDelete é usado para criar o evento OnBeforeDelete e disparado no método TUiDmxScroller.PutRec

TOnAfterDelete = function(const aUiDmxScroller:TUiDmxScroller):boolean of Object unimplemented;

O tipo TOnAfterDelete é usado para criar o evento OnAfterDelete e disparado no método TUiDmxScroller.PutRec

TOnCalcFields = Procedure(const aUiDmxScroller:TUiDmxScroller) of Object unimplemented;

O tipo TOnCalcFields é usado para fazer calculos é executado ao entrar no registro e ao sair do registro

TEn_OnEvent_DmxFieldRec = (...);

O tipo enumerado TEn_OnEvent_DmxFieldRec é usado nas requisições httl do cliente.

  • Notas

    • Usado para classificar eventos do mesmo tipo de parâmetro no caso o cliente só precisa de o nome do campo para localizar o evento na lista de eventos.

Valores
  • EnOnEnterField
  • EnOnExitField
  • EnOnCalcField
  • EnOnChangeField
TMiDataPacketFormat = (...);

A classe TMiDataPacketFormat implementado porque o tipo TDataPacketFormat do freepascal não contém o tipo dfjson

Valores
  • dfBinary
  • dfXML
  • dfXMLUTF8
  • dfAny
  • dfDefault
  • dfJSon

Constantes

AccNormal = TUiMethods.AccNormal;
 
LF = TConsts.LF;
 
Gerado por PasDoc 0.16.0.