Compilar com IDE da HMG programa gaspro40

[marcelomteles]

Pessoal boa noite,

A muito tempo quando iniciaram os trabalhos com o Harbour, comecei a tentar a conversão de alguns programas clipper gerados através do Gaspro40, porém acabei me afastando da área por força maior e continuei apenas dando alguma manutenção necessária aos meus sistemas existentes.
Porém agora com a chegada dos sistemas 64 bits, deparei com a necessidade que muitos encontraram em converter estes sistemas para rodarem em windows 7 e para isso iniciei novamente a procura por dicas e conhecimento sobre esta ferramenta em específico HMG.
Li em especial o tópico "Compilar através da IDE da HMG versão 3.0.35" do nosso amigo Pablo Cesar e me interessei muito, mas gostaria de maiores orientações. Já instalei a versão HMG 3.0.35, importei um sistema que tenho feito no gas, mas apresentou alguns erros. As rotinas do gas (lib) existem para esta versão HMG ?
Inicialmente preferi adotar a utilização da IDE para compilar em modo console, posteriormente me aprofundarei mais. Li vários tópicos no forum, mas gostaria de um ponto de partida.
Obrigado a todos e no aguardo de auxílio.

Marcelo Teles

[marcelomteles]

Desculpem Pessoal

Acredito que acabei postando a mensagem no forum errado. Se puderem mover para o correto agradeço.

Marcelo

[Toledo]

Olá Marcelo, seja bem-vindo ao Fórum!

Veja este programa que está na seção download aqui do fórum:

Gas4Harbour - Conversor GASPRO40 para Harbour

Abraços,

[marcelomteles]

Olá Toledo,

Jé baixei ontem e fiz testes.

Porém poderia me informar link para baixar HARBOUR, o BCC55 ou MingW e se possível me fornecer informações de versão e instalação correta.

Obrigado

Marcelo.

[Toledo]

Marcelo, segue o link para baixar o Harbour:

http://sourceforge.net/projects/harbour ... e/download

Depois incluir no PATH a pasta do Harbour:

SET PATH=%PATH%;c:\hb32\bin;c:\hb32\comp\mingw\bin;

Abraços,

[marcelomteles]

Pessoal boa tarde,

Comecei a fazer a compilação e em uma rotina minha apareceu o erro abaixo. Parece que tem alguma coisa a ver com as linhas que possuem as rotinas Frename(), ferror() e savscreen(), elas são incompativeis com o Harbour ? Elas possuem alguma outra para substituição ?

No aguardo de ajuda, obrigado.

Marcelo.

[Toledo]

Marcelo, as funções LF_FRENAME() e LF_FERROR() podem ser substituídas pelas funções FRENAME() e FERROR(). Agora a SAVESCREENV(), acho que foi digitado errado, é apenas SAVESCREEN(), então basta tirar a letra V.

Abraços,

[Toledo]

Amigos, só para o conhecimento, em breve vou atualizar o Gas4Harbour com opção para visualização de relatórios em modo gráfico, além da impressão, é claro, pode-se enviar o relatório por e-mail ou gerar um arquivo PDF (aceitando os comandos de impressão Negrito, condensado 17,5 e 20, elite, enfatizado, expansão, 8 lpp e modo paisagem).

Abraços,

[marcelomteles]

Obrigado Toledo

Farei a substituição.

Existe alguma lista com comandos equivalentes para os que não possuem a mesma sintaxe dos comandos do clipper5 ?

Abraços

Obrigado

Marcelo Teles

[Toledo]

Uma lista de comandos equivalentes vai ser difícil, mas segue abaixo um guia de referência:

http://www.elektrosoft.it/tutorials/Har ... -guide.htm

Abraços,

[marcelomteles]

Toledo

A compilação ocorreu com sucesso o exe foi criado, porém quando executo-o a tela fica negra e o programa não abre e não apresenta nenhuma mensagem de erro. Tem idéia do que pode ser ?

Obrigado

Marcelo

[Pablo César]

Marcelo, verifique o seu Main começa assim:

Código: Selecionar todos

REQUEST HB_GT_WIN_DEFAULT

Function Main()
SetMode(25,80)

Porque o que parece é que essa tela preta, deve ter um tamanho grande com ScrollBars.

[Toledo]

Marcelo, como o nosso amigo Pablo já alertou, o problema pode estar no Main.
O Gas4Harbour modifica vários arquivos do seu projeto GAS, então verifique se no arquivo principal do seu programa tem os seguintes comandos:

Código: Selecionar todos

#include "hbgtinfo.ch"

REQUEST HB_LANG_PT
REQUEST HB_CODEPAGE_PT850
REQUEST HB_GT_WVT_DEFAULT

Function Main()

HB_SETCODEPAGE('PT850')
HB_LANGSELECT('PT')

HB_GtInfo( HB_GTI_ISFULLSCREEN, .T. )
SetMode(25,80)

Pode ser que algum erro está ocorrendo antes da linha SetMode(25,80), então vai ficar uma tela preta mesmo, mas provavelmente do lado direito desta tela tem uma barra de rolagem, use esta barra para ver se a mensagem de erro não está mais para baixo.

Abraços,