Luiz Arruda (ICO)

Boa Tarde. Bem... acho que não daria certo, pois no começo demorava ainda mais iniciar a impressão e liberar a maquina, fui na config da impressora e desabilitei a opção de Spoll e mandei "imprimir direto para a impressora", depois disso passou a demorar esses miseros 5 secs. porém a menina que opera o micro aceitou esperar os 5 segundinhos, até porque eu falei que não teria jeito. Pois O cara que vendeu e instalou as máquinas(3, mudaram tudo),uma na mesa do patrão, uma na mesa do motorista que chega correndo e tira uma ficha se o patrão estiver no telefone a operdora não no escritorio, e uma na mesa da operadora(faz tudo), e o cara sabendo que o Win 7 não tem suporte para lx-300, ao invés de comprar uma pecinha de R$ 80,00, preferiu fazer uma gambiarra na impressora para conectar o cabo USB(eu sou phodão, e cobrou por isso). ai dei minha opinião... "Não tem jeito", mexeram na impressora rsrsrsrsr!! Obrigado pela dica, vou testar em outras situações. mas por enquanto vou deixar como está.. Valeu Kapi.. \o/ Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

citação:Formatado fica mais bonito!! (risos) *----------------------------------------------------------* FUNCTION BuildPDF( aFiles ) // NCONVERT.EXE para transformar EMF em PDF *----------------------------------------------------------* Local x Local cTexto := "" Local cTxtFile := "" Local cDestino := oaNetName("_","PDF") Local cPastaPDF:= iif(Right(pDado,1)="\", pDado, pDado+"\") + "PDF" if !lIsDir( cPastaPDF ) // se não existir a pasta cria primeiro a pasta \PDF if DirMake( cPastaPDF ) != 0 cPastaPDF := pDado endif endif cPastaPDF := iif(Right(cPastaPDF,1)="\", cPastaPDF, cPastaPDF+"\") cDestino := cPastaPDF + Right(cDestino, Len(cDestino)-AT("_",cDestino)+1) cTxtFile := Left(cDestino,Len(cDestino)-3) + "TXT" If Len(aFiles) = 1 cString:="nConvert -o " + cDestino + " -quiet -out pdf -c 4 " + aFiles[1] Else For x=1 To Len(aFiles) cTexto := cTexto + aFiles[x] + CRLF Next MemoWrit(cTxtFile, cTexto) cString:="nConvert -multi -o " + cDestino + " -quiet -out pdf -c 4 -l "+cTxtFile Endif MsgRun("Aguarde a conversão da listagem num arquivo PDF !","Estou criando o arquivo: "+cDestino, {|| WAITRUN(cString,0 ) } ) FnErase(cTxtFile) Return(cDestino) id=code>id=code>Oscar Ribeiroid=size4> OASyS Informáticaid=blue>id=size4> Fwh+xHb1.0.0+BCC55+WorkShopid=size1> id=quote>id=quote>Bom diaid=size4> OScar... Vc pederia me dizer como aplicar isso em um PRG ? onde encontro e como usar esse tar de nConvert.exe ? Obrigado .. Abraços.. \o/ Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

E além de alterar a Prev32.dll com o editor de recursos, altere também a Rpreview.prg e compile junto com sua aplicação Pelo isso dava certo antes... http://is.gd/hAvnRT Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

citação:.... que pode-se fazer contrarios temporarios, com isso nao existem cargos efetivos, contrata-se um profissional a "preço de banana", coloca a trabalhar por 3 meses manda embora, chama outro por mais tres meses, manda embora, chama outro ... e nao tem fim ! Quando um funcionario temporario termina o seu contrato este sai com uma "mao na frente e outra atras" pois nao tem direito algum ! Por isso eu venho me revoltando com este tipo de atividade. id=quote>id=quote>Todo trabalhador tem direitos, mesmo se trabalhar 01, 02 ou 03 meses. Se trabalhar 01 mes, terá direito aos dias trabalhados e a 1/12 de férias e 1/12 s/13º salario, se e assim sucessivamente, além do saque do FGTS que é obrigação do empregador depositar mesmo o trabalhador estando sob contrato de experiencia por 90 dias, não existe e nunca existiu contrato de experiencia de três meses sem direitos. E a prática de trocar empregado a cada 90 dias só desqualifica a própria empresa, que ao invés de ter um profissional de confiança, sempre terá um cara novato a frente dos negócios. Logo empresas sérias disputam os bons profissionais no tapa. Pena que algumas empresas só descobrem isso depois de quebrar a cara. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

