Diferencia entre revisiones de «TpAUX CAMPO CONDICIONEDICION unit»
Ir a la navegación
Ir a la búsqueda
(Página creada con «=Descripción= El objeto '''TpAUX_CAMPO_CONDICIONEDICION_unit''' (Condición edición de campos) procesa los auxiliares de tipo '''CONDICION_EDICION''', ver detalles en DEV AUXILIARES/CONDICION EDICION. =Identidad= Category:MANUAL/PROGRAMADOR Category:AUXILIARES *Ancestro: TComponent *Carpeta: C:\DevelopPrx\pPRAGMA *Archivo: pAUX_CAMPO_CONDICIONEDICION_unit.pas =Declaración= <pre> </pre>») |
Sin resumen de edición |
||
| (No se muestran 3 ediciones intermedias del mismo usuario) | |||
| Línea 4: | Línea 4: | ||
=[[QUEESESTO/IDENTIDAD|Identidad]]= | =[[QUEESESTO/IDENTIDAD|Identidad]]= | ||
[[Category:MANUAL/PROGRAMADOR]] | [[Category:MANUAL/PROGRAMADOR]] | ||
[[Category:AUXILIARES]] | [[Category:PRG AUXILIARES]] | ||
*Ancestro: [[TComponent]] | *Ancestro: [[TComponent]] | ||
*Carpeta: C:\DevelopPrx\pPRAGMA | *Carpeta: C:\DevelopPrx\pPRAGMA | ||
| Línea 11: | Línea 11: | ||
=Declaración= | =Declaración= | ||
<pre> | <pre> | ||
type | |||
TpAUX_CAMPO_CONDICIONEDICION_unit = class(TComponent) | |||
private | |||
FDataSet: TDataSet; | |||
FClase: String; | |||
FCampo: String; | |||
FQuery: TprxADOQuery; | |||
FSQL_COMANDO: TStringList; | |||
FTag_Requerido: Boolean; | |||
FTag_Tipo: String; | |||
FItems: TStringList; | |||
protected | |||
property SQL_COMANDO: TStringList read FSQL_COMANDO write FSQL_COMANDO; | |||
property Tag_Estadistica: Boolean read FTag_Requerido; | |||
property Tag_Tipo: String read FTag_Tipo; | |||
public | |||
constructor Create(AOwner: TComponent); override; | |||
destructor Destroy; override; | |||
function Procesar: Boolean; | |||
property DataSet: TDataSet read FDataSet write FDataSet; | |||
property Clase: String read FClase write FClase; | |||
property Campo: String read FCampo write FCampo; | |||
property Query: TprxADOQuery read FQuery write FQuery; | |||
property Items: TStringList read FItems; | |||
published | |||
end; | |||
</pre> | </pre> | ||
=Implementación= | |||
===function Procesar: Boolean=== | |||
Procesa las reglas de habilitación o deshabilitación. | |||
=Modo de uso= | |||
El auxiliar se usa de la siguiente manera (ejemplo de [[TprxADODataSetEdit]].OnExitFieldXtd): | |||
<pre> | |||
prxADOClientDM.pAUX_CAMPO_CONDICIONEDICION_unit.DataSet := Self; | |||
prxADOClientDM.pAUX_CAMPO_CONDICIONEDICION_unit.Clase := ppTableName; | |||
prxADOClientDM.pAUX_CAMPO_CONDICIONEDICION_unit.Campo := aFieldName; | |||
prxADOClientDM.pAUX_CAMPO_CONDICIONEDICION_unit.Procesar; | |||
</pre> | |||
Primero asignamos las propiedades: | |||
*'''Dataset''' que se asigna al mismo componente que está llamando al auxiliar. | |||
*'''Clase''' se inicializa al nombre de la tabla del componente que está llamando al auxiliar. | |||
*'''Campo''' se inicializa al nombre del campo cuyo valor queremos asignar. | |||
Posteriormente se llama directamente a la función Procesar. | |||
<pre> | |||
prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.Procesar(TpAUX_CAMPO_ASIGNACION_ONEXIT); | |||
</pre> | |||
=Usos= | |||
El auxiliar se usa en: | |||
*[[TprxADODataSetEdit]].OnExitFieldXtd. | |||
Revisión actual - 17:58 22 may 2025
Descripción
El objeto TpAUX_CAMPO_CONDICIONEDICION_unit (Condición edición de campos) procesa los auxiliares de tipo CONDICION_EDICION, ver detalles en DEV AUXILIARES/CONDICION EDICION.
Identidad
- Ancestro: TComponent
- Carpeta: C:\DevelopPrx\pPRAGMA
- Archivo: pAUX_CAMPO_CONDICIONEDICION_unit.pas
Declaración
type
TpAUX_CAMPO_CONDICIONEDICION_unit = class(TComponent)
private
FDataSet: TDataSet;
FClase: String;
FCampo: String;
FQuery: TprxADOQuery;
FSQL_COMANDO: TStringList;
FTag_Requerido: Boolean;
FTag_Tipo: String;
FItems: TStringList;
protected
property SQL_COMANDO: TStringList read FSQL_COMANDO write FSQL_COMANDO;
property Tag_Estadistica: Boolean read FTag_Requerido;
property Tag_Tipo: String read FTag_Tipo;
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
function Procesar: Boolean;
property DataSet: TDataSet read FDataSet write FDataSet;
property Clase: String read FClase write FClase;
property Campo: String read FCampo write FCampo;
property Query: TprxADOQuery read FQuery write FQuery;
property Items: TStringList read FItems;
published
end;
Implementación
function Procesar: Boolean
Procesa las reglas de habilitación o deshabilitación.
Modo de uso
El auxiliar se usa de la siguiente manera (ejemplo de TprxADODataSetEdit.OnExitFieldXtd):
prxADOClientDM.pAUX_CAMPO_CONDICIONEDICION_unit.DataSet := Self; prxADOClientDM.pAUX_CAMPO_CONDICIONEDICION_unit.Clase := ppTableName; prxADOClientDM.pAUX_CAMPO_CONDICIONEDICION_unit.Campo := aFieldName; prxADOClientDM.pAUX_CAMPO_CONDICIONEDICION_unit.Procesar;
Primero asignamos las propiedades:
- Dataset que se asigna al mismo componente que está llamando al auxiliar.
- Clase se inicializa al nombre de la tabla del componente que está llamando al auxiliar.
- Campo se inicializa al nombre del campo cuyo valor queremos asignar.
Posteriormente se llama directamente a la función Procesar.
prxADOClientDM.pAUX_CAMPO_ASIGNACION_unit.Procesar(TpAUX_CAMPO_ASIGNACION_ONEXIT);
Usos
El auxiliar se usa en:
- TprxADODataSetEdit.OnExitFieldXtd.