Page 1 of 1
Ayuda con Dolphin
Posted: Mon Nov 19, 2012 7:31 pm
by EBM
Estoy tratando de probar el ejemplo que viene con FWH12 09 de Dolphin y al ejecutarlo me manda el mensaje Windows de que la aplicacion TESTDOL.EXE ha dejado de funcionar y tengo que cerrar la aplicacion, el problema esta al intentar conectarse con el servidor en la siguiente orden:
TRY
MsgStop( "Estoy aqui" )
oServer := TDolphinSrv():New( "localhost", ;
"root" , ;
" " , ;
3306, , "ameca" )
CATCH oErr
MsgStop( "Hubo un error" )
RETURN NIL
END
Tengo corriendo el servidor de mysql sin problemas ya que puedo accesarlo desde Eagle y con el cliente de mysql.
Alguna idea de por que no funciona??
Saludos
LCP Eduardo Borondón Muñiz
FWH 1209
Harbour 3.2.0 rev 17516
Windows 7
bcc 582
Re: Ayuda con Dolphin
Posted: Mon Nov 19, 2012 9:45 pm
by wmormar
Eduardo,
Generalmente cuando envia ese GPF es porque no hay conexion con el servidor, o algún parámetro es incorrecto.
Además es parecido a Eagle1, por lo menos, en la forma de conexión, tienes que tener la DLL libmysql.dll en la carpeta de tu EXE.
Re: Ayuda con Dolphin
Posted: Tue Nov 20, 2012 3:09 pm
by MarioG
Eduardo:
Acabo de generar testdol y con algunos ajustes (asignacion de database y tabla), anduvo, aunque previamente me encontre con que:
Code: Select all
PROCEDURE DataBrowse( oServer, oWnd )
LOCAL oQry
LOCAL oDlg
LOCAL oBrw
LOCAL oData, oCol
lOCAL oErr
// LOCAL oServer
oServer está duplicado
podés probar de esta manera (quizás tengas un mensaje de error, que te oriente mejor):
Code: Select all
// Verificar DB y Tablas de la Applicación
CONNECT oSrv HOST "localhost" ;
USER "root" ;
PASSWORD "" ;
PORT 3306 ;
FLAGS 0 ;
DATABASE "ameca" ;
ON ERROR nMyErr:= InfoError( Self, nError, lInternal )
...
static function InfoError( oServer, nError, lInternal )
local cText := " Mensaje de Error" + CRLF + ;
"================================" + CRLF + ;
+"'"+oServer:ErrorTxt()+"'" + CRLF + ;
"ERROR No: " + Str( nError ) + CRLF + ;
"Internal: " + If( lInternal, "Yes", "No" )
Alert( cText,, "Atención!",, IDI_HAND, TRUE )
return( nError )
// Fin
Re: Ayuda con Dolphin
Posted: Fri Nov 23, 2012 3:20 am
by EBM
Gracias por responder Willian y Mario
Pude solucionar el problema cambiando localhost por 127.0.0.1, por alguna razon no acepta localhost, pero ya funcionó.
Gracias por su interes y ayuda.
Saludos !!!
LCP Eduardo Borondón Muñiz
Re: Ayuda con Dolphin
Posted: Fri Nov 23, 2012 5:02 am
by wmormar
EBM,
Resulta que he tenido muchos reportes y se me paso, en windows 7 en algunos equipos (muchos) el problema es que localhost no lo soporta, sino 127.0.0.1
Re: Ayuda con Dolphin
Posted: Fri Nov 23, 2012 1:38 pm
by EBM
William,
Supongo que debe ser algun problema con tdolphin por que con Eagle si se conecta con localhost, pero es simplemente cambiar a 127.0.0.1. Tendrias algun ejemplo mas amplio del uso de tdolphin que me pudieras facilitar ??
Saludos y Gracias
LCP Eduardo Borondón Muñiz
Re: Ayuda con Dolphin
Posted: Fri Nov 23, 2012 1:49 pm
by MarioG
Eduardo;
lo mejor es que ingreses al Blog de Daniel, y mediante SVN podras bajar todo lo referente a la clase, incluye una carpeta con variados ejemplos
http://tdolphin.blogspot.com.ar/2010/06 ... rting.html
Saludos
Re: Ayuda con Dolphin
Posted: Fri Nov 23, 2012 5:20 pm
by sysctrl2
Tampoco en Win Vista ULTIMATE, no acepta el LOCALHOST,
saludos.