Jump to content
Fivewin Brasil

eajunior

Membros
 View Profile  See their activity

  • Posts

    1,679

  • Joined

  • Last visited

  • Days Won

    1

 Content Type 

Posts posted by eajunior

  1. 20/07/2005 - Dia Internacional dos Amigos

    in Off - Topic

    Posted

    Agradecemos a lembrança deste dia tão importante, e aproveitameos para desejar a todos os participantes deste forum um grande abraço.

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  2. get,,, me ajudem,,,

    in Programação

    Posted

    Ola Antonio, seja bem vinso ao forum

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  3. Homologação do TEF

    in Programação

    Posted

    Ola Mich3L seja bem vindo ao forum

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  4. Socorro no FiveWin

    in Programação

    Posted

    Ola mandei para o seu email um cadastro de cliente meu antigo assim voce tera suas noções.

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  5. Como usar 2 DLL ao mesmo tempo

    in Programação

    Posted

    Ola Marcelo, eu utilizo da seguinte maneira

    // para salvar dll anterior

    hOldDll := GetResources()

    // abro a nova dll

    Setresources( "nova.dll" )

    // volto a dll antiga quando não precisar mais da anterior

    setresources( hOldDll )

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  6. Comunicação com Balança Toledo

    in Programação

    Posted

    Ola Jair

    Qual e o problema que esta tendo com a balança ?

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  7. DLLs

    in Programação

    Posted

    As Dlls Bwcc.Dll e Ctl3D.Dll são chamadas internamente pelo windows e ou fivewin.

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  8. General Protection Fault at 000F:40BF

    in Programação

    Posted

    Ola RMarra, seja bem vindo ao forum. para uma melhor ajuda, poste a parte do seu prg para podermos ajuda-lo.

    Verifique se esta utilizando correntamente as chamadas para o RDD

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  9. erro C3031 na compilação com WIN98

    in Programação

    Posted

    Ola, segue a explicação do erro

    citação: C3031 Can't create OBJ

    Explanation: For some reason, the compiler cannot create an object

    file. This error can occur if you run out of directory entries or if

    you do not have create rights on a network drive.

    Action: Some suggestions to resolve the problem are:

    1. Check with your network administrator to see if you have create

    rights in the directory in which you are compiling.

    2. Compile using the /O option to write object (.OBJ) files to another

    drive or directory.

    id=quote>id=quote>

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  10. Clipper e xharbour

    in Programação

    Posted

    Ola seja bem vindo ao forum

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  11. Cor diferente apenas em uma coluna (listbox)

    in Programação

    Posted

    eu utilizo o twbrowse do Ceccarelli, que e um complemento para o do fivewin. Listbox faz a chamada ao TwBrowse

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  12. Tecla de atalho F2aF10 duvidas!!!!!!

    in Programação

    Posted

    Ola a tecla F10 e reservado no Fivewin pelo Window.Prg , caso deseje e trocar e recompilar a lib.

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  13. identificar windows

    in Programação

    Posted

    Ola Marcelo, onde arranjo a função IsWin64() a versão de minha classe TSAysInfo não tem. Tem como me mandar a sua.

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  14. Workshop windows XP

    in Programação

    Posted

    Ola simplesmente coloque o BWCC.DLL na pasta do windows\system32

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  15. BarLib. Problema resolvido.!!!

    in Programação

    Posted

    Ola Syda, vou mandar para seu email o prg que criei.

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  16. POSICIONAMENTO NO LISTBOX

    in Programação

    Posted

    Ola Evaldo, estive vendo o seu programa acima e veja que utiliza o set filter , mude para o CDX e vera que isto se torna mais facil. Veja o exemplo abaixo de parte meu programa

    citação:// principal

    REDEFINE LISTBOX oTbr[1] ;

    FIELDS IF( oTbr[1]:lSelect, hDedo, 0 ) ,;

    ClpGrupo->NomeEstaca ,;

    ClpGrupo->NumSerie ;

    HEADER hHeader ,;

    "Coletor" ,;

    "Nº Série" ;

    SIZES 30, 150, 150 ;

    COLORS CLR_BLACK, oPub:nClrBrowse1 ID 100 OF oDlg

    // aqui controla o segundo browse

    oTbr[1]:bChange := {|| cQualEstacao( oTbr, oSay ) }

    // browse com os itens

    REDEFINE LISTBOX oTbr[2] ;

    FIELDS ClpArquivo->Maquina ,;

    ClpArquivo->Tipo_Dev ,;

    MakeStr( ClpArquivo->Id_Io ) ;

    HEADER "Máquina" ,;

    "Tipo" ,;

    "Porta" ;

    SIZES 190, 140, 66 ;

    COLORS CLR_BLACK, oPub:nClrBrowse1 ID 101 OF oDlg

    // esta função altera o conteudo do 2º browse on line

    STATIC FUNCTION cQualEstacao( oTbr, oSay )

    DbSelectArea( "ClpArquivo" )

    ClpArquivo->( OrdScope( 0, ClpGrupo->NomeEstaca ) )

    ClpArquivo->( OrdScope( 1, ClpGrupo->NomeEstaca ) )

    ClpArquivo->( DbGoTop() )

    cMostraMaquina( oSay )

    oTbr[2]:Refresh()

    Return( Nil )

    id=quote>id=quote>

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  17. como colocar o "NAO" default na msgyesno ?

    in Programação

    Posted

    Desculpe entendi errado sua duvida,

    utilize a função msgnoyes que o "não" sera default

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  18. mapa do teclado !

    in Programação

    Posted

    Ola Luiz, veja o arquivo VKEY.CH que encontra em no seu diretorio do Fivewin na pasta include.

    Quando a desabilitar o ESC existe algumas opções para isso, mas precisaria informar melhor o que deseja.

    Exemplo -> não deixar que o EXC feche uma dialog; estiver em um get; listbox; etc..

    Tente deste modo e veja se resolve

    setKey( VK_ESC, Nil )

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  19. como colocar o "NAO" default na msgyesno ?

    in Programação

    Posted

    Ola Laurenti, o contéudo dos botões "SIM" ou "NÃO" depende do idioma do windows instalado em sua maquina.

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  20. Cor diferente apenas em uma coluna (listbox)

    in Programação

    Posted

    Ola, segue o um exemplo que utilizo em meus programas, a coluna creme e sempre a do indice ativo.

    citação:oTbr:bBkColor := {|nRow,nCol,nStyleLine| IF( nStyleLine == 0 .AND. nCol == Cli_TCol(), CLR_CREME, ) }

    *--------------------------------------------------------------------------

    STATIC FUNCTION Cli_TCol()

    *--------------------------------------------------------------------------

    LOCAL __nCol

    IF Upper( Cliente->( OrdSetFocus() ) ) = "SITUACAO" ; __nCol := 1

    ELSEIF Upper( Cliente->( OrdSetFocus() ) ) = "CODIGO" ; __nCol := 2

    ELSEIF Upper( Cliente->( OrdSetFocus() ) ) = "FANTASIA" ; __nCol := 3

    ELSEIF Upper( Cliente->( OrdSetFocus() ) ) = "VENDEDOR" ; __nCol := 4

    ELSEIF Upper( Cliente->( OrdSetFocus() ) ) = "ESTADO" ; __nCol := 5

    ELSEIF Upper( Cliente->( OrdSetFocus() ) ) = "REGIAO" ; __nCol := 7

    ELSEIF Upper( Cliente->( OrdSetFocus() ) ) = "ATIVIDADE"; __nCol := 8

    ENDIF

    Return( __nCol )

    id=quote>id=quote>

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  21. Fechar dialogo pelo "x"

    in Programação

    Posted

    Ola nçao tem nenhum api para este controle, a unica coisa que pode fazer e desabilitar esta opção no WS ou fazer como Maurilio disse

    LOCAL lEnd := .F.

    DEFINE DIALOG oScr RESOURCE ....

    REDEFINE BUTTON ID 300 OF oScr ACTION ( lEnd := .t., oScr:End() )

    ACTIVATE DIALOG oScr CENTERED VALID lEnd

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  22. BarLib. Problema resolvido.!!!

    in Programação

    Posted

    Ola Shirley voce tem os samples do BarLib, eu tenho uma função de etiquetas e funciona sem problemas

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  24. Urgente !! como trocar bmp numa tbitmap

    in Programação

    Posted

    Ola Laurenti, caso nãop funcione com o reload() substitua por LoadBitmap()

    LOCAL oBmp, hbitmap

    hBitmap := LoadBitmap( GetResources(), "Livre" )

    DEFINE DIALOG oDlg RESOURCE ..........

    REDEFINE BITMAP oBmp ID 200 OF oDlg RESOURCE hBitmap UPDATE

    ACTIVATE DIALOG oDlg

    Static Function retornobmp( oBmp, totm)

    if totm = 0

    oBmp:Reload( GetResources(), "Livre" )

    elseif totm # 0 .and. flag = "S"

    oBmp:Reload( GetResources(), "Fechando" )

    elseif totm = 0 .and. flag ="R"

    oBmp:Reload( GetResources(), "Reservada" )

    else

    oBmp:Reload( GetResources(), "Ocupada" )

    endif

    oBmp:Refresh()

    Return( Nil )

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

  25. POSICIONAMENTO NO LISTBOX

    in Programação

    Posted

    Poste parte do seu ´prg ´para que possamos ajuda-lo

    Onde você vê um obstáculo alguém vê o término da viagem e o outro vê uma chance de crescer.

    Elias Abrão Júnior

    Fone : (0**11) 5181-6909 São Paulo - SP

    eajunior.fw@terra.com.br

    xHarbour 0.99.0 - Fivewin 2.5 e xMate

×
×
  • Create New...