Disappearing Bos Taurus Image

[SALINETAS24]

Hola amigo:
Como siempre tu "Docta sabiduría" es bien aceptada , para mi "ignorancia" je... je..
intentaré experimentar con tu código , haber si me aclaro , je... je..

Una forta abraça !!!
Mustafa

Yeeep artísta.., tu si que sabes...!!!
Mira como funciona ahora el PedidoA.prg.
Puedes elegir entre un windowPannel o un display "normal".
En el display "normal" he tenido que modificar el tamaño de las manecillas del reloj, para no que estropeasen los números.
Y también te he cambiado el modelo del reloj, por el tema del color de fondo.

Creo que ha quedado bastante pinturero

[mustafa]

Estupendo Nanu
Estoy en ello, muy guapo !!!
Salud
Mustafa

[mustafa]

Buenas Sr Salinetas:
Cada vez la cosa se está complicando
he modificado un poco el Reloj con Reloj3.bmp ( Para Centrarlo)

En todos los casos hay un retardo cuando se retorna del TAB pag2 a la pag1
pero esto es el mal menor esta todo muy guapo, felicidades.

La antigua solución primera me está gustando mucho (Más Fácil para mi) je... je..

que está en PedidoS.prg


Las Opciones PedidoA.prg muy currada la PedidoB.prg está fallando.

Tengo el siguiente problema ?

No domino el tema Virtual de los Grid , no me aclaro con las sentencias

En el sample tengo que trabajar con:

Form_1.Grid_1.CheckBoxEnabled := .T. // <======== Clientes Cli_ent.dbf
Form_1.Grid_2.CheckBoxEnabled := .T. // <======== Productos Stock.dbf
Form_1.Grid_3.CheckBoxEnabled := .T. // <======== Repartidores Trans.dbf

Lo que quiero evitar que tanto en Clientes como en Repartidores
se puedan marcar mas de una Casilla de CheckBoxEnabled (No puede haber 2 Clientes
en el mismo pedido y no más que un Repartidor)

Me explico solo se puede elegir un cliente y un repartidor
en el caso del Producto (Stock) no hay problema, esta la Opción de todo
o seleccionar productos que suelo pasan al Grid_4 que se modifica o
se pasa a Facturación ver Muestra en Carpeta (Facturas_PdF)

Saludos

Mustafa

[SALINETAS24]

Buenas Sr Salinetas:
Cada vez la cosa se está complicando ... // ...

Me explico solo se puede elegir un cliente y un repartidor .../ ...


Saludos

Mustafa

Hola Senyoret....,

Para poder elegir solo un registro, en cada definición del GRID tienes que introducir esta linea :

Code: Select all

           ON CHECKBOXCLICKED CompruebaSeleccion("Form_1","Grid_1")

y después copias esta función y listo

Code: Select all

// ----------------------------------------------------------------------
// Cada vez que seleccionas un CHECKBOX comprueba que es el único
// Parametros
// cWin    : Nombre de la ventana
// cGrid   : NOmbre del Grid
// ----------------------------------------------------------------------
PROC CompruebaSeleccion(cWin,cGrid)
LOCAL nFin:= GETPROPERTY ( cWin,cGrid,"ItemCount")
LOCAL nSel:=0
LOCAL nFor
	FOR nFor=1 to nFin
		IF GETPROPERTY (cWin,cGrid,"CheckBoxItem",nFor)== .T.
			nSel ++
			IF 	nSel > 1
				MSGBOX("Solo 1 Regristro - Gracias")
				SETPROPERTY (cWin,cGrid,"CheckBoxItem",nFor,.F.)
			ENDIF
		ENDIF
	NEXT
RETURN
	

Un saludo

[mustafa]

Hola amic:
Moltes " mersis"
Voy a probar, hasta luego Lucsrssss

Mustafa