<< Click to Display Table of Contents >> Navigation: Herramientas > Diseñador de Plantillas > Programar o Quitar un Objeto > Ejemplos > Ocultar Tipo de Cambio en Ventas de Contado |
En este ejemplo se muestra en una Plantilla de Factura, como ocultar el Tipo de Cambio en las Ventas que son hechas en Pesos, para solo mostrarlo en aquellas que son hechas solamente en Dólares:
1.Abra la plantilla y seleccione el Objeto (El Campo que representa el Tipo de Cambio)
2.En la ventana de Propiedades del Objeto, asignele al campo UserName=TipoCambio (no use espacios)
3.Ahora en la Pestaña [Calc] en la lista de Eventos, localice el Objeto [TipoCambio] y de clic en el Evento [OnGetText], y en la parte inferior deberá escribir la programación para enviar como Respuesta a la variable Text= '' (osea nada) cuando el valor de NuMoneda=1, en caso contrario (Else) se asginará el tipo de cambio de la venta.
Nota: Si no se ven los Eventos debe dar clic con el botón derecho para activar los Eventos
procedure TipoCambioOnGetText(var Text: String);
begin
if (Venta['NUMONEDA']=1) then
Text := ''
else
Text := FormatFloat('###,##0.0000', Venta['TIPOCAMBIO']);
end;
Otro ejemplo, Imprimir el Tipo de Cambio solo en Ventas de Crédito:
La variable NuTipoVenta determina 1=Ticket, 2=Contado Factura, 3=Crédito Factura, 6=COD Ticket, 7= COD Factura
procedure TipoCambioOnGetText(var Text: String);
begin
if ( (Venta['NUTIPOVENTA']=3)
or
(Venta['NUTIPOVENTA']=6)
or
(Venta['NUTIPOVENTA']=7) ) then
Text := ''
else
Text := FormatFloat('###,##0.0000', Venta['TIPOCAMBIO']);
end;
4.Guarde la plantilla y listo.