Clipper/FiveWin - No inicia aplicación de fivewin

 
Vista:
sin imagen de perfil

No inicia aplicación de fivewin

Publicado por Luis Adolfo (1 intervención) el 22/12/2013 02:18:19
Hola a todos, tengo el siguiente un programa que compilado con Verce funciona perfectamente, ahora bien al querer utilizar xedit 3.0 lo enlaza perfectamente, carga el programa en memoria pero no me muestra nada. Y tengo que quitarlo de la misma usando el administrador de tareas.
Ya estoy utilizando xedit con otros programas y no tengo problemas (hechos para dbf)
Este en particular estoy utilizando la librería Mysql de Willian Wormar, y quiero poder utilizar el utilitario xEdit, pero me encuento con este inconveniente. Si alguien tiene alguna sugerencia.

Muchas gracias

Luis

Pd:

Hasta "hola" el mensaje se muestra el "hola1" queda el programa colgado sin mostrarlo

oMySQL:= TMySQLServer():New( "localhost", "root", "", 3306 )


If oMySQL:NetErr()
MsgMySQLError( oMySQL, "Error conectando con el servidor " + "localhost" + "!" )
oMySQL:End()
Return .F.
EndIf

oDBase := oMySQL:SelectDB( "gomadb" )


If oMySQL:NetErr()
MsgMySQLError( oMySQL, "Error abriendo base de datos " + "gomadb" + "!" )
oMySQL:End()
Return .F.
EndIf


? "hola"

SET 3DLOOK ON // Se activa vista en 3¦ Dimensi¢n.
DEFINE FONT oFont NAME "MS SANS SERIF" SIZE 0,-10
define icon surge resource "icon_1"
? "hola1"
DEFINE WINDOW oVentPrinc FROM 1, 1 TO 22, 75;
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder