Página 1 de 2
Onde encontro OSLIB ?
Enviado: 12 Dez 2007 17:59
por Sergio_ASSilva
Boa tarde a todos,
pessoal gostaria de colocar em alguns campos do cadastro de clientes a opcao para colar do windows, li um poste que o amigo EVOLVER ensina como fazer, porem nao estou encontrando a lib OSLIB, se algume puder mim onformar onde encontro e enviar para mim fico muito grato.
e-mail :
sergioassilva@hotmail.com
Sérgio
Enviado: 12 Dez 2007 18:16
por Pablo César
Enviado: 12 Dez 2007 18:34
por Sergio_ASSilva
Obrigado Pablo, baixei e vou testar.
Sérgio
Enviado: 12 Dez 2007 19:12
por Sergio_ASSilva
Pablo,
Nao funcionou, tentei compilar e apareceu essas menssagens de erro
Code size 2067, Symbols 1040, Constants 1581
C:\SISTEMAS\CAIXA\FONTES>BLINKER @CAIXA
__ __
(«») («») BLINKER DOS Extender and Windows Linker 7.00
___ Blink and you'll miss it !!
Copyright (c) Assembler Software Manufacturers, Inc. 1990-2002
All Rights Reserved. Serial # BR-055934. Fax (804) 784-2357.
BLINKER : 1115 : OSLIB.LIB(WINCLIP) : 'CPMIINT86' : unresolved external
BLINKER : 1115 : OSLIB.LIB(WINCLIP) : 'CPMIREALPTR' : unresolved external
BLINKER : 1115 : OSLIB.LIB(WINCLIP) : 'CPMIALLOCATEDOSMEM' : unresolved external
BLINKER : 1115 : OSLIB.LIB(WINCLIP) : 'CPMIISPROTECTED' : unresolved external
BLINKER : 1115 : OSLIB.LIB(WINCLIP) : 'CPMIFREEDOSMEM' : unresolved external
BLINKER : link was successful
CAIXA.EXE (0.7 seconds)
Enviado: 12 Dez 2007 19:38
por Maligno
Você precisa informar o linker onde está a biblioteca CPMI.LIB. Ela faz parte da OSLib. Inclua no SET LIB o path dela. Ou copie essa miserável pro diretório LIB da OSLib.
Enviado: 12 Dez 2007 20:02
por Sergio_ASSilva
Maligno, valeu
Ok compilou sem problemas, agora como devo colocar no PRG para que preencher a variavel descricao com a palavra copiada ?
fiz assim:
@ 10,20 get cliente->descricao pict "@!"
read()
OL_WINCBCOPY()
Enviado: 12 Dez 2007 20:45
por Sergio_ASSilva
Obrigado a todos, consegui, encontrei como funciona no NG do clipper :*
Enviado: 12 Dez 2007 21:18
por Maligno
Essa função não funciona no Windows XP, caso interesse saber.

Mas há uma alternativa: a biblioteca WAPI, de minha modesta autoria.

Enviado: 13 Dez 2007 08:56
por Pablo César
Pois é... Sergio, se a função OL_WINCBCOPY() da OSLIB não funciona para WINXP, então por quê não utilizas as funções GetWinClip() e SetWinClip(<cData>) da WAPI.LIB do Maligno ?. Eu a utilizo para colar endereços e URLs para colar no navegador e vice-versa para meu aplicativo.
Enviado: 13 Dez 2007 09:38
por Sergio_ASSilva
Nao sabia que nao funciona no XP. Mas como funciona as dus funcoes que vc menciona, a lib do maligno ja tenho, mas nao sei como utiliza-las.
Grato,
Sérgio
Enviado: 13 Dez 2007 10:09
por Pablo César
Use o README.TXT ou WAPI.C para entender... que estão no ZIP
http://pub.buzinello.com/xbase/clipper/ ... _v1.02.zip
A primeira função lê o conteúdo do clip-board e a outra função coloca strings no clip-board (simples)
Enviado: 13 Dez 2007 11:23
por Sergio_ASSilva
Pablo, baixei a versao v1.02 mas quando linkei apareceu as seguintes messagens de erro:
C:\SISTEMAS\WAPI\LIB>BLINKER FI TESTE LIB WAPI
__ __
(«») («») BLINKER DOS Extender and Windows Linker 7.00
___ Blink and you'll miss it !!
Copyright (c) Assembler Software Manufacturers, Inc. 1990-2002
All Rights Reserved. Serial # BR-055934. Fax (804) 784-2357.
BLINKER : overlay opsize set to 40 Kb - minimum is 28 Kb ($$$SWPKRN)
BLINKER : 1115 : WAPI.LIB(COMPATIB) : 'DIRMAKE' : unresolved external
BLINKER : 1115 : WAPI.LIB(COMPATIB) : 'DIRNAME' : unresolved external
BLINKER : 1115 : WAPI.LIB(COMPATIB) : 'RAND' : unresolved external
BLINKER : 1115 : WAPI.LIB(COMPATIB) : 'RANDOM' : unresolved external
BLINKER : 0 Warning error(s), 4 Fatal error(s)
TESTE.EXE (not created) (0.1 seconds)
C:\SISTEMAS\WAPI\LIB>
Grato,
Sérgio
Enviado: 13 Dez 2007 11:37
por Pablo César
Esses erros são porque o BLINKER não achou as funções:
'DIRMAKE'
'DIRNAME'
'RAND''RANDOM'
Que pertencem a CT.LIB, ao linkar coloque-a junto.
Enviado: 13 Dez 2007 13:56
por Sergio_ASSilva
Pablo, segui suas orientacoes e corrigdos os problemas o sistema compilou tudo ok, porem nao esta executando aparece a menssem abaixo:
(0) Unrecoverable error 667: Eval stack fault
ESTOU COMPILANDO:
CLIPPER /M
ESTOU LINKANDO:
FILE CLD.LIB
OUTPUT CAIXA
BLINKER INCREMENTAL OFF
BLINKER EXECUTABLE CLIPPER F250
BLINKER PROCEDURE DEPTH 140
BLINKER EXECUTABLE COMPRESS 1
BLINKER EXECUTABLE NODELETE
BLINKER EXECUTABLE EXTENDED 9216
BLINKER EXECUTABLE ALIGN 1024
LIB \BLINKER\LIB\BLXCLP53
LIB CLIPPER
LIB EXTEND
LIB DBFNTX
LIB TERMINAL
LIB WAPI
LIB CT
O que estou fazendo errado ?
Grato
Sergio
Enviado: 13 Dez 2007 15:52
por Pablo César
Olha Sergio, eu não sou muito conhecedor do BLINKER. Eu o uso em algumas aplicações mas eu não utilizo com script. Mas este tipo de problemas ja tem histórico no forum, dê uma olhada em:
https://pctoledo.org/forum/viewto ... tack+fault