Classe TKernelPesquisaRetorno

DescriçãoHierarquiaCamposMétodosProperties

Unit

Declaração

type TKernelPesquisaRetorno = class(TObject)

Descrição

Efetua a pesquisa e obtém o retorno da entidade a pesquisar

Hierarquia

Visão Geral

Campos

Private objCaixa: TCustomEdit;
Private strNomeCampoRetorno: string;
Private strNomeCampoDestino: string;
Private objPesquisa: TKernelPesquisa;

Métodos

Public procedure DefinirRetorno;

Properties

Public property Caixa : TCustomEdit read objCaixa;
Public property NomeCampoRetorno : string read strNomeCampoRetorno;
Public property NomeCampoDestino : string read strNomeCampoDestino;
Public property Pesquisa : TKernelPesquisa read objPesquisa;

Descrição

Campos

Private objCaixa: TCustomEdit;

Referência ao campo (edit) na tela que receberá o valor do objeto

Private strNomeCampoRetorno: string;

Armazena o nome do campo que deverá ser retornado da entidade de pesquisa

Private strNomeCampoDestino: string;

Armazena o nome do campo que deverá receber o valor retornado, caso a caixa não seja dbedit

Private objPesquisa: TKernelPesquisa;

Referencia ao Objeto de Controle de pesquisa

Métodos

Public procedure DefinirRetorno;

Método que define o retorno da pesquisa

Properties

Public property Caixa : TCustomEdit read objCaixa;

Caixa Visual de Edição (Edit)

Public property NomeCampoRetorno : string read strNomeCampoRetorno;

Nome do campo ao qual o controlador pegará o retorno na entidade pesquisada

Public property NomeCampoDestino : string read strNomeCampoDestino;

Nome do campo ao qual o valor irá retornar e será colocado na entidade de pesquisa

Public property Pesquisa : TKernelPesquisa read objPesquisa;

Referencia ao objeto de pesquisa