topic-19633

Posts: 1078

Joined: Thu Sep 27, 2007 03:47 PM

Error Xbrowse
Posted: Fri Aug 20, 2010 04:20 PM

Estoy trabajando con xbrowse y mysql

No me muestera los datos , en elk browser muestra esto
1 cClassname
2 hObs
3 oLevalue
4 Poleenumerador

En todos los browser del aplicativo me aparece esto, con la version FWH 8.03 no tengo est problema

Anexo codigo

Code (fw): Select all Collapse

      REDEFINE XBROWSE oLbx ; 
        COLUMNS "vend", "nombre","status" ; 
        HEADERS "Codigo", "Nombre","Status" ; 
        PICTURES nil, nil, nil, nil ; 
        COLSIZES 40, 180,40 ; 
        JUSTIFY .F., .F., .T. ;
        OF oDlgbrow ID 4001 ; 
        RECORDSET oDat01
  Endif
        if memvar->x_brom2007;oLbx:l2007 := .T.;else;oLbx:l2007 := .F.;endif
        oLbx:aCols[3]:AddResource("CHECK_SI")
        oLbx:aCols[3]:AddResource("CHECK_NO")
       if !memvar->x_tfado
    oLbx:aCols[3]:bBmpData   := { || iif(b_vend->status, 1, 2)}
        oLbx:aCols[3]:bStrData   := { || iif(b_vend->status,"Si","No")}
       else
        oLbx:aCols[3]:bBmpData   := { || iif(oDat01:Fields("status"):Value=1, 1, 2)}
        oLbx:aCols[3]:bStrData   := { || iif(oDat01:Fields("status"):Value=1,"Si","No")}
       endif

Ruben Dario Gonzalez
Cali-Colombia
rubendariogd@hotmail.com - rubendariogd@gmail.com

Daniel Garcia-Gil

Posts: 2365

Joined: Wed Nov 02, 2005 11:46 PM

Re: Error Xbrowse
Posted: Fri Aug 20, 2010 04:24 PM

Ruben

Te falta oLbx:CreateFromResource() despues de crear el browse

para usar xbrowse, inclusive desde la version FWH 8.03 necesitas esa instruccion (para los recursos)

desde codigo usas :CreateFromCode()

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: Error Xbrowse
Posted: Tue Nov 09, 2010 02:54 PM

una consulta,
al usar la clausula RECORDSET oRS, ¿en los xbrowse no es necesario pasar los...?

oBrw:bGoTop := {|| rs:moveFirst() }
oBrw:bGoBottom := {|| rs:moveLast() }
oBrw:bSkip := {| n | rsSkipper( n, rs ) }
oBrw:bBof := {|| rs:Bof() }
oBrw:bEof := {|| rs:Eof() }
oBrw:bBookMark := {| bmNew | IIF( bmNew == NIL, rs:bookMark, rs:bookMark := bmNew) }
oBrw:bKeyNo := {|| rs:AbsolutePosition }
oBrw:bKeyCount := {|| rs:RecordCount() }

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Error Xbrowse
Posted: Wed Nov 10, 2010 03:18 PM

goosfancito wrote:una consulta,
al usar la clausula RECORDSET oRS, ¿en los xbrowse no es necesario pasar los...?

oBrw:bGoTop := {|| rs:moveFirst() }
oBrw:bGoBottom := {|| rs:moveLast() }
oBrw:bSkip := {| n | rsSkipper( n, rs ) }
oBrw:bBof := {|| rs:Bof() }
oBrw:bEof := {|| rs:Eof() }
oBrw:bBookMark := {| bmNew | IIF( bmNew == NIL, rs:bookMark, rs:bookMark := bmNew) }
oBrw:bKeyNo := {|| rs:AbsolutePosition }
oBrw:bKeyCount := {|| rs:RecordCount() }

XBrowse automatically builds all the navigational codeblocks appropriate to the datasource, be it RDD, RecordSet, Array, etc. The codeblocks automatically generated by xbrowse internally are much better constructed than what we may directly supply.

It is desirable to know what version of FWH Mr. Ruben is using. In the code that is posted both recordset and rdd appear to be mixed up.

Regards

G. N. Rao.

Hyderabad, India

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: Error Xbrowse
Posted: Wed Nov 10, 2010 04:50 PM

gracias

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

FiveTech Support Forums

Continue the discussion