A principio deu certo.. só que demora uns 5 segundos para iniciar a impressão e liberar o sistema.. mesmo usando o PrintBuftime=1 mas é melhor que mudar o código é fazer tudo de novo né.. \o/ Agora vou alterar os outros PRGs que uso a velha forma Clipper para impressoras matriciais... Obrigado.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Nunca me dei bem com instaladores, principalmente com o INNO SETUP 5 agora que conheci esse AQUI "meus pobremas se-acabaram-se" Em um cartão de 2gb tô levando um monte de porcaria pra casa, e tudo como instalador.. sem contar minhas pastas do trabalho que levo quase todo dia pra casa a noite, ou para trabalhar ou para fazer algumas alterações no programa. É tão simples que até de minhas fotos eu crio um instalador pra transporta-las.. Muito Bom mesmo Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Nunca me dei bem com instaladores, principalmente com o INNO SETUP 5 agora que conheci esse AQUI "meus pobremas se-acabaram-se" Em um cartão de 2gb tô levando um monte de porcaria pra casa, e tudo como instalador.. sem contar minhas pastas do trabalho que levo quase todo dia pra casa a noite, ou para trabalhar ou para fazer algumas alterações no programa. É tão simples que até de minhas fotos eu crio um instalador pra transporta-las.. Muito Bom mesmo Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

A Loira quer porque quer um par de sapatos de jacaré legítimos, mas como o preço nas lojas está proibitivo, ela resolve caçar seu próprio jacaré. O dono da loja de sapatos explica que é muito difícil e perigoso, mas ela não quer saber. Enfim, ele dá as orientações e deseja-lhe boa sorte. No dia seguinte, o dono da loja resolve ver como a loira está se saindo. Ele vai até o lugar que ele indicou e vê a loira dentro do pântano com um revólver na mão. A poucos metros dela está vindo um jacaré enorme já com a boca aberta. Ela dá um tiro e mata o bicho. Em seguida ela o arrasta até a margem onde estão pelo menos uns 30 jacarés mortos. O dono da loja olha para esta cena espantado e fica atônito ao verificar o que está ocorrendo. A loira com muita dificuldade tira o jacaré morto da água e exclama: - Que droga! Mais um sem sapatos! id=code>id=code> Tenham um excelente fim de semana. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

citação:Ok thanks, esta fera já etá em meu faebook: https://www.facebook.com/patrickmast abs João Santos - São Paulo. joao@pleno.com.br Fone: (11) 3106-2832 / 5150-7341 - TIM https://www.facebook.com/kapiaba FWH 2.7 - xHARBOUR WorkShop.Exe id=quote>id=quote>Pois é né biba... foi de lá que tirei o link acima... rsrsrsr!!! Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Eu achei isso. - Novo esquema de bloqueio; DBFLOCK_CL53EXT (4) e DBFLOCK_XHB64 (5) Ao usar o esquema de bloqueio 4, um bloqueio compartilhado será emulado. Este esquema é muito útil em sistemas que não têm isso. Embora não existam problemas com xHarbour, ser cauteloso quando utilizando este esquema com uma aplicação Clipper em rede ambiente. Note que o tamanho do arquivo é de até 4GB que faz este esquema de bloqueio o melhor para uso com um sistema de arquivos FAT32. Também pode ser utilizado para DBFNTX e DBFCDX. Quando o uso de arquivos longos (maior do que 4 GB), usar o esquema 5. Este bloqueio esquema não precisam de apoio de arquivo longo no OS. Note-se que ele não reduz o tamanho do ficheiro. id=code>id=code>A matéria total e em Inglês foi escrita por ESTE CARA AQUI Creio que ele saberá responder com mais detalhes. Abraços \o/ Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 09/08/2012 17:33:03

xiiiiiii a coisa ficou séria gabrieis@bol.com.br id=red> Também está voltando... óóóóó e agora quem poderá nos ajudar Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 09/08/2012 17:14:22

