Parece que hay un bug en María_Connect() FWH-24.07 64 bits, o algo estoy haciendo mal y el bug lo tengo yo en el cerebro:
Por favor compilen el siguiente ejemplo, le ejecutan, pulsan sobre "Show table Customer", abren el browse con la tabla, la cierran, y vuelven a pulsar sobre "Show table Customer" por segunda vez. Después de que se les abra la tabla la cierran, y luego de unos segundos, el programa se cierra solo, por arte de magia, sin dar ningún mensaje, ni error.
- Code: Select all Expand view RUN
- #include "fivewin.ch"
function Main()
LOCAL oDlg
SET DATE ITALIAN
SET CENTURY ON
DEFINE DIALOG oDlg SIZE 320,200 PIXEL TRUEPIXEL TITLE "Bug Maria_Connect() ???"
@ 40,70 BUTTON "Show Table Customer" OF oDlg PIXEL ACTION ShowTable( ) SIZE 180,40
ACTIVATE DIALOG oDlg CENTERED
return nil
//------------------------------------//
Function ShowTable( )
LOCAL aStr := { "208.91.198.197:3306,fwhdemo,gnraofwh,Bharat@1950", ;
"209.250.245.152,fwh,fwhuser,FiveTech@2022" }
LOCAL oCn, oRs
oCn := Maria_Connect( aStr[ 1 ] , .T.)
oRs := oCn:RowSet( "customer" )
xBrowse(oRs)
oCn:Close()
Return NIL
//------------------------------------//
