ajuda clipper 5.3 windows 64bits

[Rubens Tulio]

bom dia pessoal
tenho um cliente que usa um programa antigo feito em clipper 5.3
e agora comprou maquinas novas todas com Windows 8 64 bits
e preciso executar o programa msdos nele

já tentei o dosbox - funcionou mas não consegui fazer funcionar a impressão
os notes tem saída usb mas deixei um pc com Windows xp com a impressora lx300

ai to vendo que o pessoal fala que xharbour tem como compilar no Windows 64 bits
baixei e não consegui compilar
não tenho experiência em xharbour nem de comando
onde abaixo harbor ou xharbour - qual e o melhor harbour ou xharbour - e qual e o mais fácil para compilar sem
muita mudança

para compilar fazia o seguinte no clipper
@ECHO OFF
RMAKE estoque
IF ERRORLEVEL 1 C:VPLAY C:VGACPY4 > NUL
IF ERRORLEVEL 0 C:VPLAY C:VGACPY8 > NUL

--------------estoque.rmk
.prg.obj:
clipper $< /m /o$@

CADASTRO.OBJ: CADASTRO.PRG
ALTERA.OBJ: ALTERA.PRG
CONDIMA2.OBJ: CONDIMA2.PRG
ALTERA2.OBJ: ALTERA2.PRG
BAIXA.OBJ: BAIXA.PRG
BAIXA2.OBJ: BAIXA2.PRG
CONSULT2.OBJ: CONSULT2.PRG
CONSULT3.OBJ: CONSULT3.PRG
CONSULT4.OBJ: CONSULT4.PRG
ROTINAS.OBJ: ROTINAS.PRG
CONSULT5.OBJ: CONSULT5.PRG
CONSULTA.OBJ: CONSULTA.PRG
DELETAR.OBJ: DELETAR.PRG
DELETAR2.OBJ: DELETAR2.PRG
ENTRADA.OBJ: ENTRADA.PRG
LISTAS.OBJ: LISTAS.PRG
LISTAS2.OBJ: LISTAS2.PRG
LISTAS3.OBJ: LISTAS3.PRG
PROCESSA.OBJ: PROCESSA.PRG
LISTAS4.OBJ: LISTAS4.PRG
ROTECON.OBJ: ROTECON.PRG
VENDA.OBJ: VENDA.PRG
LISTAS5.OBJ: LISTAS5.PRG

estoque.EXE: CADASTRO.OBJ ALTERA.OBJ CONDIMA2.OBJ ALTERA2.OBJ BAIXA.OBJ \
BAIXA2.OBJ CONSULT2.OBJ CONSULT3.OBJ CONSULT4.OBJ \
ROTINAS.OBJ CONSULT5.OBJ CONSULTA.OBJ DELETAR.OBJ DELETAR2.OBJ \
ENTRADA.OBJ LISTAS.OBJ LISTAS2.OBJ LISTAS3.OBJ PROCESSA.OBJ \
LISTAS4.OBJ ROTECON.OBJ VENDA.OBJ LISTAS5.OBJ
set rtlinkcmd=/free
set obj=$(makepath[.obj])
IF ERRORLEVEL 0 C:VPLAY C:VGACPY2 > NUL
rtlink @estoque OUTPUT $@

alguém pode me ajudar

agradeço atenção

emails
Rubens@solucaoempresarial.net
rubenstulio@hotmail.com

[alxsts]

Olá!

Entre o xHarbour e o Harbour, o segundo está mais avançado em termos de desenvolvimento. Mas, como você instalou o xHarbour, veja se consegue gerar o teu executável com ele.

Supondo que você tenha instalado o xHarbour e o BCC na raiz do drive C:, crie um arquivo .bat no teu desktop (por exemplo Prompt.Bat), com as linhas baixo:

Código: Selecionar todos

@Echo Off
set path=C:\xHarbour\bin;C:\bcc55\bin;%path%
set include=C:\xHarbour\include;C:\bcc55\include;%include%
set lib=C:\xHarbour\lib;C:\bcc55\lib;%lib%

Cmd.exe

Salve e execute o arquivo.

Posicione na pasta onde estiverem os teus fontes. Edite o programa principal do teu sistema e nele coloque a function ou procedure main:

Código: Selecionar todos

