FiveTech Software tech support forums

Antonio Linares wrote:Nixbeau,

Prueba a quitar la claúsula PASCAL y prueba nuevamente, gracias

Eso Es Perfecto !!! Funcionó !!! Debido a la eliminación de la cláusula de Pascua comenzó a funcionar?

http://fivewin.com.br/index.php?/topic/19905-lendo-peso-balanca-urano-em-c-for-xharbour/?hl=urano

http://fivewin.com.br/index.php?/topic/21933-leitura-mf-urano/?hl=urano


Essa funcoes são em C para Xharbour. Não Sei como Manipula-las, preciso montar de um jeito ...

Amigos, Feliz Año Nuevo. Todo ayuda como para resolver un problema en la declaración de LePeso.dll de Urano DLL.
Declaración:
dll function AbrePortaUrano(Porta AS STRING) AS LONG PASCAL FROM "_AbrePortaSerial" LIB "lepeso.dll"dll function FechaPortaUrano() AS LONG pascal FROM ...

Tengo que multiplicar el GET mismo un valor con decimales y otro valor entero. Cuando escriba el valor fraccionario y entró en prensa '*' este valor se transfiere a un SAY y el GET debe mantenerse limpio, esperando el valor entero.

El código que hice fue esto:

CASE NKEY = 106 // QDT * mgetent ...

Lo siento por mi mala educación. Olvídese de ordenar por favor. Perdóname.


redefine say oSayA PROMPT 'CANCELA ULTIMO CUPOM' ID 4003 color RGB(255,255,255),RGB(145,216,247) FONT aFont[19] UDPATE

Me gustaría que el espacio entre las líneas se mantengan muy por:

http&#58 ...

DEFINE DIALOG oDlg COLOR CLR_BLACK,RGB&#40;1,1,1&#41;<...... place all controls ....>oDlg:nSeeThroClr := RGB&#40;1,1,1&#41;ACTIVATE DIALOG oDlg

Perfecto nageswaragunupudi, muy bueno. Funcionó a la perfección.
¿Podría explicar el funcionamiento del mando? Me gustaría entender por qué lo hace.

Te refieres a que solo quieres que el fondo sea transparente ?

Puedes mostrar un dibujo de como quieres que se vea ?


Hola Antonio, gracias por la ayuda.
Siga la imagen de como me gusta el trabajo form1.
De hecho, esta imagen representa mi necesidad, pero el uso de la relación trasnparencia ...

Nixbeau,

Como ha comentado Anserkk, esta es la forma correcta para establecer un cierto nivel de transparencia:

#include "FiveWin.ch"function Main&#40;&#41; local oDlg DEFINE DIALOG oDlg oDlg:nOpacity = 100 ACTIVATE DIALOG oDlg CENTEREDreturn nil


He utilizado el comando brillaba y parecía ...

Puedes hacerlo asi:

ACTIVATE DIALOG oDlg ON INIT SetTrans( oDlg )

...

function SetTrans&#40; oDlg &#41; SetWindowLong&#40; oDlg:hWnd, GWL_EXSTYLE, nOr&#40; GetWindowLong&#40; oDlg:hWnd, GWL_EXSTYLE &#41;, WS_EX_LAYERED &#41; &#41; SetLayeredWindowAttributes&#40; oDlg:hWnd,,, LWA_COLORKEY &#41 ...

amigos, quería poner un cuadro de diálogo acerca de otro diálogo para mantenerse en la cima era transparente y podía ver el contenido desde atrás. ¿Puede alguien darme un ejemplo?

Utilizar: DEFINE DIALOG frmPDV RESORCE 'TELAPDV' TRANSPARENT . No trabaja.
Utilizar: DEFINE DIALOG frmPDV RESORCE ...

Please try adding this line towards the end:
CbRWTELA:bKeyCount := &#123; &#40;CbRWTELA:cAlias&#41;->&#40;OrdKeyCount&#40;&#41;&#41; &#125;
Please also remove these lines
CbRWTELA:refresh&#40;&#41;CbRWTELA:gotop&#40;&#41;CbRWTELA:refresh&#40;&#41;
I am not sure, but let us know if this works ...

Germano,

Aqui tienes un ejemplo:

germano.prg
#include "FiveWin.ch"function Main&#40;&#41; local oDlg, oBtn DEFINE DIALOG oDlg @ 10, 10 BTNBMP oBtn FILE "btntouch.bmp" SIZE 35, 35 NOBORDER oBtn:LoadBitmaps&#40; ,,,,,,, "btntouch2.bmp" &#41; // este es el de arriba, modificado su color de fondo ...

Prueba a crearlo antes que los otros, eso debe hacer que quede atras

En orden:
1) oSayVenda (backgroud)
2) oSayQuant
3) oSayVLQuant
4) oSayValor
5) oSayX
6) oSayDesc

al compilar el oSayVenda enfrenta y anula los otros componentes.

#INCLUDE 'FIVEWIN.CH'FUNCTION mainPDV&#40;&#41;priv ...

amigos, ¿cómo puedo hacer un botón como éste se muestra a continuación con btnbmp?

al pasar el ratón sobre ella cambia de color a un degradado de blanco.

!Gracias