Jump to content
Fivewin Brasil

edgardvaz

Membros
  • Posts

    21
  • Joined

  • Last visited

Posts posted by edgardvaz

  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. 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. icon_smile_sad.gif

    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.

  4. 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. icon_smile_sad.gif

    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.

  5. 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.

  6. 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

  7. 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

  8. Comprei o Livro de Fivewin, baixei a versão demo de vocês e tentei fazer um programa que existe no livro como exemplo.

    O Fivewin foi baixado há vários meses e só agora é que tive tempo para avaliá-lo.

    O programa que fiz (só de menu) aparece a seguinte mensagem durante sua execução:

    A CPU NRVDM encontrou uma instrução nao permitida.

    CS:0000 IP:07f8 OP:f0 1b 53 ff Escolha "Fechar" para finalizar o aplicativo.

    Gostaria de saber :

    . se conhecem o erro?

    . se é porque estou trabalhando com uma cópia demo do fivewin que já se expirou?

    . como faço para avaliar o fivewin?

    Eu trabalho há anos com clipper e gostei da idéia poder convertar mais rapidamente as aplicações no padrão windows. Mas esta semana só deu pau e não consegui nem fazer um programa básico de Menu...

    . ao adquirir o Fivewin vocês fornecem manual ?? icon_smile_shy.gif

  9. Comprei o Livro de Fivewin, baixei a versão demo de vocês e tentei fazer um programa que existe no livro como exemplo.

    O Fivewin foi baixado há vários meses e só agora é que tive tempo para avaliá-lo.

    O programa que fiz (só de menu) aparece a seguinte mensagem durante sua execução:

    A CPU NRVDM encontrou uma instrução nao permitida.

    CS:0000 IP:07f8 OP:f0 1b 53 ff Escolha "Fechar" para finalizar o aplicativo.

    Gostaria de saber :

    . se conhecem o erro?

    . se é porque estou trabalhando com uma cópia demo do fivewin que já se expirou?

    . como faço para avaliar o fivewin?

    Eu trabalho há anos com clipper e gostei da idéia poder convertar mais rapidamente as aplicações no padrão windows. Mas esta semana só deu pau e não consegui nem fazer um programa básico de Menu...

    . ao adquirir o Fivewin vocês fornecem manual ?? icon_smile_shy.gif

×
×
  • Create New...