Diferencia entre revisiones de «TpAUX CLASE SELECCION CRITERIOS unit»

De Pragma Wiki
Ir a la navegación Ir a la búsqueda
(Página creada con «=Descripción= El objeto '''TpAUX_CLASE_SELECCION_CRITERIOS_unit''' (SQL para seleccionar criterios múltiples en consultas) procesa los auxiliares de tipo '''SELECCION_CRITERIOS''', ver detalles en DEV AUXILIARES/SELECCION CRITERIOS. =Identidad= Category:MANUAL/PROGRAMADOR Category:AUXILIARES *Ancestro: TComponent *Carpeta: C:\DevelopPrx\pPRAGMA *Archivo: pAUX_CLASE_SELECCION_CRITERIOS_unit.pas =Declaración= <pre> </pre>»)
 
Línea 11: Línea 11:
=Declaración=
=Declaración=
<pre>
<pre>
type
  TpAUX_CLASE_SELECCION_CRITERIOS_unit = class(TComponent)
  private
    FDataSet: TDataSet;
    FClase: String;
    FQuery: TprxADOQuery;
    FSQL_COMANDO: TStringList;
    FItems: TStringList;
    FItems_Index: Integer;
  protected
  public
    constructor Create(AOwner: TComponent); override;
    destructor  Destroy; override;
    property    DataSet: TDataSet read FDataSet write FDataSet;
    property    Clase: String read FClase write FClase;
    function    Execute: Boolean;
    property    Query: TprxADOQuery read FQuery write FQuery;
    property    Items: TStringList read FItems;
    property    Items_Index: Integer read FItems_Index;
    property    SQL_COMANDO: TStringList read FSQL_COMANDO write FSQL_COMANDO;
  published
  end;
</pre>
</pre>

Revisión del 01:08 19 may 2025

Descripción

El objeto TpAUX_CLASE_SELECCION_CRITERIOS_unit (SQL para seleccionar criterios múltiples en consultas) procesa los auxiliares de tipo SELECCION_CRITERIOS, ver detalles en DEV AUXILIARES/SELECCION CRITERIOS.

Identidad

  • Ancestro: TComponent
  • Carpeta: C:\DevelopPrx\pPRAGMA
  • Archivo: pAUX_CLASE_SELECCION_CRITERIOS_unit.pas

Declaración

type
  TpAUX_CLASE_SELECCION_CRITERIOS_unit = class(TComponent)
  private
    FDataSet: TDataSet;
    FClase: String;

    FQuery: TprxADOQuery;

    FSQL_COMANDO: TStringList;

    FItems: TStringList;
    FItems_Index: Integer;
  protected

  public
    constructor Create(AOwner: TComponent); override;
    destructor  Destroy; override;

    property    DataSet: TDataSet read FDataSet write FDataSet;
    property    Clase: String read FClase write FClase;

    function    Execute: Boolean;

    property    Query: TprxADOQuery read FQuery write FQuery;

    property    Items: TStringList read FItems;
    property    Items_Index: Integer read FItems_Index;

    property    SQL_COMANDO: TStringList read FSQL_COMANDO write FSQL_COMANDO;
  published
  end;