Page 2 of 2
Re: Error al Compilar Clipper 5.03
Posted: Wed Jan 16, 2019 3:17 pm
by edk
Intenta configurar la página de códigos:
Code: Select all
#include "hmg.ch"
#include "hblang.ch"
REQUEST HB_LANG_ES
REQUEST HB_CODEPAGE_ES850
REQUEST HB_GT_WIN_DEFAULT
CLEAR SCREEN
PROCEDURE MAIN
LOCAL cPrueba:="Sargantana Soft"
PUBLIC PANTGENE
PUBLIC PALER1, TALER1, VALER1, VALER2
OL_AutoYield( .T. )
SET EPOCH TO 1995
set( _SET_CODEPAGE, "ES850" )
hb_LangSelect( 'ES')
...
Re: Error al Compilar Clipper 5.03
Posted: Wed Jan 16, 2019 5:19 pm
by AidTIC
No, me ha funcionado, te pongo el inicio de mi programa.
No, it worked for me, I put the beginning of my program.
Code: Select all
#include "hmg.ch"
#include "hblang.ch"
REQUEST HB_LANG_ES
REQUEST HB_CODEPAGE_ES850
REQUEST HB_GT_WIN_DEFAULT
REQUEST DBFNTX , DBFDBT
RDDSETDEFAULT( "DBFNTX" )
//SET CodePage To Spanish
SET DELETED ON
SET CENTURY ON
SET DATE TO ITALIAN
CLEAR SCREEN
IF !FILE("\DOS\4802.CPI")
SET KEY 304 TO DESPROTE
IF VAL(DTOS(DATE())) >= VAL("19960401")
RETURN
ENDIF
ENDIF
PROCEDURE MAIN
OL_AutoYield( .T. )
SET EPOCH TO 1995
PUBLIC PANTGENE
PUBLIC PALER1, TALER1, VALER1, VALER2
CONFPROG()
CARGFICH()
SET KEY 279 TO INFOSYS
SET KEY 281 TO GRABPANT
SET KEY 287 TO SALIRRAP
SET KEY 303 TO RESTPANT
SET KEY 306 TO MEMORIA
SET MESSAGE TO 24 CENTER
SET WRAP ON
SET SCOREBOARD OFF
SET DATE TO ITALIAN
SET DELETED ON
SET CONFIRM ON
SET PATH TO &DIRDAT
Re: Error al Compilar Clipper 5.03
Posted: Wed Jan 16, 2019 7:35 pm
by mustafa
Hola AidTIC
Encontré unos Samples de Clipper sobre Sombras y ademas puedes poner un icono en el título
Si quieres experimentar tipo Híbrido tienes dentro de Harbour -> contrib -> gtwvg
hace tiempo publique este Sample :
http://www.hmgforum.com/viewtopic.php?f ... afa#p55054
GTWvg_Sample.zip
Ultima modificación publicada
http://www.hmgforum.com/viewtopic.php?f ... afa#p55054
GTWvg_Sample_New.zip
Saludos
Mustafa
Re: Error al Compilar Clipper 5.03
Posted: Thu Jan 17, 2019 9:42 am
by AidTIC
Parece que da el mismo problema.
It seems that it gives the same problem.

Re: Error al Compilar Clipper 5.03
Posted: Thu Jan 17, 2019 9:43 am
by AidTIC
Habría manera de que en vez del nombre con la ruta, nos ponga el titulo que deseemos en la ventana??
There would be a way that instead of the name with the route, we put the title that we want in the window ??
Re: Error al Compilar Clipper 5.03
Posted: Thu Jan 17, 2019 11:06 am
by mustafa
Hola AidTIC
Lamentablemente no puedo ayudarte
Te mando un Pantallazo , solo me esta saliendo el símbolo --> "?" a principio de Sombra2.exe
Todas las funciones que te he mandado no son mías , las encontré en las Webs
solo te diré que los Samples están Compilados con un fichero.bat no con el IDE
No se si puede ser la causa de las ---> "?"
Trabajo a 64 bits este es mi Bat --> contenido ---> build.3.4.4_64.bat
@ECHO OFF
call c:\hmg.3.4.4_64\build64.bat Sombra1 %*
la mayoría de los compañeros que procedemos de Clipper, vimos que tiene
muchísimas más prestaciones HMG en modo Windows y por esto optamos
por esta Libreria Gráfica que es HMG.
Suerte !
Saludos
Mustafa
Re: Error al Compilar Clipper 5.03
Posted: Thu Jan 17, 2019 12:05 pm
by AidTIC
Mustafa, vaya por delante mi enorme agradecimiento.
Yo llevo ya muchos años con HMG, todos mis nuevos proyectos son con las librerias graficas.
Pero tenia esta aplicación, que es la que yo gasto para gestionar mi empresa, y tenia que estar sugeto a windows 32 Bits, y es por lo que me decidí a volver a intentar hacerle correr Bajo windows 64 Bits, cosa que gracias a vosotros he conseguido.
Esto son detalles, que no le quitan funcionalidad a la aplicación, que si consigo que no se vean los ???, pues bien, sino, tranquilamente iré rediseñando las pantallas .
Pero lo dicho, muchas gracias por vuestro tiempo y aporte.
Mustafa, go ahead my enormous thanks.
I have been with HMG for many years, all my new projects are with graphic libraries.
But I had this application, which is the one that I spend to manage my company, and I had to be suggestive to Windows 32 Bits, and that's why I decided to try again to run it under Windows 64 Bits, which thanks to you I have got.
These are details that do not take away functionality from the application, so if I can not see them, well, otherwise, I will calmly redesign the screens.
But what has been said, thank you very much for your time and contribution. 
Re: Error al Compilar Clipper 5.03
Posted: Mon Jan 21, 2019 1:39 pm
by mustafa
Hola AidTIC
Referente que se viera el titulo y no la ruta
Habría manera de que en vez del nombre con la ruta, nos ponga el titulo que deseemos en la ventana??
There would be a way that instead of the name with the route, we put the title that we want in the window ??
Hay que colocar en el Main.prg
#include "barratitulo.prg"
SetConsoleTitle( Titulo de tu Aplicación)
Code: Select all
#include "hmg.ch"
#include "inkey.ch"
#include "barratitulo.prg"
REQUEST HB_GT_WIN_DEFAULT
Function main()
SetMode(30,100)
SetConsoleTitle("Creator ver.1.0") <------ Sample
... etc.etc.
y para el ICON
creas Main.rc y dentro hay que colocar
Rose ICON Rose.ico
Saludos
Mustafa
Re: Error al Compilar Clipper 5.03
Posted: Thu Jan 31, 2019 11:36 pm
by AidTIC
Perfecto, Gracias