xbrowse error

xbrowse error

Postby gustavodiazs » Sat May 19, 2007 6:08 am

Que tal, escribo este post, como novato de este excelente lenguaje de desarrollo

estoy practicando con el x browse con el siguiente codigo:

Code: Select all  Expand view  RUN
    DBUSEAREA(.T.,  , "DEMO", "DEMO" ,.T., .F.)
    SET INDEX TO "DEMO"
    ORDSETFOCUS("ID")
    DBGOTOP()

    DEFINE WINDOW oWndP TITLE "Módulo" OF oWnd MDICHILD

    oBrwP             := TXBrowse():New( oWndP )
    oBrwP:cAlias      := "DEMO"

    oCol               := oBrwP:AddCol()
    oCol:bStrData      :={ ||PASIENTE->ID }
    oCol:cHeader       := "Id"
    oCol:nDataStrAlign := AL_CENTER
    oCol:nHeadStrAlign := AL_CENTER
    oCol:lAllowSizing  := .f.
    oCol:oDataFont     := oFontP
    oCol:oHeaderFont   := oFntBrP
    oCol:nWidth        := 50
    oCol:nHeadBmpAlign := AL_LEFT
    oCol:nHeadBmpNo    := 2
    oCol:bClrHeader    := {|| {CLR_WHITE, CLR_BLUE} }
    oCol:bLClickHeader := { || MSGAlert("Tavo") }
    oCol:AddBmpHandle( FwBmpAsc() )
    oCol:AddBmpHandle( FwBmpDes() )
    oCol:bLDClickData  := {|| MSGAlert("Tavo") }


    oBrwPacientes:SetRDD()
    oBrwPacientes:CreateFromCode()
    oBrwPacientes:oClient := oWndP

    ACTIVATE WINDOW oWndP VALID SaleP("DEMO");

pero al pasar el mouse por ensima del grid me marca el siguiente error

Code: Select all  Expand view  RUN
Error description: Error BASE/41  Scope violation (hidden): TXBROWSE:CHECKTOOLTIP

este es la pila de llamados

Code: Select all  Expand view  RUN
Stack Calls
===========
   Called from:  => TXBROWSE:CHECKTOOLTIP(0)
   Called from:  => TWINDOW:MOUSEMOVE(0)
   Called from:  => TCONTROL:MOUSEMOVE(0)
   Called from:  => TXBROWSE:MOUSEMOVE(2684)
   Called from:  => TWINDOW:HANDLEEVENT(0)
   Called from:  => TXBROWSE:HANDLEEVENT(0)
   Called from: .\source\classes\WINDOW.PRG => _FWH(0)
   Called from:  => WINRUN(0)
   Called from:  => TMDIFRAME:ACTIVATE(0)
   Called from: D:\fivewin\Proy\Dentista\Prg\dent.prg => MAIN(36)

le he buscado pero no encuentro el problema

cualquier ayuda le agradeceria.

Saludos.
User avatar
gustavodiazs
 
Posts: 6
Joined: Fri Apr 20, 2007 3:25 am

Postby Antonio Linares » Sat May 19, 2007 7:33 am

Estás usando Harbour ó xHarbour ? Que versión de FWH ?
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42151
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby gustavodiazs » Sun May 20, 2007 4:41 pm

uso Harbour y la versión de FWH es la de April 7.04 2007 build
User avatar
gustavodiazs
 
Posts: 6
Joined: Fri Apr 20, 2007 3:25 am

Postby Antonio Linares » Sun May 20, 2007 5:14 pm

Gustavo,

Has modificado alguna clase de FWH ?

Por favor construye samples\testxbrw.prg y prueba si te da el mismo error. Aqui funciona bien
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42151
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby gustavodiazs » Tue May 22, 2007 2:58 am

No he modificado clase alguna de FWH,

y este ejemplo si corre correctamente, voy a copiar y pasar a la aplicacion que estoy haciendo.

a ver que pasa

muchisimas gracias, una cosa mas es un excelente trabajo el tuyo, felicidades y lo mejor de los mejor en el futuro.
User avatar
gustavodiazs
 
Posts: 6
Joined: Fri Apr 20, 2007 3:25 am


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 61 guests