PROCEDURE Main()

   ExecuteSuaRotinaPrincipal()

RETURN   

// ou

FUNCTION Main()

   ExecuteSuaRotinaPrincipal()

RETURN NIL

Execute o gerador de scripts do xHarbour, HbMake.Exe

Código: Selecionar todos

HbMake SeuScript.BC -ex

Forneça os parâmetros conforme solicitado.

Vai chegar um ponto onde abrirá um box com os nomes dos prgs que estão na pasta. Marque um a um com asterísco (*). Para finalizar, tecle ENTER.

Vai solicitar o nome do programa principal do sistema. Informe o nome daquele que tem a function/procedure Main()

Vai perguntar se compila a aplicação: Confirme e pronto.

Corrija eventuais erros e não desanime. Você terá um ganho significativo em recursos no teu aplicativo.

Use o recurso de busca do fórum. Tem muito material relacionado. Poste as dúvidas que sobrarem.

[alxsts]

Lembrando: HbMake SeuScript.BC -ex é usado para criação do script de compilação.

A partir da segunda, para gerar seu executável, digite apenas HbMake SeuScript.BC

Aproveite para conhecer o script gerado, abrindo SeuScript.BC com um editor de textos.

[Jairo Maia]

Olá Rubens,

Se tem algo que procuro não fazer é indicar esse ou aquele para trabalhar, porém, como você perguntou vou dar minha opinião: Baixe o Harbour.

Se deseja baixar o Harbour, aconselho a versão 3.0.0 pré-compilada. Você pode baixar aqui: Harbour-3.0.0-win.exe

Após instalar, certifique-se que foi acrescentado em seu path a pasta c:\hb30\bin

Então nomine o script abaixo com a extensão .hbp na pasta onde estão os .PRGs do projeto.

Digite: HBMK2 NomeScript.Hbp e enter.

Script básico com base em suas informações:

Código: Selecionar todos

# coloque aqui os parametro do compilador:

-inc
-gui
-quiet
-oCadastro.Exe

#coloque aqui as libs:
-lxhb
-lhbct
-lhbwin

# coloque aqui seus .PRgs:

CADASTRO.PRG 
ALTERA.PRG 
CONDIMA2.PRG 
ALTERA2.PRG 
BAIXA.PRG 
BAIXA2.PRG 
CONSULT2.PRG 
CONSULT3.PRG 
CONSULT4.PRG 
ROTINAS.PRG 
CONSULT5.PRG 
CONSULTA.PRG 
DELETAR.PRG 
DELETAR2.PRG 
ENTRADA.PRG 
LISTAS.PRG 
LISTAS2.PRG 
LISTAS3.PRG 
PROCESSA.PRG 
LISTAS4.PRG 
ROTECON.PRG 
VENDA.PRG
LISTAS5.PRG

Ai vamos vendo o que acontece. Pelo que vi você não usa libs externas em seu projeto, se for isso, ficará bem mais fácil. Se tiver libs, tem que procurar as compativeis para Harbour.

Importante também você já fazer algumas alterações, a saber:
No inicio da seu arquivo principal, coloque:

Código: Selecionar todos

#include "hbgtinfo.ch"

REQUEST HB_LANG_PT
REQUEST HB_CODEPAGE_PT850
REQUEST HB_GT_WVT_DEFAULT

No início da função Main() coloque:

Código: Selecionar todos

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

//HB_GtInfo( HB_GTI_CLOSABLE, .F. )  // quer bloquear o botão X de fechamento?
//HB_GtInfo( HB_GTI_ICONFILE, "icone_do_app.ico" )

HB_GtInfo( HB_GTI_WINTITLE, "Titulo da janela" )
HB_GtInfo( HB_GTI_MAXIMIZED, .T. )  // janela WideScreen
//HB_GtInfo( HB_GTI_ISFULLSCREEN, .F. )  // tela cheia

qual e o mais fácil para compilar sem muita mudança

Nenhum. Isso depende muito do seu sistema. Há relatos aqui que migraram sistemas sem necessitar qualquer mudança.

Editado em 23/08/13 às 09:01:
Alexandre, revendo o tópico achei que estava ficando maluco, pois tinha certeza que ao postar minha mensagem ontem não havia resposta ainda. Mas vendo a nota da moderação entendi. Apenas para você saber.