Si deseamos setear un dw a una impresora que no sea la predeterminada necesariamente, una opcion es utilizar.
this.Object.DataWindow.Printer = "\\IP_de_donde_tienes_instalado\Nombre_de_la_impresora"
this.print()
Sabias que si comentas un blog estas incentivando a que cada dia haya mas información que podria ser importante para tí o los demas?... :) Espero les pueda ser de utilidad el mio.
martes, 17 de julio de 2012
jueves, 5 de julio de 2012
Contar caracteres que se va ingresando a un campo
Esta funcionalidad nos sirve para ir contando los caracteres que ingresamos en un campo, algo similar a lo que nos ofrecen los telefonos móviles cuando estamos escribiendo un mensaje de texto.
Primeramente creamos un objeto tipo text, en mi caso lo llamo t_contar y le asigno un valor 0.
caracteres ingresados*/
if this.getcolumnname() = 'comentario' then
if this.object.t_contar.text='0' then this.TriggerEvent('ue_lencomentarios')
/*si presionamos teclas de arriba, abajo, costados, no hacer nada*/
if KeyDown(KeyLeftArrow!) or KeyDown(KeyUpArrow!) or KeyDown(KeyRightArrow!) or KeyDown(KeyDownArrow!) then return
If KeyDown(KeyBack!) or KeyDown(KeyDelete!) then //si borramos caracteres, restamos sino sumamos
this.object.t_contar.text=string(long(this.object.t_contar.text)-1)
else
this.object.t_contar.text=string(long(this.object.t_contar.text)+1)
end if
if long(this.object.t_contar.text)=290 then messagebox( "Atención", "Esta llegando al límite del texto!",Exclamation!)
end if
Primeramente creamos un objeto tipo text, en mi caso lo llamo t_contar y le asigno un valor 0.
Creo un Evento que lo llamo ue_lencampo, donde cuento cuantos carateres tiene el campo, no hace falta que el evento reciba parametros y tampoco que lo retorne, yo lo hice en un evento nuevo, uds. ya veran si crean o lo hacen en alguno que ya lo tengan, todo depende de la aplicabilidad que se le dará.
Luego creamos un Evento, al cual yo le llamo ue_key con las siguientes caracteristicas y en el colocamos el scrip que continua
/*trabaja en conjunto con el evento ue_lencomentarios para ir mostrando cantidad de caracteres ingresados*/
if this.getcolumnname() = 'comentario' then
if this.object.t_contar.text='0' then this.TriggerEvent('ue_lencomentarios')
/*si presionamos teclas de arriba, abajo, costados, no hacer nada*/
if KeyDown(KeyLeftArrow!) or KeyDown(KeyUpArrow!) or KeyDown(KeyRightArrow!) or KeyDown(KeyDownArrow!) then return
If KeyDown(KeyBack!) or KeyDown(KeyDelete!) then //si borramos caracteres, restamos sino sumamos
this.object.t_contar.text=string(long(this.object.t_contar.text)-1)
else
this.object.t_contar.text=string(long(this.object.t_contar.text)+1)
end if
if long(this.object.t_contar.text)=290 then messagebox( "Atención", "Esta llegando al límite del texto!",Exclamation!)
end if
*No olvides alimentarme con un comentario y/o calificación.
Suscribirse a:
Entradas (Atom)