Search found 958 matches

by leandro
Mon Aug 24, 2020 5:21 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Fwh19.05 - New Class TDockPnel
Replies: 88
Views: 39418

Re: Fwh19.05 - New Class TDockPnel

Si, menos mal. Ven, no sera que en mi código, hace falta definir el xbrowse en pixeles? :o     oBrwMs := TXBrowse():New( oP )     oBrwMs:nTop                        := nT     oBrwMs:nLeft                       := nL     oBrwMs:nHeight                   := nH     oBrwMs:nWidth                    := n...
by leandro
Sun Aug 23, 2020 6:53 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Fwh19.05 - New Class TDockPnel
Replies: 88
Views: 39418

Re: Fwh19.05 - New Class TDockPnel

No, me toco cambiar toda la sintaxis en lo referente a la definición del xbrowse, use la función ejemplo que me enviaste test1 y como resulto como lo necesitaba, con base en este cambie los datos y solucionado.

Agregando la clausula PIXEL tampoco funciona.
by leandro
Sun Aug 23, 2020 4:30 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Fwh19.05 - New Class TDockPnel
Replies: 88
Views: 39418

Re: Fwh19.05 - New Class TDockPnel

Muchas gracias Cristobal, quedo solucionado. Me toco cambiar las sintaxis, pero funciono correctamente.

:D :D :D :D :D
by leandro
Sat Aug 22, 2020 10:02 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Fwh19.05 - New Class TDockPnel
Replies: 88
Views: 39418

Re: Fwh19.05 - New Class TDockPnel

Gracias por la pronta respuesta, Pero... sigue sin funcionar, asumo que coloca el xbrowse encima del GET. oBrwMs:SetArray( aCtas ) oBrwMs:CreateFromCode() @ oBrwMs:nBottom + 2, 2 GET oGbsCta VAR cGbsCta OF oP PICTURE "@N" msginfo("Pausa") Return oBrwMs   https://hymplus.com/forof...
by leandro
Sat Aug 22, 2020 8:10 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Fwh19.05 - New Class TDockPnel
Replies: 88
Views: 39418

Re: Fwh19.05 - New Class TDockPnel

Buenas tardes para todos Cristobal, sera que me puedes ayudar con algo. Lo que pasa es que requiero colocar un get en la parte de abajo del xbrowse, pero la verdad es que la graficación por coordenadas no se me da. (Me acostumbre a los recursos). Adjunto imagen para ilustrar mas lo que requiero hace...
by leandro
Sun Aug 09, 2020 10:22 am
Forum: FiveWin para Harbour/xHarbour
Topic: Problemas al agregar la clausula NOWAIT
Replies: 2
Views: 241

Problemas al agregar la clausula NOWAIT

Buenos días para todos, Me surgió la necesidad de agregar la clausula NOWAIT a uno de los diálogos de captura de la aplicación, pero empiezan a salir errores en las variables que contienen los objetos, por ejemplo la variable oGfec REDEFINE DTPICKER oGfec VAR oFac:hEncabezado["fecha"] ID 4...
by leandro
Thu Jul 02, 2020 6:51 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ot: curso ModHarbour Mercury MVC
Replies: 19
Views: 4060

Re: ot: curso ModHarbour Mercury MVC

Gracias por el dato GABO :D , voy a probar y comento.
by leandro
Mon Jun 22, 2020 9:53 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ot: curso ModHarbour Mercury MVC
Replies: 19
Views: 4060

Re: ot: curso ModHarbour Mercury MVC

Buenas tardes Wilson, me uniría al curso.

Siempre y cuando se explique, la instalación de MOD_HARBOUR, he intentado varias veces hacer la instalación y hasta el momento no lo he logrado. Por esa simple razón no me ha motivado el uso de la herramienta.

Saludos.

LEANDRO AREVALO
by leandro
Wed Jun 10, 2020 12:48 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Problemas con UTF8 en base de datos
Replies: 3
Views: 511

Problemas con UTF8 en base de datos

Buenos días para todos, En estos días, tuve la necesidad de importar información desde un archivo plano csv separados por punto y coma, pero tengo problemas con el temas de las ñ y las tildes, cuando abro el archivo en block de notas, se ve perfectamente: https://hymplus.com/forofw/utf81.png En la a...
by leandro
Thu Jun 04, 2020 7:28 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Mr. Rao, Registros duplicados en xBrowse con un ReQuery
Replies: 12
Views: 1588

Re: Mr. Rao, Registros duplicados en xBrowse con un ReQuery

En algún momento me sucedió lo mismo, y creo que el tema pasa mas por la forma como esta definida la consulta, desde mi punto de vista, debe quedar la siguiente manera: //hace falta el paréntesis oQryBD:= ::oConn:RowSet( "SELECT * FROM (clientes " + ;                             "LEFT...
by leandro
Fri May 29, 2020 2:19 pm
Forum: FiveWin para Harbour/xHarbour
Topic: problema de pintado del xBrowse
Replies: 8
Views: 1356

Re: problema de pintado del xBrowse

Intenta así

Code: Select all

oBrw:nMarqueeStyle      := MARQSTYLE_HIGHLCELL
by leandro
Tue May 26, 2020 1:48 pm
Forum: FiveWin para Harbour/xHarbour
Topic: FOREIGN KEY
Replies: 6
Views: 850

Re: FOREIGN KEY

Una idea

Code: Select all

DELETE etr,gas
FROM estudio_ratio etr 
LEFT JOIN gastos gas 
    ON etr.idestudio = gas.idgastos
WHERE etr.id= 1;
 
by leandro
Tue May 19, 2020 11:46 am
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Algún ejemplo del uso de xBrowse?
Replies: 9
Views: 920

Re: ¿Algún ejemplo del uso de xBrowse?

Una idea     oBrwDoin := TXBrowse():New( oDlgDin )     oBrwDoin:nMarqueeStyle         := MARQSTYLE_HIGHLROW     oBrwDoin:nRowDividerStyle      := LINESTYLE_LIGHTGRAY     oBrwDoin:nColDividerStyle      := LINESTYLE_LIGHTGRAY     oBrwDoin:nHeaderLines          := 1     oBrwDoin:lColDividerComplete   :...
by leandro
Thu May 14, 2020 5:36 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Como Cambiar el Color de una Celda en Xbrowse
Replies: 2
Views: 314

Re: Como Cambiar el Color de una Celda en Xbrowse

Yo lo hago de la siguiente manera: ......     oCol          = oBrwItem:AddCol()     oCol:bStrData := {|| if(Len( oFac:detalle ) > 0 , oFac:detalle[oBrwItem:nArrayAt]["serial"] ,"" ) }     oCol:cHeader  = "Serial Artículo"     oCol:nWidth   = 180     oCol:nHeadStrAlign =...
by leandro
Fri May 08, 2020 10:41 am
Forum: FiveWin para Harbour/xHarbour
Topic: Archivos pdf en un campo memo
Replies: 5
Views: 670

Re: Archivos pdf en un campo memo

De esta forma conviertes el pdf en texto, de ahí en adelante lo almacenas en donde quieras. local rutapdf := ".\pdfs\"+Retorna_Caracter(vCsc)+".pdf" local rutaTXT := ".\pdfs\"+Retorna_Caracter(vCsc)+".txt" //CONVERTIMOS EL PDF A CADENA DE TEXTO fMimeEnc( rutaP...