kleyber

Ah, e mais uma coisinha: Apesar de eu ter sido o palestrante que menos falou (kkkkkkkkkkkkkkkkk) mas aprendi muito com a experiência de todos. Valeu, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Olá a todos, Realmente foi muuuuito bom o III Encontro. Uma experiência única de conhecer a uma boa parte dos desenvolvedores Fivewin e do que se pode fazer com esta maravilhosa ferramenta. Só me resta agradecer de coração ao Vagner Wirts, pelo apoio e hospedagem e por todos os demais os quais tive o imenso prazer de conhecê-los pessoalmente. Até o IV Encontro. Kleyber Derick Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

E aqui vai o meu: kleyberderick@hotmail.com Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Antes de virar briga de "torcida organizada", queria deixar bem claro o seguinte: - Eu uso o WS e não o Pelles pelo simples fato do WS ainda ter alguns recursos os quais o Pelles ainda tem problemas. Nunca disse que nunca usaria o Pelles. Sei que o WS não tem continuidade e pretendo mesmo usar o Pelles C. Mas em questão de desenvolvimento, não posso arriscar em perder tempo com algo que está quase ok e um outro que atende a 100% das minhas necessidades. Portanto, não sou do time do WS ou do Pelles C, sou daquele que (particularmente) me dá mais segurança na hora de criar/alterar/excluir minhas telas. PS.: Já tenho instalado aqui a última versão do Pelles C e experimentando. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Olá Marcos, Realmente o mestre em Workshop é o kapiaba, mas deixa eu tentar dirimir um pouco as tuas dúvidas: Perguntas 1 e 2: - Em cada dialog vc escolhe a opção EDIT AS TEXT e nas definições da dialog coloque 0x4L. Isto deve mudar a forma de visualização da dialog ( e dos controles ) para o formato que vc vai ver quando rodar o programa. Pergunta 3: - Na minha opinião acho qeu o TWbrowse e o TSbrowse fazem isto que vc deseja. Pergunta 4: - Como foi citado aqui, pegue a lib FWCTRLS que vai te dar uma boa gama de recursos adicionais. Pergunta 5: - Poderia sim, desde que o WS fosse uma IDE, mas infelizmente não é. O WS é apenas um gerador de telas e só. Mas ainda chegaremos lá... estamos à beira de surpresas... Espero ter ajudado. O restante das explicações fica com o Kapiaba... hehe Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Márcio, citação:Bom dia a todos!!!gostaria de saber se é rápido o acesso multi-usuário com SQL via ODBC ou SQLLIB. id=quote>id=quote> Bom, vou reportar minha experiência (até agora!). Considerando que até o momento a SQLLIB trabalha somente com o MYSQL, fiz vários testes acessando o MYSQL via ODBC, ADO e com a SQLLIB. Os resultados que obtive foram os seguintes: - Com ODBC: Funciona, porém muuuito lento - Com ADO: Um pouco mais rápido que ODBC, porém ainda fica lento - Com SQLLIB: Muito mais rápido que os 2 primeiros Isto tudo se tratando de MYSQL. Testei a conexão via ADO com PostgreSQL e funciona parecido com o MYSQL. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Kapiaba, Assino embaixo o que disseste. Eu ainda uso o WS exatamente por não ter nenhum bug e crio minhas telas normalmente, gero o RC, uso o RC2DLL32.BAT e pronto. Quando o PELLES stiver 100%, migro também, sem problema nenhum. Abraço Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Marciano, Com TOTAL e ABSOLUTA certeza, via SQLLIB é muuuito mais rápido. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Olá Alessandro, Vis seu post somente agora e gostaria de te sugerir uma coisinha: @ 00.5,01.0 GET oObjs[25] VAR oGets[25] PICTURE "9999" SIZE 16,8 VALID (lRetBus:=Visualiza(oGets[26],"Tra","nom",{"Cód.","Nome da Transportadora"},{"cod","nom"},{50,280},"Transportadora"),Seleciona(lRetBus,3),.T.id=red>) OF oFld:aDialogs[4] Faça isso no teu get dentro do folder. Acho que pode funcionar. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Vitor, citação:nao sei se vc sabe, mas o Linhares no ano passado, ele foi convidado ao II encontro, e pelo que tive de informaçoes, ele só viria se nós pagassemos as despesas de hospedagem, passagem etc etc.. agora pergunto, quem é o cliente???? id=quote>id=quote> Bom, eu gostaria de expressar minha opinião sobre isto. É lógico que seria ÓTIMO que o Antonio Linares (e não Linhares) pudesse vir ao Brasil custeando tudo do próprio bolso. Só que ele não vai fazer isso. Aliás quanto ao que você perguntou, nós somos sim clientes dele, pois quem começou o desenvolvimento do produto foi ele (mesmo que nós o estejamos aperfeiçoando) e aí com base nisto eu pergunto: Quando vc faz um software para um cliente, e ele precisa depois que vc faça uma explanação geral do sistema que você desenvolveu para todos os funcionários da empresa, quem é que banca a sua ida até a cidade e até a empresa? Eu acredito que você concorda comigo que é o cliente quem paga. É bem verdade que adquirimos o FWH aqui com o Gilmer, mas a Virtual Object é a empresa que revende o FWH aqui no Brasil. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Apesar de algumas tentativas de softwares de terceiros, mas com o Clipper realmente fica difícil... Com o xHarbour funciona muito bem. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Gilberto, Tem a função nRamdom() MsgInfo( nRandom( 100 ) ) // retorna qualquer número na faixa de 0 a 100 Abraço Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Alessandro, Ao invés de m6:=CTOD(" / / "), tente m6:=CTOD(space(8)) e não precisa definir a picture. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

