kapiaba

RC: FATAL ERROR RW1012: COULD NOT FIND RCPP.EXE Esta Faltando este executável. Todos os arquivos do BRC.EXE, devem obrigatóriamente estar no diretório do \WORKSHOP\BIN... Peça a alguém para te enviar: RCPP.EXE Verifique também, se não tem virus em sua máquina. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Mesmo quando o MULTIPLE LINE do GET está Ligado? Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Mude a lógica, nao use o while... Compre o livro do Villian, que tenho certeza, tem a solução... Trave o Registro com DbrLock() Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Ola. Veja se te ajuda. http://www.dbwide.com.ar/local-cgi/counter/filecount2.cgi?docs/chart2fx_doc.zip http://www.dbwide.com.ar/local-cgi/counter/filecount2.cgi?sources/tgraph3.zip http://www.dbwide.com.ar/local-cgi/counter/filecount2.cgi?sources/tgraph3-exe.zip //---------------------------------------------------------------------------// Impresión/Preview Graficas Chart2Fx Víctor Manuel Tomás Díaz En el manejo de las graficas , yo uso el control chart2fx , y los resultados son muy buenos. Para generar una impresión con este control tienes 3 opciones. Opcion 1 El control contiene una funcion dentro de la barra de herramientas que genera una impresión tamaño carta. Y solo tienes dos opciones de impresion: Vertical o Horizontal. En lo particular esa opción no me agrada , por que te limita el que no puedas definir el tamaño de la impresión. Opcion 2 Puedes usar la funcion ChartPaint() esta funcion te permite enviar a la impresora la grafica , con la coordenadas que tu decidas. Esta es la opcion que mas uso. Pero , siempre hay un pero , no puedes hacer un preview al documento. El codigo sería asi: DLL Function Chart_Paint( hWnd AS _INT, hDC AS _INT, nLeft AS _INT, nTop AS _INT, nRight AS _INT,; nBottom AS _INT, bPrintMode AS BOOL, I AS LONG) AS VOID PASCAL LIB "CHART2FX.VBX" Function aImprimir(aoVbx) Local oPrn, oPen, nRow, cPag, nLin Local nTop , nLeft,nBot,nRight Print oPrn Name "Imprimir gráficas" If !Empty(oPrn:hDc) // Cancelada la Impresi¢n por el usuario Define Font oFnt Name "Arial" Size 0,-12 BOLD Of oPrn Define Pen oPen Width 2 oPrn:Rebuild() oPrn:SetLandScape() // apaisado [ ] oPrn:SetPage(1) // Letter 8 1/2 x 11 in Carta PAGE oPrn:Say( oFnt:nHeight, oFnt:nWidth * 5,"Víctor Manuel Tomás Díaz",oFnt) oPrn:Line( oFnt:nHeight * 4.5, oFnt:nWidth * 5, oFnt:nHeight *4.5, oPrn:nHorzRes(), oPen ) nTop := 5 ; nLeft := 1 ; nBot := 10 ; nRight := 21 oPrn:Cmtr2Pix( @nTop, @nLeft ) oPrn:Cmtr2Pix( @nBot, @nRight ) Chart_Paint( aoVbx[1]:hWnd, oPrn:hDCOut, nLeft, nTop, nRight, nBot,1, 0 ) ENDPAGE Endif EndPrint oPrn:End() oFnt:End() oPen:End() Return Nil Opcion 3 Hay usuarios que antes de imprimir la grafica desean hacerle un Preview , ¿ para que ? , ni idea , pero en fin , usuarios son usuarios :-(. Y como podemos hacer un preview de un gráfico generado con Chart2Fx , bueno , es muy fácil , aquí vamos a usar una propiedad del control. Propiedad Export, esta propiedad nos permite enviar la imagen de nuestro gráfico a un formato .WMF y listo el pollo , más fácíl no podía ser, ahora lo único que hay que hacer es cargar el .wmf a la impresora, el código es el siguiente: En una opcion de menu : #DEFINE CHART_METAFILE 3 oVbx:Export[CHART_METAFILE] := cGetFile("*.WMF") Y esta funcion : /* Función PrintWmf() Autor : Víctor Manuel Tomás Díaz Fecha : 9-Ene-2002 Coloca en el Preview un Metafile ( WMF ) */ FUNCTION PrintWmf() LOCAL oPrn, cArchivoWMF := cGetFile( "*.wmf", "Seleccione un archivo" ) PRINTER oPrn PREVIEW PAGE oPrn:ImportWMF( cArchivoWMF, .f. ) ENDPAGE ENDPRINT RETURN ( Nil ) Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Sandro... Tamos começando a nos entender! Que beleza! Não fique bravo comigo não rapaz! Estava só de 'zueira', nem tive o prazer de te conhecer ainda. Se você quiser, eu peço DESCULPAS A COMUNIDADE sem nenhum problema. É com pessoas como você, que eu aprendo! Parabéns por me ensinar o caminho. Quem dera o Sr. Vagner fosse humilde como você... Você viu? Ele ameaçou meu nick. Isto é justo? Vá dando as coordenadas. Uma hora, a gente se entende! Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Alexandre Pereira ps. Galera, pelo amor de Deus usem outro tópico para estas discussões. Eu quase não posto e quando posto o meu tópico é utilizado pra outras finalidades , ok? Um grande abraço e um Feliz Ano Novo a todos. Mas sem brigas falow? Sr. Alexandre... Nunca um Tópico seu deu tanto IBOPE, e ainda por cima, eu e o Sandro, Mantemos sua pergunta no TOPO. Uma hora vem a solução. Humildemente Sandro... Obrigado! Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Kapiaba -> OK Sandro, você tem razão. Eu só respondi alguns tópicos não técnicos por ter notado um tom irônico em algumas respostas. Me desculpe pelo ocorrido. Você me Desculpa? Diga que sim? Vai... Diga que sim... Pronto Sandro... Era Isso? Se não for, explique melhor. Tá mais calmo? Vamos tomar umas cervejinhas, para tudo acabar em PIZZA? Você tá muito magoado? O que foi que aconteceu? Nossa, você é muito bravo! Olha o tamanho do IBOPE que você DEU! Você não é FRACO não. Quer continuar a 'brincar', antes que o Sr. Vagner Exclua meu ? Tô na área... Caiu é Penalty! hahahaha. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Extressados, estão voces, eu não ataquei ninguem, quem puxou o assunto, foi o Sr. Sandro. Resposta Extressada, é dele. Eu tomo marcujinha, por isso, vivo calmo. Sandro, relaxe... Faça como quiser... Eu não ligo. Fico feliz, em parecer com o João... Sr. Vagner... Ordens superiores, são ordens superiores, cumpra-a. Como em nenhum código da advocacia geral da união me obriga a fazer o que eu não quero, fique a vontade para fazer o seu trabalho, e arque com as consequencias jurídicas(hahaha). Desestresse Sandro. Você tá muito nervoso. Loucura. Viva o Interior. Não leve tão a sério tudo. Olha o coração. Abraços. Querendo 'brincar' Sandro, tamos ai. Com este ou com um , eu posso com você. Não leve para o pessoal, como disse o Sr. Vagner. Quem tá com medo? Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Puxa... Gostei deste MODERADOR. Cara bacana... Legal. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Baixe este gerador de programas, pegue o arquivo.dbf que voce utiliza, ele gerará o fonte como voce deseja. Só nao sei se funcionara com five 1.9.2. Porque voce nao atualiza sua versao. Telefone da VIRTUAL OBJECTS na Página Principal - Rodapé. http://www.dbwide.com.ar/local-cgi/counter/filecount2.cgi?files/genfw.zip Dúvidas, pergunte. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Ó você errado Sandro... Com este teu jeitinho 'caipira', vem com este papo furado de INTIMO... Intimo WisCambau... No dia que eu for INTIMO de Homem, eu prefiro me matar. Poste o tópico, e deixe de papo furado, se o tópico for importante, de uso geral, poste logo e não espere para amanhã, o que você pode fazer hoje. Eu não sei do que voce tá falando, e já que atiçou minha curiosidade, vamos ver do que se trata... Por que você está tão DESESPERADO com isto? O que foi que aconteceu para voce está tão ABALADO? Ele te MAGOOU? Conte-me! Desabafe! Abra o JOGO! Abra seu coração. JOGUE COMIGO! Apesar de você não ser meu 'ALVO', já que me 'chamou' pra 'brincar', vamos lá tô na área. Caiu... É Penalty! Venha! Jogue! Poste pelo menos a parte em que te MAGOOU! Vamos ver e DISCUTIR o assunto! Como vou avisa-lo, se não sei onde ele está? Ele sempre entra no forum! Espere, JANEIRO termina LOGO! E como só estou fazendo um 'favor' para ele, JOGUE COMIGO. Quem sabe eu não possa te ajudar? Amigos são para essas horas. NÃO CORRA! Sr. Alexandre Pereira... Porque não posta o Problema? Diga se resolveu! Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Olá. Procure pelos tópicos abaixo que você achará sua resposta. Ou simplesmente, entre no formulário de busca, e digite EASYDIALOG. Tela no XP NAO ALTERAR DIMENSÃO DAS DIALONGS CONFIGURAÇÃO XP Resolução de Vídeo (640 x 480) Como configurar monitor Dimensões de Telas ? EASYDIALOG PARA WORKSHOP 4.5 Mas, eu creio, que não funcionará com o Five 1.9.2e. Porque voce não atualiza a sua versão? Assim, poderá usar a EASYDIALOG tranquilamente. Demorou... Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE Editado por - kapiaba on 30/12/2004 09:02:20

