Página 2 de 3
Enviado: 28 Jul 2007 15:49
por Maligno
Primeiro de tudo: tente linkar da forma mais simples possível, até o erro sumir. Depois você tenta usar outros scripts. Se possível, até escreva um PRG simples e monte seu EXE. Depois vá avançando. Não tente por cima primeiro. Tente por baixo.
Enviado: 28 Jul 2007 16:02
por Gelson
Maligno,
Lendo o help do blinker estas parecem ser os parametros necessários para linkar. Não uso nenhuma lib grafica, não tem nenhum recursos para uso de mouse, e tudo simples mesmo. A unica coisa que quero é linkar em modo protegido para não ter mais problemas de memória segundo informações que também li aqui pelo forum.
Vou colocar o script inteiro talvez fique mais claro.
Código: Selecionar todos
NOBELL
BLINKER INCREMENTAL OFF
BLINKER CACHE EMS 50%,50%
BLINKER CACHE XMS 50%,50%
BLINKER CLIPPER PAGE OFF
BLINKER LINK EMS ON
BLINKER LINK XMS ON
BLINKER EXECUTABLE EXTENDED 2048
BLINKER HOST MESSAGE ON
BLINKER HOST DPMI ON
BLINKER HOST VCPI ON
BLINKER HOST XMS ON
BLINKER PROCEDURE DEPTH 70
BLINKER EXECUTABLE COMPRESS 1
SEARCH BLXRATEX
SEARCH BLXCLP53
OUTPUT CONTACOR
STACK 7068
FILE CCOP01
FILE CCOP02
FILE CCOP03
FILE CCOP04
FILE CCOP05
FILE CCOP06
FILE CCOP07
FILE CCOP08
FILE CCOP09
FILE CCOP10
FILE CCOP11
FILE CCOP12
FILE CCOP13
FILE CCOP14
FILE CCOP15
FILE CCOP17
FILE CCOP18
FILE CCOP19
FILE CCOP20
FILE CCOP21
FILE CCOP22
FILE CCOP23
FILE CCOP24
FILE CCOP25
FILE CCOP26
FILE CCOP27
FILE CCOP28
FILE CCOP29
FILE CCOP30
FILE CCOP31
FILE CCOP32
FILE CCOP33
FILE CCOP35
FILE CCCABP10
FILE CCCABP20
FILE CCCABP27
FILE CCCABP30
LIB CLIPPER,EXTEND,DBFNTX,CTP53
Enviado: 28 Jul 2007 16:05
por Maligno
Devolvo seu script o mais enxuto possível. Com isso deveria funcionar:
Código: Selecionar todos
NOBELL
BLINKER EXECUTABLE EXTENDED
BLINKER EXECUTABLE COMPRESS 1
OUTPUT CONTACOR
FILE... O PRIMEIRO PRG AQUI
FILE... DECLARE O RESTO AQUI
LIB CTP53
LIB BLXCLP53
Teste e dê o retorno se funcionou ou não.
Enviado: 28 Jul 2007 16:36
por sygecom
Peixe Frito.....hehe
Enviado: 28 Jul 2007 16:49
por Maligno
Não. Na verdade é bem o contrário. Infelizmente você não consegue perceber isso. Mas tem um exemplo de peixe frito e já cortado bem
aqui. Até vejo que muitos colegas tem o hábito de passar scripts monstruosos, que podem atrapalhar. Claro que sempre com a inteção de ajudar. É válido. Mas o que fiz foi apenas dar a semente do script e orientei o colega a testá-lo. Como é mais simples, é mais fácil. Depois, com o tempo, livre de possíveis erros, e com ajuda do help do BLinker pra consolidar os conhecimentos, ele poderá aumentar seu script, acrescentando novas características. É melhor do que usar um script monstruoso logo de cara e que, na hora que dá pau, só atrapalha.
Enviado: 28 Jul 2007 17:29
por Gelson
Mudei o script porém a continua a mesma mensagem de erro, tentei apenas um blinker FI ccop01 e nada, fui tentando com vários outros e sempre a mesma coisa.
Há alguma mudança a ser feita nos fontes em relação ao clipper 5.01 e o clipper 5.3 ?
Enviado: 28 Jul 2007 17:31
por Maligno
Nos fontes não. Mas você tentou usar esse script mínimo com um programa simples?
Enviado: 28 Jul 2007 18:11
por Gelson
Testei com os fonte que não fazem chamada a outro fontes, tipo se teclado isto, do fontetal.
compilei e linkei um a um (separadamente) e mesmo assim aparece a mesma mensagem,
criei um prg chamado teste com o conteudo abaixo, e mesmo assim dá a mesma mensagem.
Código: Selecionar todos
CLEAR ALL
SETCOLOR("W+/B")
SET DELETE ON
SET TALK OFF
SET BELL OFF
SET DATE BRITISH
SET EPOCH TO 1990
DO WHILE .T.
RESP = ' '
CLEAR
@1,2 TO 19,79 DOUBLE
@21,10 SAY 'VERSAO ANO 2007'
@1,9 SAY ' CONTAS - BANCO DE DADOS 29/08/2.002 - MENU PRINCIPAL'
@3,10 SAY 'A. INCLUSAO '
@4,10 SAY 'B. EXCLUSAO '
@5,10 SAY 'C. ALTERACAO '
@6,10 SAY 'D. CONSULTA'
@7,10 SAY 'E. RELATORIOS'
@8,10 SAY 'F. COPIA DE SEGURANCA'
@9,10 SAY 'G. RESTAURAR ARQUIVOS'
@10,10 SAY 'H. RELATORIO DE VENDAS A PRAZO'
@11,10 SAY 'R. RELATORIO LIMITE ESTOURADO'
@12,10 SAY 'T. TERMINAR'
@14,10 SAY 'RESPOSTA'
@16,10 SAY DATE()
DO WHILE RESP = ' '
@14,19 GET RESP
READ
IF UPPER (RESP) $ 'ABCDEFGHRT'
EXIT
ENDIF
RESP = ' '
ENDDO
ENDDO
praticamente só a tela e nada mais.
Enviado: 28 Jul 2007 18:22
por Gelson
Consegui compilar o teste.prg usando o blinker 7 porem com o clipper 5.01. com o cl53 não passa.
Enviado: 28 Jul 2007 18:25
por Maligno
Tentou com o 5.2? Se você não precisa de algumas "firulas" que tem no 5.3, aconselho a usar a versão 5.2e, que é aliás, a versão que eu uso. Há quem diga que é a melhor versão do Clipper.
Enviado: 28 Jul 2007 18:57
por Gelson
Preciso da CTP52, tem como me passar ? Agora pelo menos o teste.prg passou sem problemas isto usando o clipper52E
Enviado: 28 Jul 2007 18:59
por Gelson
no site site tem o clipper52 deve estar até completo com a CTP52 porém são mais de 5 mb e minha net discada está doer.
Enviado: 28 Jul 2007 19:01
por Maligno
O pacote com o Clipper 5.2 contém apenas o compilador. A biblioteca CTP52 só vem com a CATools. Do que você precisa?
Enviado: 28 Jul 2007 19:05
por Maligno
Sem querer ser chato, mas já sendo... Quase tudo o que você vê no meu site eu peguei quando ainda usava conexão discada. Ali tem mais de 300MB de arquivos. Ou seja, paciência é uma virtude.
Enviado: 28 Jul 2007 19:56
por Gelson
Você está certo, vou pegar.
assim que tiver compilado post o retorno.