José Carlos, Bom eu não uso o Pelles, mas no WS a solução seria definir cada botão cmo OWNER DRAW, ao invés de PUSH BUTTON. Acredito que o Pelles tenha algo relacionado com isto. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Olá Shirley, 1. Qual Lib você utiliza para conectar com a base de dados SQL? A.SQLLIB 2. Qual o motivo da escolha acima? (pode escolher mais de um motivo) A. Velocidade; B. Facilidade; C. Custo D. Estabilidade; E. Suporte E isto tudo considerando o que o Gilmer e o José Carlos colocaram também, sobre acessos a outras bases de dados e sobre custo. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Realmente Mário, esse é o problema. Vc precisa ter a versão da SQLLIB para o xHarbour correspondente. Nesse caso, já que vc tem a versão comercial, fale com o Vailton Renato que ele enviará a lib para essa versão do xHarbour, com certeza. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Eduardo, Poderias nos mostrar o código onde está dando o erro? Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Mário, citação:USE "articulo.dbf" ALIAS clientes // Aqui acontece o erro id=quote>id=quote>Experimente assim: USE articulo ALIAS clientes Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Alexandre, Meus sinceros pêsames. Sei que realmente a dor da perda é muito grande, mas Deus vai te ajudar a superá-la, com certeza. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Christiano, citação:Preciso iniciar o Browse com variavis em branco pra depois salvar no banco... id=quote>id=quote> E por que não usar o browse diretamente com o dbf? Assim você poderia ter o dbf em branco e ir editando diretamente sobre ele, através do browse. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Kapi, citação:VERY THANKS FRIEND... VOY INTENTAR, Y REPORTO-TE. THANKS SO MUCH GRANDE MARANHENSE! CIDADE LUZ... SHOW() DE BOLA... IN BREVE, EU NA ÃREA DE SAINT LUIS! YEAH! id=quote>id=quote>Ok, my friend... quando vieres, me avise. Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Grande Kapi, Claro que tem jeito. Só que vc vai ter que usar as funções de baixo nível tipo FCreate(), FOpen(), FSave() e FClose() pra isto. Segue um exemplo: narq:=fcreate("BACK.BAT") nreg:="00"+chr(01)+"N"+chr(01)+dtoc(date())+chr(01)+time()+chr(13)+chr(10) fwrite(narq,nreg) fclose(narq) Abraço, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

