Jump to content
Fivewin Brasil

matheush

Membros
  • Posts

    14
  • Joined

  • Last visited

matheush's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. Essa Funçao abaixo no getprintdc ao confirmar ou retornar no Ok ou cancelar , o programa é finalizado , obs: uso a metro do fivewin Function FuncImp() Local oradio1,oDlgimp,lsave:=.f.,oprn2 public TipoRel:="M" nordimp=1 Sysrefresh() retornoimp=.t. if GetPrintDC(oWndPrin)==0 retornoimp=.f. return retornoimp endif printer oprn tipimp:=oprn:nLogPixelx() if tipimp<300 TipoRel:="M" elseif tipimp>=299 TipoRel:="J" endif * if msgyesno("Confirma impressora escolhida para iniciar impressão !!!","Pergunta") retornoimp=.t. * else * retornoimp=.f. * endif Sysrefresh() return retornoimp id=code>id=code>No Demais agradeço Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  2. Essa Funçao abaixo no getprintdc ao confirmar ou retornar no Ok ou cancelar , o programa é finalizado , obs: uso a metro do fivewin Function FuncImp() Local oradio1,oDlgimp,lsave:=.f.,oprn2 public TipoRel:="M" nordimp=1 Sysrefresh() retornoimp=.t. if GetPrintDC(oWndPrin)==0 retornoimp=.f. return retornoimp endif printer oprn tipimp:=oprn:nLogPixelx() if tipimp<300 TipoRel:="M" elseif tipimp>=299 TipoRel:="J" endif * if msgyesno("Confirma impressora escolhida para iniciar impressão !!!","Pergunta") retornoimp=.t. * else * retornoimp=.f. * endif Sysrefresh() return retornoimp id=code>id=code>No Demais agradeço Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  3. Pessoaaaaaaal preciso de ajuda tenho esse codigo porem o erro existe quando uso macrosubstituição #include "fivewin.ch" #xtranslate ~ => ! #xtranslate ^ => .AND. #xtranslate V => .or. #xtranslate &'<->' => if ( a=b , .t. , .f. ) #xtranslate -> => if ( b , if ( a , .t. , .t.) , if ( a , .f. , .t. )) Function main() local vpropos local ntamanh,nlinha local vetor_propos:={} ,vetor_letras:={},vetor_operador:={} , Vetor_Resposta:={} vElement:="" vpropos:="c ^ d" c:=.t. d:=.t. if &vpropos MsgInfo("1") endif id=code>id=code> e funciona ao usar if c ^ d msginfo('1') endif alguma ideia Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  4. Pessoaaaaaaal preciso de ajuda tenho esse codigo porem o erro existe quando uso macrosubstituição #include "fivewin.ch" #xtranslate ~ => ! #xtranslate ^ => .AND. #xtranslate V => .or. #xtranslate &'<->' => if ( a=b , .t. , .f. ) #xtranslate -> => if ( b , if ( a , .t. , .t.) , if ( a , .f. , .t. )) Function main() local vpropos local ntamanh,nlinha local vetor_propos:={} ,vetor_letras:={},vetor_operador:={} , Vetor_Resposta:={} vElement:="" vpropos:="c ^ d" c:=.t. d:=.t. if &vpropos MsgInfo("1") endif id=code>id=code> e funciona ao usar if c ^ d msginfo('1') endif alguma ideia Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  5. \\suporte\Install\EditPlus3 Na pasta do suporte tem esse que compara pdf e outros Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  6. agradeço a todos pela participaçao , vou ser mais claro na verdade "transparent" . Ja procurei na internet e estou por dentro porem queria saber como voces amigos usam para abrir suas tabelas com mysql Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  7. como abrir uma tabela com a sqllib .ou Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  8. Preciso de uma Luz para migrar meu programa para mysql ja conseguir desenvolver um exe que abre dbf's de uma pasta , cria e migra os dados do Dbf para o MySql ... Pelo que li nos exemplos da Lib ela abre normalmente a tabela quando uso a sintaxe "Use empresas" do mesmo modo como é no Dbf o comando RddSetDefault ja foi dado no mais agradeço Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  9. Preciso de uma Luz para migrar meu programa para mysql ja conseguir desenvolver um exe que abre dbf's de uma pasta , cria e migra os dados do Dbf para o MySql ... Pelo que li nos exemplos da Lib ela abre normalmente a tabela quando uso a sintaxe "Use empresas" do mesmo modo como é no Dbf o comando RddSetDefault ja foi dado no mais agradeço Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  10. A Todos Que Colaboraram obrigado , na verdade exite algum erro no fivewin que esta dando esse erro , se alguem passou por uma situação igual relatada acima por favor compartilhe o antes falado como dica ja estava sendo feito e os erros continuavam Obrigado Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  11. Ai Esta o Erro ( Arquivo Txt) Application =========== Path and name: C:\Fiscal\mFisc.EXE (32 bits) Size: 3,046,912 bytes Time from start: 0 hours 0 mins 23 secs Error occurred at: 08/11/2011, 17:18:07 Error description: Error BASE/1002 Alias does not exist: RCLIENTE Stack Calls =========== Called from: => DBUSEAREA(0) Called from: RelSai.prg => RREGISAI(128) Called from: mFisc.PRG => (b)BUILDMENU(164) Called from: MENU.PRG => TMENU:COMMAND(0) Called from: WINDOW.PRG => TWINDOW:COMMAND(0) Called from: => TWINDOW:HANDLEEVENT(0) Called from: WINDOW.PRG => _FWH(0) Called from: => WINRUN(0) Called from: WINDOW.PRG => TWINDOW:ACTIVATE(0) Called from: mFisc.PRG => MAIN(43) Variables in use ================ Procedure Type Value ========================== DBUSEAREA Param 1: L .T. Param 2: C "DBFCDX" Param 3: C ".\EMP006\rcliente.dbf" Param 4: C "cli" Param 5: L .T. Param 6: L .F. Param 7: U Param 8: U Local 1: U Local 2: U Local 3: N 0 RREGISAI (b)BUILDMENU Param 1: O Class: TMENUITEM TMENU:COMMAND Param 1: N 20067 Local 1: O Class: TMENU Local 2: O Class: TMENUITEM TWINDOW:COMMAND Param 1: N 20067 Param 2: N 0 Local 1: O Class: TWINDOW Local 2: N 0 Local 3: N 20067 Local 4: N 0 TWINDOW:HANDLEEVENT Param 1: N 273 Param 2: N 20067 Param 3: N 0 _FWH Param 1: N 0 Param 2: N 273 Param 3: N 20067 Param 4: N 0 Param 5: N 1 Local 1: O Class: TWINDOW WINRUN Param 1: N 721764 TWINDOW:ACTIVATE Param 1: C "MAXIMIZED" Param 2: U Param 3: U Param 4: U Param 5: U Param 6: B {|| ... } Param 7: U Param 8: U Param 9: U Param 10: U Param 11: U Param 12: U Param 13: U Param 14: U Param 15: U Param 16: U Param 17: B {|| ... } Param 18: U Param 19: U Local 1: O Class: TWINDOW Local 2: U Local 3: U MAIN Linked RDDs =========== DBF DBFFPT DBFBLOB DBFCDX DBFNTX DataBases in use ================ 1: => CLI RddName: DBFCDX ============================== RecNo RecCount BOF EOF 7782 7781 .T. .T. Indexes in use TagName Relations in use Outra Duvida quando crio a tabela , digo se ela usara o cdx , ja uso o request dbfcdx no inicio do programa Obrigado Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  12. Amigo, Erciley Junior, voce me deu uma luz para testar , uso minhas tabelas com dbfcdx utilizei o dbusearea() para abrir a tabela com o dbfcdx e deu o msm erro , porem quando usei com o dbfntx a tabela passou normal , poderia me dar alguma explicaçao se possivel , o cdx da tabela é criado , e tambem outra duvida , como o dbusearea sabe qual é o ntx da tabela , é mesma logica do cdx , se usa tag's , obrigado Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  13. Bem Pessoal , passando pelo seguinte problema ao abrir uma tabela uso a seguinte sintax use (temp+'rcliente') alias cli quando compilo da o seguinte erro Error BASE/1002 Alias does not exist: RCLIENTE Obs: a Variavel temp é o local onde a tabela esta ex : '.\emp006\' Se Alguem Poder Dar Uma Luz , a tabela esta na pasta ela existe , qnd tiro o alias cli ela abre normalmente Obrigado Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
  14. Bem Pessoal , passando pelo seguinte problema ao abrir uma tabela uso a seguinte sintax use (temp+'rcliente') alias cli quando compilo da o seguinte erro Error BASE/1002 Alias does not exist: RCLIENTE Obs: a Variavel temp é o local onde a tabela esta ex : '.\emp006\' Se Alguem Poder Dar Uma Luz , a tabela esta na pasta ela existe , qnd tiro o alias cli ela abre normalmente Obrigado Matheus Farias - @D_MatheusFarias d.matheusfarias@hotmail.com FHW 10.11/8.04 xHabour 1.1/1.2 Pelles C 6.5 DBFCDX
×
×
  • Create New...