FiveTech Software tech support forums

Ese error solo se da cuando el Archivo esta como solo Lectura,

pues declara como Publica y listo

Public cKey

asi deberia ser:

oGet : bKeyDown := { | nKey | If( nKey == VK_RETURN, ;
If( nValor != 0, (lSalgo:=.t., oDlg:End()), ;
BorraRubroDeCarga(oDlg, oGet,@lSalgo,@nValor)),nValor:=Val(Chr(nKey)) ) }


Jaime

prueba con esto:

Run('MD META-INF')




jaime

no es necesario usar NET USE LPT1, yo lo uso asi: Select A Use Configur G_port:=A->Puerto ** ( \\Servidor\Hp-6300) oPrn:=TDosPrn():New(G_port) .. .. .. oPrn:End() Si por algun motivo cambian la impresora o quiero imprimir de modo local simplemente modifico el Campo PUERTO de la tabla Configur Jaime

¿Cual es la diferencia en usar REDEFINE o no?

por ejemplo:

REDEFINE LISTBOX oBrowD Fields .... etc, etc

@ 05,05 ListBox oBrowD Fields .... etc, etc

¿Cuando uso REDEFINE como le indico en que posicion de la pantalla aparecera o sera que aparece en un lugar ya determinado?

crea una tabla temporal con un solo campo:

datos.dbf -> campo chr(40)

y sobre ese campo grabas :

1ra linea CODIGO
2da linea DECRIP+STR(CANTID,5)+STR(PRECIO,9,2)+STR(TOTAL,9,2)

3ra linea CODIGO
4ta lines DECRIP+STR(CANTID,5)+STR(PRECIO,9,2)+STR(TOTAL,9,2)
.
.
.
.
etc

fijate en el metodo KEYDOWN de la clase XBROWSE y entenderas porque. En mi caso tuve que modificarlo para poder captar todas las teclas sin excepcion.

Jaime

demoro 5 horas , pero excelente

Cuando presionas ESC se sale del Browse o se queda alli?


Si se sale del Browse entonces tienes que modificar el metodo KEYDOWN
de la clase XBROWSE

Con esto controlas los colores del Browse, Asi lo hago yo cuando trabajo con mas de 1 browse.

oBrw:nClrText:={|| Rgb(255,255,255)}
oBrw:nClrForeFocus:={|| Rgb(65,105,255) }
oBrw:nClrBackFocus:={|| Rgb(65,105,225) }


Jaime

Pues lo que hago es Poner los campos de una tabla en un ARRAY y depues lo muestro en un Listbox donde el Usuario escoge los campos a imprimir: Local I,Arcam:={} Use Empleado For I=1 To Fcount() Aadd(Arcam,Field(I) Next I Luego Este array lo muestro en un ListBox o ComboBox donde el Usuario escoge lo...

simplemente en la funcion que hace la busqueda pones esto


Locate For 'duar'$Empleados->Nombre

¿Puedes ser un poco mas especifico?

¿El Usuario eligiria los campos?

Porque si es el diseño de un Reporte Obviamente uno programa un Reporte con los campos que desea y no hay necesidad de Elegir campos.

Porque no le das ENTER en vez de ESC