TTpAUX CAMPO EVALUACIONS Form - Historial de revisiones

Luciano Carou: /* Uso */

2025-05-29T12:57:20Z

Uso

← Revisión anterior		Revisión del 14:57 29 may 2025
Línea 100:		Línea 100:
	=Uso=		=Uso=
	El form se usa únicamente en [[TprxDBEdit]].MostrarSuscripcionEvaluacionesForm.		El form se usa únicamente en [[TprxDBEdit]].MostrarSuscripcionEvaluacionesForm.

	~~Esta función es llamada desde [[TprxDBEdit]].MostrarMaestro solo cuando el campo se llama '''AtributoUDT''' (ver [[DEV CLASES/CAMPOS\|Clases, campos (prxcampos)]]):~~
	~~[[Archivo:20250529 0951 SUSCRIBIR EVALUACIONES.png\|miniaturadeimagen\|no\|Suscribir evaluaciones.]]~~

	~~y el código es:~~
	<pre>		<pre>
	procedure TprxDBEdit.MostrarSuscripcionEvaluacionesForm(Sender: TObject);		procedure TprxDBEdit.MostrarSuscripcionEvaluacionesForm(Sender: TObject);
Línea 120:		Línea 115:
	end;		end;
	</pre>		</pre>

			Esta función es llamada desde [[TprxDBEdit]].MostrarMaestro solo cuando el campo se llama '''AtributoUDT''' (ver [[DEV CLASES/CAMPOS\|Clases, campos (prxcampos)]]):
			[[Archivo:20250529 0951 SUSCRIBIR EVALUACIONES.png\|miniaturadeimagen\|no\|Suscribir evaluaciones.]]

Luciano Carou: /* Uso */

2025-05-29T12:56:58Z

Uso

← Revisión anterior		Revisión del 14:56 29 may 2025
Línea 100:		Línea 100:
	=Uso=		=Uso=
	El form se usa únicamente en [[TprxDBEdit]].MostrarSuscripcionEvaluacionesForm.		El form se usa únicamente en [[TprxDBEdit]].MostrarSuscripcionEvaluacionesForm.

			Esta función es llamada desde [[TprxDBEdit]].MostrarMaestro solo cuando el campo se llama '''AtributoUDT''' (ver [[DEV CLASES/CAMPOS\|Clases, campos (prxcampos)]]):
			[[Archivo:20250529 0951 SUSCRIBIR EVALUACIONES.png\|miniaturadeimagen\|no\|Suscribir evaluaciones.]]

			y el código es:
			<pre>
			procedure TprxDBEdit.MostrarSuscripcionEvaluacionesForm(Sender: TObject);
			var
			vF: TTpAUX_CAMPO_EVALUACIONS_Form;
			begin
			inherited;

			vF := TTpAUX_CAMPO_EVALUACIONS_Form.Create(Self);
			vF.ADODetail := TprxADODataSetEdit(DataSource.Dataset);
			vF.CampoAtributo := 'AtributoUDT';
			vF.ShowModal;

			vF.Release;
			end;
			</pre>

Luciano Carou: /* Descripción */

2025-05-29T01:43:58Z

Descripción