programadorcp80@hotmail.com.br id=blue> Este email não é válido, os envios estão voltando. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

A algum tempo atrás fiz alguns exemplos para outras pessoas veja se serve para vc ter uma idéia. No primeiro exemplo renomeia o Exemplo.EX_id=red> para exemplo.exeid=blue> e veja funcionando. tava esquecendo, Tá lá no seu email Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 09/08/2012 16:55:33

Veja se clareia a cuca. (a tradução saiu 1/2 embolada + dá pra entender). EXAMPLES #define DBFLOCK_CL53 2 REQUEST DBFCDX Function Main() Local aStruct := { { "FIELD1", "C", 30, 0 }, ; { "FIELD2", "N", 10, 2 }} RddSetDefault("DBFCDX") SET DBFLOCKSCHEME TO DBFLOCK_CL53 DbCreate( "test", aStruct, "DBFCDX") USE Test SHARED APPEND BLANK IF !NETERR() FIELD1->"This is a test" FIELD2->100 "Append operation completed" COMMIT ELSE ? "Append operation failed" ENDIF RETU NIL id=code>id=code>Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Desde os principios dos tempos eu vejo dizer que usar FONTE COURIER NEW, vai ser igual a impressão do DOS, mas isso nunca acontece, a impressão com tPrinter e a COURIER NEW em impressoras matriciais serão impressas graficamente do mesmo jeito que são as impressão do Word. e não com aquela velocidade e picote do Clipper... e ainda deixam as impressões nessas impressoras distorcidas e feias quando se usa CHR(15) por exemplo... A noite eu vejo se o ProinterFileRaw() vai resolver o problema e depois reporto... \o/ Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Bom dia.. Seria interessante vc mostrar como está fazendo. Assim ficaria mais fácil ajudar... Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

NÃOid=size6>, o Programa não é console, mas o PRG do relátorio é o unico que não carrega a FiveWin.ch Porque ? R)-Porque se eu carregar a fivewin.ch, terei que usar tDosPrn que não atende as minhas necessidades e nem faz o que eu fazia no Clipper, e muitos relatorios que rodam em impressoras matriciais, tem a mesma aparencia desde 1985 O PDFCreator também não atendeu as necessidades porque disso também, uma simples ficha mensal de empregado virou um fiofó de gato sem fim.. Com a tPrinter eu faço, mas os clientes aqui do escritorio tem aquele velho problema de desembolsar valores, e com as mais de 800 fichas por mês fica mais barato fazer em formulário continuo. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Bem pessoal.. Obrigado por tentar ajudar. O programa em questão é uma cópia que deixo nas casas dos "patrões,fazendas", nada oficial, o principal fica aqui no escritorio onde agora a pouco fiz um teste usando a PrinterFileRaw() como mostrado NESTE TÓPICO AQUI pelo SHARK, já que eu ainda uso o antigo código @Prow()+1,10 Say "Texto" E funcionou, o PrinterFileraw mandou o TXT para a impressora sem problemas, Só que aqui é XP, será que terei problemas com o Win 7 ? PS:Só a noite poderei ir na casa do maledeto pra testar, mas se alguém já fez isso sem problemas eu gostaria de algum relato pra preparar o espirito. vou testar as outras dicar também, + 1 X Obrigado Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Bom dia Pessoal. Meus problemas com impressão começaram. Desde o FW-Clipper que uso o mesmo código para imprimir meus relatórios, agora com xharbour 1.2.1 tudo ia bem até ontem após entrar um micro com Win 7 32 id=blue> com entrada USBid=blue> na jogada, a visualização na tela é perfeita mas na hora de dar o "Imprimir" o micro trava e não sai nada na impressora. Isso está ocorrendo com impressoras matriciais,Jato e Laser, todas com saida USBid=blue> Alguém já passou por isso ? Desde já obrigado.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Bom dia Pessoal. Meus problemas com impressão começaram. Desde o FW-Clipper que uso o mesmo código para imprimir meus relatórios, agora com xharbour 1.2.1 tudo ia bem até ontem após entrar um micro com Win 7 32 id=blue> com entrada USBid=blue> na jogada, a visualização na tela é perfeita mas na hora de dar o "Imprimir" o micro trava e não sai nada na impressora. Isso está ocorrendo com impressoras matriciais,Jato e Laser, todas com saida USBid=blue> Alguém já passou por isso ? Desde já obrigado.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Boa Tarde.. Antigamente Eu fazia isso com a Toolbar No samples tem vários exemplos com ela. Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