Ola. Experimente fazer assim: IF !NETERR() IF !DBRLOCK() MsgInfo( "Arquivo ARQUIVO.DBF Não Disponivel", "Informação" ) ELSE // O que voce quer fazer.... /* APPEND BLANK REPLACE CODIGO WITH cCodigo UNLOCK ALL COMMIT */ ENDIF ELSE MsgInfo( "Arquivo ARQUIVO.DBF Não Pode Ser Aberto", ; "Erro de Abertura" ) ENDIF // Mude para o seu estilo... // Ps.: Se você tiver o LIVRO DO VILIAN, de uma olhada nele, que voce vai entender como travar o arquivo. Abraços. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Demorou Sandro... Poste sim. Eu também quero ver. Jogue duro com ele. É assim que eu gosto, como não sou garoto de recados, mesmo porque, eu sou BAD BOY e não OFFICE BOY(hahaha), poste o que voce quiser postar, e aguarde ele voltar em JANEIRO do ano que vem. Não manjo tanto de Five ainda, o pouco que sei, aprendi com ele, e outros amigos. Espero contar com sua experiencia, quando eu precisar. No mais, fique a vontade. Obrigado e FELIZ ANO NOVO. Ps.: Se você quiser 'brincar' comigo também, tô na área. Se 'cair', é penalty. Amigos, são para essas horas. Abraços. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Se desejar uma ajudinha, estou as ordens, envie módulos que retornam este erro junto o seu LNK e RMK em meu email, que eu dou uma olhada, nao esqueça a DLL que voce abre... Abraços. kapiaba@brfree.com.br 50 Mb de espaço, Grátis. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Valeu Gilmer. Gostei da Resposta. Inteligencia para você, é bobagem. Parabéns por ter visão de 'FUTURO'. Com certeza, com a ajuda dos MAIS INTELIGENTES, o LAY-OUT ficará maravilhoso. Obrigado! Abraços. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Olá. MULTIPLE LINE -> Ligado. WS. REDEFINE BTNGET oGet1 VAR SuaVariavel PICTURE "@K!" ; ID 39 OF oFld:aDialogs[ 1 ] ; RESOURCE "FOLDER16" ; FONT oFont UPDATE ; COLOR CLR_BLACK, CLR_HCYAN Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Olá Sr. Vagner... O João não trabalha mais nesta empresa... Ele não falou para o Senhor? Agora ele está em SANTO AMARO... Apesar de meu amigo, graças à Deus ele foi EMBORA! O Cara 'PIOLHO'. Agora, EU REINO ABSOLUTO AQUI. E pelo que me consta, ele está de FÉRIAS, sujeitinho preguiçoso. hahaha. Tudo de bom Sr. Vagner. MAS QUE FICOU HORRIVEL, FICOU! COISA DE VELHO MESMO! os ADMINISTRADORES e o WebMaster, devem ser pré-históricos. Vamos evoluir GENTE! http://www.puertosur.org/ Isso sim é BONITO! Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE Editado por - kapiaba on 28/12/2004 16:27:46

