Jump to content
Fivewin Brasil

edgardvaz

Membros
  • Posts

    21
  • Joined

  • Last visited

edgardvaz's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. Boa Noite ! No clipper uso o seguinte programa: *--------------------------------------------------------------------------- FUNCTION MyVolSerial(par1) *--------------------------------------------------------------------------- *par1 = C letra da unidade *funcao = exibir numero de serie do volume, independente do windows utilizado *uso MyVolSerial("C") *--------------------------------------------------------------------------- local tela, string, vnumvol, tela1:=savescreen(00,00,24,79) if empty(par1)=.t. par1="C" endif *--limpa a tela antes clear * volcomand="vol "+left(par1,1)+":" * run &volcomand * tela=savescreen(00,00,03,79) clear memowrit("and.txt",strtran(tela,chr(7),"")) string=memoread("and.txt",80) * ferase("and.txt") * restscreen(00,00,24,79,tela1) * vnvol := substr(string,at("-",string)-4,4)+substr(string,at("-",string),5) return vnvol Mas no fivewin este volume vem em branco. Como fazer?
  2. Boa Noite ! No clipper uso o seguinte programa: *--------------------------------------------------------------------------- FUNCTION MyVolSerial(par1) *--------------------------------------------------------------------------- *par1 = C letra da unidade *funcao = exibir numero de serie do volume, independente do windows utilizado *uso MyVolSerial("C") *--------------------------------------------------------------------------- local tela, string, vnumvol, tela1:=savescreen(00,00,24,79) if empty(par1)=.t. par1="C" endif *--limpa a tela antes clear * volcomand="vol "+left(par1,1)+":" * run &volcomand * tela=savescreen(00,00,03,79) clear memowrit("and.txt",strtran(tela,chr(7),"")) string=memoread("and.txt",80) * ferase("and.txt") * restscreen(00,00,24,79,tela1) * vnvol := substr(string,at("-",string)-4,4)+substr(string,at("-",string),5) return vnvol Mas no fivewin este volume vem em branco. Como fazer?
  3. Gilmer, Boa Noite !! Favor restaurar minha senha !! Usuário: Fátima Faria Email: misterinfo@uol.com.br Obrigada, Fátima. Mandei dia 27/06... mandei dia 19/07... e até agora nada. Você tem como mandar nova senha p/ o perfil acima ?? Email que enviamos: gilmer@fivewin.com.br
  4. foi enviado e-mail dia 27/06. Estamos enviando agora, novamente.
  5. Uma pessoa que trabalha comigo perdeu a senha deste fórum. Tentou pedir a senha pelo site informando o e-mail: dá erro. Mandamos e-mail p/ Gilmer: não responde. Vcs pode nos ajudar?? E está dando erro qdo tenta pedir downloads no fórum. Uma pessoa que baixar a cópia demonstração e não está conseguindo.
  6. Uma pessoa que trabalha comigo perdeu a senha deste fórum. Tentou pedir a senha pelo site informando o e-mail: dá erro. Mandamos e-mail p/ Gilmer: não responde. Vcs pode nos ajudar?? E está dando erro qdo tenta pedir downloads no fórum. Uma pessoa que baixar a cópia demonstração e não está conseguindo.
  7. Alguém pode me arruma o clipper 5.2e ?? Tem alguma coisa errada com o que tenho... Este é o mais recomendado para trabalhar com o FiveWin? Obrigado.
  8. Boa tarde. Criei uma procedure Indexa (só c/ return) e passou a linkedição. Vou continuar a testar... Obrigado, []s
  9. Gilmer / Paulo. Boa tarde !! Vocês têm alguma idéia do que pode ser este erro? Edgard.
  10. Esqueci de dizer: . MFLIB.LIB - 04/05/2006 17:31 - 468.063 . MFLIBW.LIB - 04/05/2006 17:31 - 322.943
  11. Melhorou um pouco, agora já dá 2 erros Fatais em uma lib específica: Blinker: 1115 : h:\caminho\LIB\MFLIB(MENSAG) : 'DELAY' : unresolved external Blinker: 1115 : h\caminho\LIB\MFLIB(ABREIND) : 'INDEXA' : unresolved external Eu coloquei este 'caminhho' tanto do clipper52 quanto do five e dá o mesmo erro. Gilmer, Te add no msn mas só trabalho um pouco à noite neste teste.
  12. Está difícil... Apareceu no final: Clearing output buffers BLINKER : 0 Warning error(s), 2 Fatal error(s) SISCOL.EXE (not created) E no meio apareceu: Default overlay class is 'CODE' Sorting segment map Building map table #---------------------------------------------------------- BLINKER CLIPPER SYMBOL OFF #---------------------------------------------------------- BLINKER LINK VERSION 7.00 # // 3.3 BLINKER EXECUTABLE COMPRESS 1 BLINKER EXECUTABLE ALIGNMENT 128 #---------------------------------------------------------- VERBOSE NOBELL BLINKER INCREMENTAL OFF #----------------------------------------------------------- BLINKER PROCEDURE DEPTH 90 #----------------------------------------------------------- MAP A,S PACKCODE PACKDATA #----------------------------------------------------------- # SYSTEM DEFINITIONS #----------------------------------------------------------- OUTPUT SISCOL.exe FILE SISCOL.obj file \trab\cliper52\obj\funcnum file \trab\cliper52\obj\moeda file \trab\cliper52\obj\help file \trab\cliper52\obj\locks file \trab\cliper52\obj\impress file \trab\cliper52\obj\timeslic file \trab\cliper52\obj\printwin # FILE CADASTRO # FILE LANCAMEN # FILE CONSULTA # FILE RELATORI # FILE RELATOR1 # FILE SUPORTE # DEFBEGIN NAME FIVEWIN DESCRIPTION 'CLIPPER FOR WINDOWS LIBRARY' EXETYPE WINDOWS 3.1 CODE PRELOAD MOVEABLE DISCARDABLE DATA PRELOAD MOVEABLE STACKSIZE 11500 HEAPSIZE 4096 SEGMENT 'PLANKTON_TEXT' NONDISCARDABLE SEGMENT 'EXTEND_TEXT' NONDISCARDABLE SEGMENT 'OM_TEXT' NONDISCARDABLE SEGMENT 'OSMEM_TEXT' NONDISCARDABLE SEGMENT 'SORTOF_TEXT' NONDISCARDABLE SEGMENT 'STACK_TEXT' NONDISCARDABLE DEFEND # LIBRARY H:\trab\cliper52\lib\clipper.lib LIBRARY h:\trab\cliper52\lib\dbfntx.lib LIBRARY h:\trab\cliper52\lib\gas50.LIB LIBRARY h:\trab\cliper52\lib\mflib.LIB LIBRARY h:\trab\cliper52\lib\Extend.LIB LIBRARY h:\trab\cliper52\lib\Terminal.LIB LIBRARY h:\trab\cliper52\lib\funcky2c.LIB LIBRARY h:\trab\cliper52\lib\funckyvm.LIB # LIBRARY h:\handlock\lib\clipper\hlock # LIBRARY g:\five\clip52\lib\five.LIB LIBRARY g:\five\clip52\lib\fiveC.LIB LIBRARY g:\five\clip52\lib\Objects.LIB LIBRARY g:\five\clip52\lib\WinApi.LIB # Microsoft LLIBCA C library comes last if needed # LIB LLIBCA
  13. Gilmer, Seria mais fácil para você me enviar um .lnk básico?? Quero testar logo o fivewin e definir a compra. Obrigado.
  14. Gilmer, Obrigado pela força. Segue abaixo o .lnk: #---------------------------------------------------------- # EXIBITION COMMANDS #---------------------------------------------------------- # VERBOSE # BLINKER MESSAGE DUPLICATES BLINKER MESSAGE NOWARNING # MURPHY NOBELL #---------------------------------------------------------- # MEMORY MENAGER #---------------------------------------------------------- BLINKER INCREMENTAL OFF # BLINKER EXECUTABLE EXTENDED BLINKER HOST DPMI ON BLINKER HOST VCPI ON BLINKER HOST XMS ON BLINKER EXECUTABLE COMPRESS 1 #---------------------------------------------------------- # CLIPPER Commands #---------------------------------------------------------- BLINKER3 EXECUTABLE CLIPPER //F:200 //DYNF:8 //SWAPK:65535 //SWAPPATH:"C:\" //TEMPPATH:"C:\" #---------------------------------------------------------- # SYSTEM DEFINITIONS #---------------------------------------------------------- OUTPUT SISCOL.exe FILE SISCOL.obj file \trab\cliper52\obj\funcnum file \trab\cliper52\obj\moeda file \trab\cliper52\obj\help file \trab\cliper52\obj\locks file \trab\cliper52\obj\impress file \trab\cliper52\obj\timeslic file \trab\cliper52\obj\printwin # FILE CADASTRO # FILE LANCAMEN # FILE CONSULTA # FILE RELATORI # FILE RELATOR1 # FILE SUPORTE # LIBRARY \trab\cliper52\lib\clipper.lib LIBRARY \trab\cliper52\lib\dbfntx.lib LIBRARY \trab\cliper52\lib\gas50.LIB LIBRARY \trab\cliper52\lib\mflib.LIB LIBRARY \trab\cliper52\lib\funcky2c.LIB LIBRARY \trab\cliper52\lib\funckyvm.LIB LIBRARY \trab\cliper52\lib\five.LIB LIBRARY \trab\cliper52\lib\fiveC.LIB LIBRARY \trab\cliper52\lib\Objects.LIB LIBRARY \trab\cliper52\lib\WinApi.LIB LIBRARY \trab\cliper52\lib\Extend.LIB # LIBRARY \trab\cliper52\lib\BLXRATEX # LIBRARY \trab\cliper52\lib\BLXCLP52 LIBRARY \handlock\lib\clipper\hlock # Microsoft LLIBCA C library comes last if needed # LIB LLIBCA
  15. Boa tarde, Gilmer. Estou usando Clipper 5.2 e Blinker 7.00 Dos Extended - RC 2 Edgard.
×
×
  • Create New...