← Revisión anterior		Revisión del 03:43 29 may 2025
Línea 2:		Línea 2:
	El objeto '''TTpAUX_CAMPO_EVALUACIONS_Form''' (Form para suscribir evaluaciones de auxiliares de campos) permite suscribir a las evaluaciones de un atributo (ver [[DEV AUXILIARES/EVALUACION]]).		El objeto '''TTpAUX_CAMPO_EVALUACIONS_Form''' (Form para suscribir evaluaciones de auxiliares de campos) permite suscribir a las evaluaciones de un atributo (ver [[DEV AUXILIARES/EVALUACION]]).

	Las instrucciones para suscribir evaluaciones están específicamente en [[DEV AUXILIARES/EVALUACION#Uso del auxiliar]].		Las instrucciones para suscribir evaluaciones están específicamente en [[DEV AUXILIARES/EVALUACION#Uso del auxiliar\|EVALUACIONES, Uso del auxiliar]].

	=[[QUEESESTO/IDENTIDAD\|Identidad]]=		=[[QUEESESTO/IDENTIDAD\|Identidad]]=

Luciano Carou: /* Identificación */

2025-05-29T01:43:14Z

Identificación

@@ Línea 52: / Línea 52: @@
 ===Identificación===
    vF.ADODetail     := TprxADODataSetEdit(DataSource.Dataset);
    vF.CampoAtributo := 'AtributoUDT';
    vF.ShowModal;

Luciano Carou: Página creada con «=Descripción= El objeto '''TTpAUX_CAMPO_EVALUACIONS_Form''' (Form para suscribir evaluaciones de auxiliares de campos) permite suscribir a las evaluaciones de un atributo (ver DEV AUXILIARES/EVALUACION). Las instrucciones para suscribir evaluaciones están específicamente en DEV AUXILIARES/EVALUACION#Uso del auxiliar. =Identidad= Category:MANUAL/PROGRAMADOR Category:CONTROLES/FORMS Ancestro: TprxForm Carpeta: C:\Develo…»

2025-05-28T20:06:12Z

Página creada con «=Descripción= El objeto '''TTpAUX_CAMPO_EVALUACIONS_Form''' (Form para suscribir evaluaciones de auxiliares de campos) permite suscribir a las evaluaciones de un atributo (ver DEV AUXILIARES/EVALUACION). Las instrucciones para suscribir evaluaciones están específicamente en DEV AUXILIARES/EVALUACION#Uso del auxiliar. =Identidad= Category:MANUAL/PROGRAMADOR Category:CONTROLES/FORMS *Ancestro: TprxForm *Carpeta: C:\Develo…»

Página nueva

=Descripción=
El objeto '''TTpAUX_CAMPO_EVALUACIONS_Form''' (Form para suscribir evaluaciones de auxiliares de campos) permite suscribir a las evaluaciones de un atributo (ver [[DEV AUXILIARES/EVALUACION]]).

Las instrucciones para suscribir evaluaciones están específicamente en [[DEV AUXILIARES/EVALUACION#Uso del auxiliar]].

=[[QUEESESTO/IDENTIDAD|Identidad]]=
[[Category:MANUAL/PROGRAMADOR]]
[[Category:CONTROLES/FORMS]]
*Ancestro: [[TprxForm]]
*Carpeta: C:\DevelopPrx\pPRAGMA
*Archivo: pAUX_CAMPO_EVALUACIONS_Form.pas

=Declaración=
<pre>
type
TTpAUX_CAMPO_EVALUACIONS_Form = class(TTprxForm)
prxADOQuery1: TprxADOQuery;
prxDataSourceCAMPO: TDataSource;
Panel3: TPanel;
CHECKS_List: TprxCheckListBox;
Panel8: TPanel;
ButtonCANCELAR: TSpeedButton;
ButtonAPLICAR: TButton;
procedure FormShow(Sender: TObject);
procedure ButtonAPLICARClick(Sender: TObject);
procedure ButtonCANCELARClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
FADODetail: TprxADODataSetEdit;
FCampoAtributo: String;
FAtributoUDT: String;

FClase: String;
FCampo: String;
FCatalogo: String;
FTipoDato: String;
protected
procedure CargarEvaluaciones;
procedure GrabarEvaluaciones;

property Catalogo: String read FCatalogo write FCatalogo;
property xxTipoDato: String read FTipoDato write FTipoDato;

property AtributoUDT: String read FAtributoUDT write FAtributoUDT;
property Clase: String read FClase write FClase;
property Campo: String read FCampo write FCampo;
public
property ADODetail: TprxADODataSetEdit read FADODetail write FADODetail;
property CampoAtributo: String read FCampoAtributo write FCampoAtributo;
end;
</pre>

===Identificación===
vF.ADODetail := TprxADODataSetEdit(DataSource.Dataset);
vF.CampoAtributo := 'AtributoUDT';
vF.ShowModal;