Kapi, Aí vai: //Ler total do cupom DLL32 FUNCTION BmSubTotal( SubTotal AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_SubTotal" LIB xDll //Ler número do caixa DLL32 FUNCTION BmNumeroCx( NumeroCaixa AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_NumeroCaixa" LIB xDll //Ler configuração arredondamento/truncamento DLL32 FUNCTION BmVerArred( Arredonda AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_VerificaTruncamento" LIB xDll //Ativa arredondamento DLL32 FUNCTION BmLigArred( ) AS LONG PASCAL ; FROM "Bematech_FI_ProgramaArredondamento" LIB xDll //Ler data do movimento DLL32 FUNCTION BmDtMovto ( DtMovto AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_DataMovimento" LIB xDll //Ler flag fiscal da impressora DLL32 FUNCTION BmFlagFiscal( @FlagFiscal AS PTR ) AS LONG PASCAL ; FROM "Bematech_FI_FlagsFiscais" LIB xDll //Emite leitura X DLL32 FUNCTION BmLeituraX( ) AS LONG PASCAL ; FROM "Bematech_FI_LeituraX" LIB xDll //Emite redução Z DLL32 FUNCTION BmReducaoZ( Dt AS LPSTR, Hs AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_ReducaoZ" LIB xDll //Ler data e hora da impressora DLL32 FUNCTION BmDtHora ( Dt AS LPSTR, Hs AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_DataHoraImpressora" LIB xDll //Faz abertura do dia DLL32 FUNCTION BmAbreDia ( Vl AS LPSTR, Fr AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_AberturaDoDia" LIB xDll //Abre cupom fiscal DLL32 FUNCTION BmAbreCup ( Cgc AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_AbreCupom" LIB xDll //Verifica se tem papel DLL32 FUNCTION BmVerPapel( @Linhas AS PTR ) AS LONG PASCAL ; FROM "Bematech_FI_MonitoramentoPapel" LIB xDll //Verifica se tem impressora ligada DLL32 FUNCTION BmPrintLig( ) AS LONG PASCAL ; FROM "Bematech_FI_VerificaImpressoraLigada" LIB xDll //Cancela cupom fiscal DLL32 FUNCTION BmCanCupom( ) AS LONG PASCAL ; FROM "Bematech_FI_CancelaCupom" LIB xDll //Cancela último ítem do cupom DLL32 FUNCTION BmCancItem( ) AS LONG PASCAL ; FROM "Bematech_FI_CancelaItemAnterior" LIB xDll //Abre a gaveta DLL32 FUNCTION BmAbreGav ( ) AS LONG PASCAL ; FROM "Bematech_FI_AcionaGaveta" LIB xDll //Ler número do cupom DLL32 FUNCTION BmNumCupom( Cupom AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_NumeroCupom" LIB xDll //Emite leitura da memória fiscal por data DLL32 FUNCTION BmMemFiscD( In AS LPSTR, Fi AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_LeituraMemoriaFiscalData" LIB xDll //Emite leitura da memória fiscal por reduções DLL32 FUNCTION BmMemFiscR( In AS LPSTR, Fi AS LPSTR ) AS LONG PASCAL ; FROM "Bematech_FI_LeituraMemoriaFiscalReducao" LIB xDll //Emite cupom gerencial DLL32 FUNCTION BmCpGerAbr( Texto AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_RelatorioGerencial" LIB xDll //Fecha cupom gerencial DLL32 FUNCTION BmCpGerFec( ) AS LONG PASCAL ; FROM "Bematech_FI_FechaRelatorioGerencial" LIB xDll //Verifica status da gaveta DLL32 FUNCTION BmStGaveta( @nStatus AS PTR ) AS LONG PASCAL ; FROM "Bematech_FI_VerificaEstadoGaveta" LIB xDll //Abre cupom adicional DLL32 FUNCTION BmCupAdAbr( FormaPgto AS STRING,; Valor AS STRING,; Cupom AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_AbreComprovanteNaoFiscalVinculado" LIB xDll //Imprime cupom não fiscal vinculado DLL32 FUNCTION BmCupAdUsa( Texto AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_UsaComprovanteNaoFiscalVinculado" LIB xDll //Fecha cupom não fiscal DLL32 FUNCTION BmCupAdFec( ) AS LONG PASCAL ; FROM "Bematech_FI_FechaComprovanteNaoFiscalVinculado" LIB xDll //Vende ítem DLL32 FUNCTION BmVendItem( Codigo AS STRING,; Descricao AS STRING,; Aliquota AS STRING,; TpQte AS STRING,; Quantid AS STRING,; Decimal AS 7 ,; ValUnit AS STRING,; TpDesc AS STRING,; ValDesc AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_VendeItem" LIB xDll //Efetua Formas de Pagamento DLL32 FUNCTION BmFormasPag( FormaPgto AS STRING,; ValorPago AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_EfetuaFormaPagamento" LIB xDll //Inicia Fechamento cupom DLL32 FUNCTION BmIniFecCup( Acrescimo AS STRING,; TipoAcresc AS STRING,; ValorAcresc AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_IniciaFechamentoCupom" LIB xDll //Termina Fechamento cupom DLL32 FUNCTION BmTerFecCup( Mensagem AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_TerminaFechamentoCupom" LIB xDll //Fecha cupom com uma forma de pagamento somente DLL32 FUNCTION BmFechaCup( FormaPgto AS STRING,; Acrescimo AS STRING,; TipoAcresc AS STRING,; ValorAcresc AS STRING,; ValorPago AS STRING,; Mensagem AS STRING ) AS LONG PASCAL ; FROM "Bematech_FI_FechaCupom" LIB xDll //Verifica status do gerenciador padrão DLL32 FUNCTION BmTfStatus( Operacao AS LPSTR ) AS LONG PASCAL FROM "Bematech_FITEF_Status" LIB xDll Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores

citação:Obrigado Kleyber, mas para de me chamar de Gilberto (rsss) id=quote>id=quote>hehehehehehe Falow, Geraldo. Não sei onde eu li Gilberto... hehehe Abraços, Kleyber Derick Clipper 5.2b Lib 5.3c + FW 2.1c, xHarbour 0.99.4 + FWH 2.5 Visite São Luís - MA A Ilha dos Amores