Jump to content
Fivewin Brasil

Jmsilva

Membros
  • Posts

    718
  • Joined

  • Last visited

  • Days Won

    14

Everything posted by Jmsilva

  1. Olá, pessoal... Gostaria de criar aplicativo embarcado usando SQLITE3 ao invés do DBF. Alguém conhece uma Classe para abrir e manipular um arquivo do SQLITE3. Também gostaria da opinião da comunidade indicado os prós e contra, e se vale a pena investir nesta opção. Já baixei do site a documentação mas não consegui progredi muito...em programação...mas parece que é uma boa opção. Nas pesquisas feita na internet vejo que empresas coceituada como Google e Adobe entre outras usam o SQLite3. Bem que poderia ter Classe da Fivewin com acesso nativo ao SQLITE3, assim como a classe DBF. Caraguatatuba/SP
  2. Olá, pessoal... Gostaria de criar aplicativo embarcado usando SQLITE3 ao invés do DBF. Alguém conhece uma Classe para abrir e manipular um arquivo do SQLITE3. Também gostaria da opinião da comunidade indicado os prós e contra, e se vale a pena investir nesta opção. Já baixei do site a documentação mas não consegui progredi muito...em programação...mas parece que é uma boa opção. Nas pesquisas feita na internet vejo que empresas coceituada como Google e Adobe entre outras usam o SQLite3. Bem que poderia ter Classe da Fivewin com acesso nativo ao SQLITE3, assim como a classe DBF. Caraguatatuba/SP
  3. Olá amigo! Veja se ajuda, no meu sistema pego qq imagem e redefino o tamanho dela assim: //...define objeto imagem... //...obtém o arquivo de imagem IF !Empty(gcFile) .and. File(gcFile) //tratamento oImg:LoadBmp( gcFile ) nX := 215 nY := 333 oImg:hBitmap := ResizeBmp( oImg:hBitmap, nX, nY, .T. ) //redimensiona oImg:lStretch := .T. oImg:Refresh() endif Caraguatatuba/sp Editado por - jmsilva on 05/11/2011 09:44:50
  4. Olá Ciacpd, Posso sim, como achar melhor....vou estar no congresso, lá poderei apresentar para quem interessar...ok Outra opção é vc me mandar um e-mail indicando a sua cidade que eu indico o local mais próximo para vc ver o funcionamento....esta aplicação é usadas em muitas cidades do estado de SP, derepente tem uma perto de vc... blz JMSilva
  5. Na realidade as funções é o de menos, legal e @ GET e o @ SAY, este faz diferença. Eu imagino o que vc passou, entre 2007 e 2008, pedi para a empresa compra a lib FW, para usar algumas funções, na época perguntei para Gilmer se isso era possível, ele não sabia me dizer, postei ninguém respondeu, depois de uns seis meses eu consegui...até hj não nada igual...... blz vou te mandar no seu email..... valeu....
  6. Eduardo, não tenho dois executáveis, tenho somente um, que do menu console pode acessar uma rotina de cadastro de clientes por exemplo no modo console e uma de cadastro de produto no modo visual GUI(fw), mas td compilado de uma só vez gerando um único executável.... Funciona blz.... Não uso dois executáveis, não compilo duas vezes (uma console e outra GUI. Vou passar o macete. Já q vc tentou: O macete é colocar a lib fivehc e fivehx após as libs do harbour (este conhecimento veio clipper), e não misturar funções console com GUI no mesmo PRG. Assim por exemplo a função alert() chamada do prg console, vai ser a janela DOS na cor vermelha, e se for chamada PRG GUI, que tem que ter #INCLUDE "FIVEWIN.CH" vai chamar a janela gráfica do windows..... Se vc estiver no encontro em Guarulhos eu mostro a minha aplicação..... JmSilva
  7. Caro Emotta e demais colegas Compilar GUI com modo console com FIVEWIN é possível sim e funciona muito bem...... A palavra impossível em informática é meio vaga..... Tem mais uma rotina gráfica pode chamar uma função modo console que funciona legal, é lógico que isto parece não ser util...mas... é possível..... JMSilva.
  8. Sugiro classe tsmtp, é simples, fácil e eficiente.... independe ter ou não outlook instalado. JMSILVA Caraguatatuba/SP
  9. Olha, veja se entendi..... Vc tem rotinas no modo console e gráfica (visual) e precisa juntar num mesmo sistema ? é isso... caso seja isso, talvez posso passar os caminho das pedras... Tenho um sistema que inicialmente foi escrito em Clipper, ao migrar para xHarbour com FW, tive que mesclar entre telas Console e Gráfica, funciona bem.....as novas rotinas são criadas em visual com a FW e as antigas vou mudando aos poucos, qdo todas tiverem no modo gráfico mudarei o menu que é console. ok.... xHarbour x FW Caraguatatuba/SP
  10. Olá, estou tentando gerar um teste em Linux, mas não estou conseguindo, pode ser qq exemplo. "Olá mundo" Gostaria de saber se alguém tem um passo a passo e qual a extensão do programa. Ex: No Windows, do .PRG, gera .C, que gera .OBJ que gera.EXE No Linux, do .PRG, gera .c, parei ai...... Obrigado! Editado por - jmsilva on 30/09/2011 17:37:41
  11. Olá, estou tentando gerar um teste em Linux, mas não estou conseguindo, pode ser qq exemplo. "Olá mundo" Gostaria de saber se alguém tem um passo a passo e qual a extensão do programa. Ex: No Windows, do .PRG, gera .C, que gera .OBJ que gera.EXE No Linux, do .PRG, gera .c, parei ai...... Obrigado! Editado por - jmsilva on 30/09/2011 17:37:41
  12. Qual o valor ? ou onde vejo.....
  13. Se precisar de uma pesquisa incrementada pode usar assim: cNOME := "*MICHELE*SANT*" ou cNOME := "MICHELE*SANT*" ou cNOME := "*JOS? ANTONIO*" If WildMatch(cNOME,cSTRING) //... EndIf xHarbour+Fivewin Caraguá/SP
  14. Sim funciona para pag 1 e 2, mas como é formulario continuo e pd ter mais de duas pag...ai já não funcionou legal, outra detalhe, qdo imprime um só não posiciona na posição para próximo. Veleu!
  15. Olá pessoal! Estou encontrando dificuldade em imprimir em form. continuo pré impresso, tamanho de 15 altura por 23 de largura +-. O problema que após imprimir o primeiro formulário, ao iniciar página seguinte com o oPrn:newpage(), ela pula segunda e vai para a terceira página, pulo é equivalente a folha A4, a impressora é uma LX 300. Já tentei alterar a cfg da impressora, tentei oPrn:PageHeight, oPrn:PaperLength. Será que tem solução com win32prn ? veja o codigo: oPrn := Win32Prn():New(cWINPRN) IF !oPrn:Create() .OR. !oPrn:StartDoc() //erro RETURN .F. ENDIF oPrn:LandScape := .F. oPrn:FormType := DMPAPER_USER //DMPAPER_A4 oPrn:PaperLength := 1500 //Value is * 1/10 of mm 1000=10cm oPrn:PaperWidth := 2300 // " " " " " " //oPrn:PageWidth := 2300 //638 //oPrn:PageHeight := 1500 //842 oPrn:Copies := 1 //imprime oPrn:NewPage() //imprime oPrn:EndDoc() oPrn:Destroy() RETURN NIL
  16. Olá pessoal! Estou encontrando dificuldade em imprimir em form. continuo pré impresso, tamanho de 15 altura por 23 de largura +-. O problema que após imprimir o primeiro formulário, ao iniciar página seguinte com o oPrn:newpage(), ela pula segunda e vai para a terceira página, pulo é equivalente a folha A4, a impressora é uma LX 300. Já tentei alterar a cfg da impressora, tentei oPrn:PageHeight, oPrn:PaperLength. Será que tem solução com win32prn ? veja o codigo: oPrn := Win32Prn():New(cWINPRN) IF !oPrn:Create() .OR. !oPrn:StartDoc() //erro RETURN .F. ENDIF oPrn:LandScape := .F. oPrn:FormType := DMPAPER_USER //DMPAPER_A4 oPrn:PaperLength := 1500 //Value is * 1/10 of mm 1000=10cm oPrn:PaperWidth := 2300 // " " " " " " //oPrn:PageWidth := 2300 //638 //oPrn:PageHeight := 1500 //842 oPrn:Copies := 1 //imprime oPrn:NewPage() //imprime oPrn:EndDoc() oPrn:Destroy() RETURN NIL
  17. 01 - Christiano A. Silveira - CTOAS - São Paulo - christiano.silveira@gmail.com 02 - Rubens Martins - rubensma - São Paulo - rumarti@gmail.com 03 - Luis Antonio da Paixao - Sao Sebastiao do Paraiso - Minas Gerais - luispaixao13@hotmail.com 04 - Luiz Roberto Servulo - Diadema - São Paulo - lrservulo@terra.com.br 05 - eduardo mazur - Sao Paulo 06 - Vailton Renato - São Paulo (vailtom@gmail.com) 07 - Charles - Palmas - TO integresis@brturbo.com.br 08 - Evandro G. de Paula - MG (imortal@skillnet.com.br) 09 - Kleyber Derick Batalha Ribeiro - Kleyber - São Luis - Ma - (kleyber.ribeiro@grupoferraz.com.br) 10 - vitor s.b.c. vitor.reis@terra.com.br 11 - Vagner Wirts (vwirts@terra.com.br) 12 - Gilmer Luiz Orro Tavares (gilmer@fivewin.com.br) 13 - Antenor Trufelli Filho (trufelli@uol.com.br) - São Paulo 14 - Eduardo Motta - eduardo@emotta.com.br 15 - EMPRESOFT(Luiz Fernando) - empresoft@globo.com 16 - Herberson Carlos Gontijo - hergon - BH/MG - (herberson@ponteware.com.br) 17 - Atenilto Marinho + um acompanhante -atenilto@itksoft.com.br 18 - Carlos Leÿen - decker - celeyendecker@hotmail.com 19 - Alexandre Zilves - azilves - RJ - azilves@hotmail.com 20 - Jackson Douglas Cavalcante Brito - RR - miragerr@osite.com.br 21 - Evaldo Wagner - Sao Paulo/SP - evaldowl@hotmail.com 22 - Geraldo Barbosa da Silva - lucgera@terra.com.br 23 - Sebastião de Oliveira Pessoa - tiaopessoa@hotmail.com 24 - Alexandre Serafini (Polirep) (hehehehehehehehee...) 25 - Valdir - Jundiaí/SP - valdir@fivesolution.com.br 26 - André E. dos Santos - BH/MG - (andre@ponteware.com.br) 27 - José Carlos R Leoner (jcleoner) - Guarulhos-SP - josecarlos@vimatec.com.br 28 - Antonio Lisboa Amorim neto - São Mateus/Ma-gabrieis(programadorcp80@hotmail.com 29 - José M. da Silva - Caraguatatuba/SP - saa50@bol.com.br
  18. Sou de Caraguatatuba/SP, tenho 42 anos, desde 2007 com FW.
  19. Olá! gostaria de saber se existe diferença entre os comandos INSERT INTO table campo1,campo2,... values ('dado1','dado2',...) é o INSERT INTO table SET campo1='dado1,campo2='dado2', ... A dúvida consiste que nas buscas na net, a maioria usa a primeira opção, existe algum benefício ou trata-se de uma forma convencional. Aproveitando, Criei um Banco para teste no SERVIDOR www.freesql.org, consigo criar a tabelas normalmente, qdo vou inserir dados retorna o erro: 1030 Got Error -1 From Storage Engine. Porém no localhost, funciona corretamente. Alguém sabe definir este erro ? JMSILVA xHARBOUR/SQLLIB/FIVEWIN.
  20. Olá! gostaria de saber se existe diferença entre os comandos INSERT INTO table campo1,campo2,... values ('dado1','dado2',...) é o INSERT INTO table SET campo1='dado1,campo2='dado2', ... A dúvida consiste que nas buscas na net, a maioria usa a primeira opção, existe algum benefício ou trata-se de uma forma convencional. Aproveitando, Criei um Banco para teste no SERVIDOR www.freesql.org, consigo criar a tabelas normalmente, qdo vou inserir dados retorna o erro: 1030 Got Error -1 From Storage Engine. Porém no localhost, funciona corretamente. Alguém sabe definir este erro ? JMSILVA xHARBOUR/SQLLIB/FIVEWIN.
  21. neste caso a variável não funciona....até uso a variável após ter criado o arquivo com o conteúdo sesejado, faço a leitura do arquivo com o MemoRead() e gravo no banco de dados. Se existisse esta possibilidade iria agilizar a aplicação, algo parecido com DBF virtual. Mas pesquisei e não tem nada na net a respeito. valeu!
  22. Perfeito, percebi isso depois.... valeu...
  23. Olá Pessoal! Estou procurando uma forma de criar um arquivo TXT na memoria ram, sem usar o HD, algo parecido com DbCreate("Mem:test", aTemp,, .T., "Tempo") e Hb_DbCreateTemp("Mem:temp", aTemp) que criam um DBF na memoria Então resolvi fazer o seguinte teste: nHand := FCreate("Mem:teste") FWrite(nHand,"Escrevendo texto na memoria") FClose(nHand) ? MemoRead("Mem:Teste")) ferase("Mem:Teste") //para eliminar = DBDROP() Funcionou. Mas gostaria da analise do pessoal, para saber se realmente está usando somente a memória...ou hd.... JMSILVA Caraguatatuba
  24. Olá Pessoal! Estou procurando uma forma de criar um arquivo TXT na memoria ram, sem usar o HD, algo parecido com DbCreate("Mem:test", aTemp,, .T., "Tempo") e Hb_DbCreateTemp("Mem:temp", aTemp) que criam um DBF na memoria Então resolvi fazer o seguinte teste: nHand := FCreate("Mem:teste") FWrite(nHand,"Escrevendo texto na memoria") FClose(nHand) ? MemoRead("Mem:Teste")) ferase("Mem:Teste") //para eliminar = DBDROP() Funcionou. Mas gostaria da analise do pessoal, para saber se realmente está usando somente a memória...ou hd.... JMSILVA Caraguatatuba
×
×
  • Create New...