A repórter vai entrevistar o gaúcho ao vivo e começa a gravar ... - Boa noite, senhor. Nós estamos aqui para ouvir sua opinião. O que o senhor atribui a razão principal das vacas terem apanhado a chamada doença da vaca louca ? O gaúcho olhou para a moça e respondeu : - Tu sabia que o touro "come" a vaca somente uma vez por ano ? A repórter, visivelmente embaraçada, fala : - Bem, senhor, eu não sabia... informação interessante, mas o que isso tem a ver com a doença? - Tu sabia que as vacas são ordenhadas quatro vez por dia ? - Senhor, novamente agradeço a informação, mas porque não vamos diretamente ao ponto central da minha pergunta: -a que o senhor atribui o fenômeno da vaca louca ? O guasca visivelmente irritado, responde : - Mas tchê! Imagine se eu ficasse te bulinando as tetas quatro vez por dia, e só trepasse uma vez por ano. Tu também não ficaria louca ??? id=code>id=code>Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

o SITE sofreu AVC ? Já tentou este Aqui ?, Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 16/07/2012 15:20:55

Boa Tarde.. Se vc. está usando recursos RC ou RES, basta colocar o icone como o 1º da lista de icones no arquivo RC/RES que já será o icone do aplicativo.. Se o icone for externo, coloque ele na mesma pasta do seu executável para ficar mais facil.. Se Nome do Arquivo = MEUICONE.ICO No PRG faz Define icon oIco file("c:\PASTA\Meuicone.ico") Define Window oWnd iCon oIco id=code>id=code>Pronto.. Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc.

Chamado às pressas no meio da noite, o médico chega todo esbaforido na casa de um empresário, cuja esposa estava acamada. - Com licença - diz ele, expulsando todo mundo do quarto. - Preciso ficar só, com a paciente! Apreensivo o marido fica do lado de fora do quarto! Ouve alguns barulhos estranhos e depois de alguns minutos enfia a cabeça pela porta e pergunta ao marido: - O senhor tem um alicate? O marido vai buscar um alicate. A porta torna a se fechar. Mais barulho estranhos e alguns minutos depois, novamente a cabeça do médico aparece na soleira da porta: - O senhor tem uma chave de fenda? Espantado o marido vai buscar a chave de fenda. Passam-se mais alguns minutos: - O senhor tem um serrote? E o marido, desesperado: - Serrote? O caso dela é tão grave assim? - Ainda não sei - sentencia o carniceiro. - Não consigo abrir a minha maleta! ------------------------------------------------------ Um vendedor de sabão em pó vai fazer uma demonstração em domicílio: - Boa tarde, minha senhora. Estamos lançando uma nova marca de sabão em pó, e eu gostaria de fazer uma demonstração. A senhora me permite? - Sim, claro. Por favor, entre e venha ate o tanque. - Com licença. Veja esta camisa: a senhora põe um pouquinho do nosso sabão, esfrega, esfrega, esfrega! Que cheirinho gostoso! Sinta só (e coloca a camisa próxima do nariz dela). - Realmente, ficou muito cheirosa.... - Agora essa calça de seu marido: põe-se um pouquinho de sabão, esfrega, esfrega, esfrega e hum! Que cheirinho gostoso! Não contente,o vendedor continua: - E essa calcinha da senhora: Um pouco de sabão, esfrega, esfrega.. Hummmm...esfrega, esfrega, esfrega esfrega esfrega esfrega, humm!! esfrega esfrega, esfrega,esfrega esfrega,esfrega,esfrega esfrega,esfrega,esfrega,esfrega,esfrega, esfrega,esfrega esfrega, haaa!! esfrega,esfrega..... esfrega id=code>id=code> Tenham um ótimo fim de semana... Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc. Editado por - ico on 06/07/2012 11:57:19