Senhor WebMaster: Se liga... Dá uma olhadinha aqui: http://www.puertosur.org/ Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

ola. Experimente mudar o fonte do MSGRUN.PRG como segue abaixo e incorpore ao seu RMK e LNK. ACTIVATE DIALOG oDlg NOWAIT ; ON PAINT oDlg:Say( 1, 0, xPadC( oDlg:cMsg, nWidth ) ) Provavelmente assim, voce pode trabalhar tranquilo, desde que nao esteja indexando os BANCOS DE DADOS. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Tá LOUCO! Vocês já não fazem NADA O ANO INTEIRO, e chega nesta EPOCA, ainda vão tirar férias? Vão trabalhar! hahaha. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Olá. Talvez, se o senhor for mais claro, de para entender melhor... Que tal mostrar o fato através de um exemplinho? Se desejar, poste aqui ou nas DICAS, assim, o senhor aproveita e testa a 'LINDA' página principal... Brincadeira mano, ninguém entende nada, não funciona nada. Coisa de gente VELHA! Vamos modernizar ISTO! Deem uma 'OLHADA' na página da PUERTOSUR aquilo sim é ESPETACULAR! Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

CREDO! O Visual Anterior, era lindo. A única coisa que ficou realmente bonito foi... Virtual Object Informática Ltda. Fone/Fax: (15)3231-6840 Mas é meu gosto pessoal... Deixa pra lá... A idéia deve ter partido de 'algum gênio'. 'Parabéns' 'Gênio'... Super 'Avançado'. CREDO! Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Verifique se voce nao esqueceu de fazer a declaração abaixo em algum módulo. Se voce nao declarou, retorna este erro. #Include "FiveWin.Ch" Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE

Experimente, depois de salvar a variavel, limpá-la. ex: Variavel := Space(XX) Ou use o Refresh() Abraços. Bad Boy - The HuntsMan Of E.A.J. Automação Comercial. kapiaba@brfree.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE