FiveTech Software tech support forums

... := 1 // Altura encabezamiento oBrw:nDataLines := 1 // Altura líneas oBrw:lRecordSelector := .t. //poner o no, COL de la flechita de la izq oBrw:bClrStd := { || { CLR_BLACK, If( oBrw:KeyNo % 2 == 0, RGB(160,225,255), CLR_WHITE ) } } // Efecto pijama oBrw:SetFocus() oBrw:SetRDD() REDEFINE ...

... "marcado" en la ultima columna donde esta la imagen, al moverse con la rueda del mouse deja siempre ese efecto, si pulso el boton izq sobre cualquier registro de ahi en mas deja el fondo blanco correctamente. :nMarqueeStyle := MARQSTYLE_HIGHLWIN7 https://i.postimg.cc/Kj7c4Khj/errorbrowseimagen2.gif ...

Pude seleccionar al inicio
oBrow2:nColSel := 3

Pero se puede mover a la izq o derecha

como podre hacer que no se mueva, que solo quede en esa columna

Gracias.

... nBlue1,; // nTrans2, nRed2, nGreen2, nBlue2 ) CLASS Brush // nType : 1_> horizontal 2-> vertical 3->diagonal derecha 4-> diagonal izq LOCAL oBrush := Brush():NewGradientBrush( 0, 0, 200, 200, 1,; // just the area / size :?: 255, 131, 193, 193,; 255, 255, 255, 255 ) tested as well ...

... defino el tamaño de la hoja que es oficio: setsize(2480,3508) por tanto no me imprimela parte del los totales. abra forma de ajustar los margenes izq.y der. ocual podria ser la causa del error. Igual, como podria generar los archivos *.emf de toda la mpresion? Ayuda porfa.

Francisco,

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=31837&p=186033&hilit=presionado+un+boton#p186033

Hola amigos.
Voy avanzando. Estoy probando la function SendKey(VK_CONTROL), y me funciona para fijar la tecla CONTROL.
Lo que me falta es emular mantener presionado un boton, ejecutar action with SendKey(), y después emular soltar el boton.
Gracias

Karinha. Gracias por tu codigo. Me ha dado ideas para otros trabajos. Lo que quiero hacer es imitar el MULTISELECT del xBrowse, en un ambiento touch. (sin keyboard y sin mouse instalados) Es decir, emular la tecla VK_CONTROL presionada, mientras ejecuto otra accion. Luego soltar la tecla VK_CONTROL....

Armando. He probado con esta leve modificacion a tu funcion, pero no logro resultados: Teclado( oDlg, .T., VK_CONTROL, nVeces )Teclado( oDlg, .F., VK_CONTROL, nVeces )//---------------------------------------//FUNCTION Teclado( oWind, lPressed, nVKey, nVeces )   LOCAL nVez, n...

#Include "FiveWin.Ch"Function Main()   LOCAL oWnd   DEFINE WINDOW oWnd TITLE "Testando Teclado"   oWnd:bKeyDown := { | nKey | StdKey( nKey ) }   oWnd:bKeyChar := { | nKey | StdKey( nKey ) } ...

Armando.
Gracias por contestar. Voy a probar tu codigo y luego te digo.
Nuevamente gracias.

Francisco: Tengo una función a la que nombre Teclado: FUNCTION Teclado( oDlg, nKey, nVeces )   LOCAL nVez   DEFAULT nVeces := 1   oDlg:SetFocus( )   FOR nVez := 1 TO nVeces      oDlg:POSTMSG( WM_KEYDOWN, nKey, 0 )   NEXTRETURN ( NIL )  En esta función solo utilizo la ...

Eso amigos.
Necesito emular (via codigo) presionar las teclas CONTROL + CLICK IZQ del mouse.
Es para lanzar una acción sin tener teclado ni mouse, en una pantalla touch.
Agradeceré cualquier codigo de muestra, o sugerencias.
Saludos.

... Nil  Aquí, el tembleque prácticamente ha desaparecido, parpadea un poco la imagen y botones al redimensionar tirando de la esquina sup.izq. pero el efecto visual es muy CORRECTO. Estoy en un intel i5 8Gb RAM La pregu... Otro comportamiento distinto entre WINDOW y DIALOG ??? Se puede ...

... oWnd CENTEREDReturn Nil  El efecto que tiene de "tembleque" es estirando y encogiendo del borde de la ventana iaquierda, o esquina sup.izq. Pues es cuando "realoja"/"repinta" los controles contenidos en la ventana.