[delphi-br] Impressão com TPrinter
Salve galera, to com um problema na impressão aqui. Se alguem puder me ajudar, vai me tirar uma dor de cabeça daquelas Quando uso impressão com TPrinter, é uma rotina de impressão de boletos. Ele só imprime até o terceiro boleto em qualquer impressora. Verifiquei que, se eu gerar um arquio bmp com o Canvas, todos os boletos saem corretamente. Tentei imprimir pelo Paint (O arquivo gerado) sai corretamente. Desta forma soube que não era problema nem da rotina de impressão, na qual gera o arquivo corretamente, nem do driver ou do Sistema operacional, pois imprime corretamenete. Tentei gerar o arquivo e imprimir o bmp por dentro do delphi, mas o resultado é exatamente o mesmo. Só imprime 3 boletos. Estes 3 boletos são exatamente o tamanho de uma página A4. Não sei se estes fatos tem relação. Alem destes, fiz muitos testes aqui. E no geral, não consigo imprimir no Delphi usando TPrinter(Com geradores de relatório como por exemplo o QuickReport, funciona perfeitamente) mais de 3 boletos se eu não der um NewPage. O Caso é que, se eu der um NewPage, ele vai pular o tamanho de uma página, consequentemente, pular 3 boletos e imprimir errado. o incrível é que nem uma impressão simples como a no código abaixo fuinciona var ct : integer; begin printer.BeginDoc; for ct := 0 to 1000 do printer.Canvas.TextOut(50, 50*ct, IntToStr(ct)); printer.EndDoc; este código só imprime até um determinado número dependendo da resolução da impressora, mas sempre no tamanho de 1 página a4. O mais incrível, é que a mesma rotina funcionava a alguns dias atraz. alguem tem alguma idéia. Abraços a todos Daniel A. Bastos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] FileExists
se o problema for em uma maquina isolada, pode ser permissão de rede. Em 06/12/05, eduardo.sic [EMAIL PROTECTED] escreveu: fileexists tem segredo não: if FileExists( 'F:\App\Login.bat' ) then ShowMessage( 'Arquivo de Login encontrado' ) else ShowMessage( 'Não é possível achar o aquivo' ); O problema pode ser a unidade, ja tive casos onde a unidade tava ok, mas nao conseguia nem achar nem carregar o arquivo.. hj eu sempre uso o caminho da rede no lugar de unidades mapeadas ex: FileOpen( '\\servidor\app\login.ini' ); nunca mais tive problemas desse tipo. = De:Uirá Tupinambás Lima [EMAIL PROTECTED] Para:delphi-br@yahoogrupos.com.br Assunto:[delphi-br] FileExists Pessoal, Estou com uma dúvida aqui, o comando FileExists do Delphi funciona para um drive mapeado na rede pois estou fazendo uns testes aqui e não estou obtendo sucesso, que outro comando posso utilizar para esse caso ? Qualquer ajuda será bem vinda Grato Uirá [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM http://br.groups.yahoo.com/group/delphi-br/messa ges [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.groups.yahoo.com/group/delphi-br/ http://br.yahoo.com/info/utos.html -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] FileExists
Em 06/12/05, Uirá Tupinambás Lima[EMAIL PROTECTED] escreveu: Pessoal, Estou com uma dúvida aqui, o comando FileExists do Delphi funciona para um drive mapeado na rede pois estou fazendo uns testes aqui e não estou obtendo sucesso, que outro comando posso utilizar para esse caso ? Mapeamento de rede podem estar como desconectada ate o primeiro uso, conforme foi setado no tipo de login. Tenho casos em que o usuario tem que abrir o Explorer, clicar em F: e depois usar o programa que acessa F: Seria mais seguro, se possivel, usar a sugestao do eduardo. Alencar --- Philler Informatica Ltda Jose Alencar Philereno ICQ 13458351 Messenger/Skype (voz): alencar Feliz aquele que transfere o que sabe e aprende o que ensina Cora Coralina -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Fw: RELAX!!!...As melhores de 2005
Francisco, tirando que é OFF-Topic, a lista de contatos que veio junto tah massa heim.. auHAUhuaUAHUhauHUAHUhau imagina mandar um emial daqueles pra esses contatos todos, Vanessa, Renata, Nina, Gislene, Kátia, Lízia, carla... abração kra... e boa sorte nos outros emails CC. - Original Message - From: Francisco To: (*)Priscila - Arilu Calcados(S) Cc: Zelio ; VANESSA OLIVEIRA SANTOS ; Vanessa ; Valmir ; Topmaq ; Renata - Arilu ; Raio Filho ; Nina ; Napinho ; najila carvalho ; musica Denilson ; Mol SM - Peças ; Mol SM - Gerente Pós Vendas - (Osmar) ; Mol SM - Gerente de Vendas -(Edinaldo Castro) ; Mol SM - Financeiro ; Mol SM - Contabilidade ; Mol Nova Venecia - Vendas ; Mol BSF - Gerente Geral - Novo Celular: (27) 8119 9747 ; Mol BSF - Financeiro - Karla ; MILENA RAMOS ; MAX - LI, EU TE AMO MUTO ; Maria ; Marcosta ; Márcio Vilic (T)6781-8972 (mp)9145-9563 ; marcio ; luiz ; Logos ; Lizia ; Linsmar ; Kátia Maia da Silva ; Junior ; Jorge Loiro ; Jailson-BA (mp) 0**73 9191-7327 ; Jack Arilu ; Heron (Topmaq Automação Comercial - 0**71 3261-5000) ; Heber Guirra - Supermercados Familia ; Heber ; Gislene ; FRIGOBOM ; [EMAIL PROTECTED] ; FireBase ; Familia Souza Romano ; Eletrosantos ; Ednei ; eden stephane ; Diego ; Depart. de Informática ; delphi-br@yahoogrupos.com.br ; Daniel Simoes de Ameida ; danarf ; CNH - CONTEMPLAÇÃO - KATU ; carlossilvapm ; Carlinhos ; carla santos ; [EMAIL PROTECTED] ; Audicon - José Antonio ; Antonio Lomba ; Alessandra - Brasilia ; ALBERTOfoxsom-instrumentosmusicais Porto Seguro ; (li) Eddie (#)(h) Sent: Tuesday, December 06, 2005 9:58 PM Subject: [delphi-br] Fw: RELAX!!!...As melhores de 2005 Subject: ENC: RELAX!!!...As melhores de 2005 As melhores frases do ano de 2005 Homem é como vassoura: sem o pau, não serve pra nada. Os homens mentiriam muito menos se as mulheres fizessem menos perguntas. Marido é igual a menstruação: Quando chega, incomoda; quando atrasa, preocupa. ...Se dinheiro falasse, o meu diria tchau... Aquele que, ao longo de todo o dia: é ativo como uma abelha, forte como um touro, trabalha que nem um cavalo, e que ao fim da tarde se sente cansado que nem um cão... deveria consultar um veterinário. é bem provável que seja um grande burro . A calcinha não é a melhor coisa do mundo, mas está bem perto. O homem é um ser tão dependente que até pra ser corno precisa da ajuda da mulher! Estar junto não é estar ao lado, mas é estar dentro. A mulher está sempre ao lado do homem, para o que der e vier; já o homem, está sempre ao lado da mulher que vier e der. Se sua mulher pedir mais liberdade, compre uma corda mais comprida... Se um dia sentir um enorme vazio dentro de você . Vá comer, que é fome!!... Todo homem tem a fantasia de fazer sexo com duas mulheres ao mesmo tempo. As mulheres deveriam gostar da idéia. Pelo menos, teriam com quem conversar depois que ele pegasse no sono. Se for dirigir, não beba. Se for beber, me chama. Mulher feia é que nem muro alto, primeiro dá um medo, mas depois a gente acaba trepando. Quando lhe atirarem uma pedra, faça dela um degrau e suba... Só depois, quando tiver uma visão plena de toda a área, pegue outra pedra, mire bem e acerte o crânio do filho da puta que lhe atirou a primeira. Sabe o que é a Meia Idade? É a altura da vida em que o trabalho já não dá prazer e o prazer começa a dar trabalho !!! Sempre que possível, converse com um saco de cimento. Nessa vida só devemos acreditar no que é concreto! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Impressão com TPrinter
Daniel, bom dia! Você já tentou configurar o tamanho do formulário de boleto em propriedades da impressora, direto no Windows. Tenta utilizar um modelo que você possa informar as medidas do formulario. Para mim, esta foi a solução deste mesmo problema. Abraços. José de Moura --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos [EMAIL PROTECTED] escreveu Salve galera, to com um problema na impressão aqui. Se alguem puder me ajudar, vai me tirar uma dor de cabeça daquelas Quando uso impressão com TPrinter, é uma rotina de impressão de boletos. Ele só imprime até o terceiro boleto em qualquer impressora. Verifiquei que, se eu gerar um arquio bmp com o Canvas, todos os boletos saem corretamente. Tentei imprimir pelo Paint (O arquivo gerado) sai corretamente. Desta forma soube que não era problema nem da rotina de impressão, na qual gera o arquivo corretamente, nem do driver ou do Sistema operacional, pois imprime corretamenete. Tentei gerar o arquivo e imprimir o bmp por dentro do delphi, mas o resultado é exatamente o mesmo. Só imprime 3 boletos. Estes 3 boletos são exatamente o tamanho de uma página A4. Não sei se estes fatos tem relação. Alem destes, fiz muitos testes aqui. E no geral, não consigo imprimir no Delphi usando TPrinter(Com geradores de relatório como por exemplo o QuickReport, funciona perfeitamente) mais de 3 boletos se eu não der um NewPage. O Caso é que, se eu der um NewPage, ele vai pular o tamanho de uma página, consequentemente, pular 3 boletos e imprimir errado. o incrível é que nem uma impressão simples como a no código abaixo fuinciona var ct : integer; begin printer.BeginDoc; for ct := 0 to 1000 do printer.Canvas.TextOut(50, 50*ct, IntToStr(ct)); printer.EndDoc; este código só imprime até um determinado número dependendo da resolução da impressora, mas sempre no tamanho de 1 página a4. O mais incrível, é que a mesma rotina funcionava a alguns dias atraz. alguem tem alguma idéia. Abraços a todos Daniel A. Bastos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RE: [delphi-br] procedure ou function?
Não é possível. O Delphi não é como o Clipper que permite executar uma expressão que está em uma string e automaticamente determinar que se trata de uma procedure ou function. Resumindo, o Delphi(especificamente Object Pascal) não possui macro-substituição. Sds. From: Francisco [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] procedure ou function? Date: Tue, 6 Dec 2005 22:09:40 -0300 pessoal, tenho uma tabela com o nome de algumas funcoes e procedures dentro de um arquivo dbf. gostaria de saber se e possivel.. executar a procedure pelo nome que esta la dentro do dbf. tipo: pegar o nome e executar? e possivel? se sim como? desde ja agradeço. - Original Message - From: Uirá Tupinambás Lima [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 06, 2005 10:59 AM Subject: [delphi-br] FileExists Pessoal, Estou com uma dúvida aqui, o comando FileExists do Delphi funciona para um drive mapeado na rede pois estou fazendo uns testes aqui e não estou obtendo sucesso, que outro comando posso utilizar para esse caso ? Qualquer ajuda será bem vinda Grato Uirá [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos _ MSN Messenger: converse com os seus amigos online. http://messenger.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RE: [delphi-br] FileExists
Só pra esclarecer. FileExists() não é 'comando', é uma função! Sds. From: Uirá Tupinambás Lima [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] FileExists Date: Tue, 6 Dec 2005 10:59:11 -0300 Pessoal, Estou com uma dúvida aqui, o comando FileExists do Delphi funciona para um drive mapeado na rede pois estou fazendo uns testes aqui e não estou obtendo sucesso, que outro comando posso utilizar para esse caso ? Qualquer ajuda será bem vinda Grato Uirá [As partes desta mensagem que não continham texto foram removidas] _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] ACEITO SUGESTÕES
Grato pela sugestão... E é possível eu conectar diretamente desta estação remota no meu servidor? Que componentes eu teria que utilizar? Murillo Proença --- Em delphi-br@yahoogrupos.com.br, Walter Alves Chagas Junior [EMAIL PROTECTED] escreveu Você pode usar um FTP pra isto: Na maquina onde seu programa vai rodar, ele grava os dados no BD lá e de tempos em tempos ele gera uns arquivos TXT com os dados recem gravados. Coloque nela um outro programinha de conexão FTP ou implemente esta rotina no seu sistema. Este programinha tem o objetivo de enviar os TXT´s gerados para a maquina aonde estará o servidor. Na maquina aonde fica o servidor, deverá ter um programinha que pegue os TXT chegados, e importá-los pra base de dados oficial. Eu já fiz um, mas usava a paleta de componentes FASTNET, se eu tiver ele lá em casa aínda te mando. Mas não dou certeza sequer de portabilidade para o Indy nao. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi- [EMAIL PROTECTED] nome de Murillo Proença Enviada em: segunda-feira, 5 de dezembro de 2005 16:26 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] ACEITO SUGESTÕES Boa tarde, tenho um novo projeto, onde tenho que fazer uma rotina que vai rodar localmente em uma máquina e gravar informações em um BD qualquer. De tempos em tempos eu tenho que pegar as informações desta máquina e fazer uma atualização em um servidor. O servidor é Oracle que não está em rede com esta máquina, eles apenas possuem conexão com a Internet. Eu gostaria de saber o que utilizar para fazer esta conexão/atualização, quais componentes, quais serviços que precisam estar rodando no servidor. Lembrando que o servidor já alimenta um outro sistema (de outra empresa) com 600 computadores conectados. Qualquer sugestão tá valendo. Grato Murillo Proença -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erro XML: A página XML n ão pode ser exibida ,
Pessoal, acho que descobri o problema. Existe um campo onde guardo o Status. Este Status pode assumir 3 valores: Ativo, Inativo e Invalido. Quando o Status era Inválido eu estava gravando esta string com acento, ou seja Status = Inválido. Depois passei a gravar a string sem o acento, ou seja Status = Invalido e daí funcionou tudo muito bem, consegui abrir o arquivo (com os dois cliques) sem que me aparecesse a mensagem de erro. Agora quero saber como faço para gravar o status Invalido com acento... Mauro Mauro Domingues Junior [EMAIL PROTECTED] escreveu: Olá, Desenvolvi um programa que utiliza uma base de dados XML. Bom, os dados ficam perfeitamente gravados nos arquivos XML. O problema é que não consigo abrir(dando dois cliques no arquivo) alguns destes arquivos. Aparece a seguinte mensagem: A página XML não pode ser exibida Não é possível exibir a entrada XML usando a folha de estilos XSL. Corrija o erro e clique no botão Atualizar ou tente novamente mais tarde Caractere inválido encontrado no texto. Erro ao processar o recurso 'file:///C:/ProUtil7/NetMonitor/Logs/Invalidos/051206.x... ?xml version=1.0 standalone=yes? DATAPACKET Version=2.0METADATAFIELDSFIELD attrna... O engraçado é que o programa lê e grava nos arquivos XML, mas quando quero abrir estes arquivos manualmente(dando dois cliques) aparece a tal mensagem de erro. Outra coisa: isto só acontece com alguns arquivos, mas não sei pq, já q todos são criados da mesma maneira. O que fazer? - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. - Yahoo! doce lar. Faça do Yahoo! sua homepage. - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erra na conexão do Interbase - URGENTE
tem um uma propriedade que vc usa para fazer a localização do arquivo, ela mostra o caminho logico. Mas agora eu não estou lembrado qual é. E alguma coisa com app.path. Senão me engano. Fabiano Boatto [EMAIL PROTECTED] escreveu: servidor:caminho (real) não utilize caminho mapeado que dá problema vlw Fabiano - Original Message - From: Alosi To: Sent: Tuesday, December 06, 2005 9:04 AM Subject: Re: [delphi-br] Erra na conexão do Interbase - URGENTE Não seria: servidor:caminho do banco? Jose:d:\driverbr\rbrwin\bancoib\gerencia\gerencia.rbr - Original Message - From: Leandro Carbonera To: Cc: FireBase Sent: Tuesday, December 06, 2005 9:25 AM Subject: [delphi-br] Erra na conexão do Interbase - URGENTE E ai pessoal tudo bem.. Estou com um pipinão. estou implantando um sistema desenvolvido em Delphi6.0 e Interbase 6.0 em um cliente novo. Ele tem 5 Pc's (1 servidor, 2 pc normal e 2 notebook) todos com windows xp professional. Em algums deles quando tento conectar o banco de dados me retorna o erro UNABLE COMPLETE TO NETWORK REQUEST TO 'JOSE'. FAILED TO LOCATE HOST MACHINE. UNDEFINED SERVICE GDS_DB/TCP . ou ainda UNABLE COMPLETE TO NETWORK REQUEST TO 'LOCALHOST'. FAILED TO LOCATE HOST MACHINE. UNDEFINED SERVICE GDS_DB/TCP . Se for uma conexão local funciona.. Estas são as conexões que eu tentei fazer: Jose=:d:\driverbr\rbrwin\bancoib\gerencia\gerencia.rbr (Deu o ero) localhost:c:\driverbr\rbrwin\bancoib\gerencia\gerencia.rbr (Deu o erro) c:\driverbr\rbrwin\bancoib\gerencia\gerencia.rbr (Funciona OK) Já verifiquei toda a rede e esta ok, só que essa bucha não conecta.(argh) Alguem tem alguma luz para me dar. Já to no desespero.. Att. Leandro Carbonera Suporte Técnico - RBR Informática Fone: 54 343 1788 [EMAIL PROTECTED] www.rbrinformatica.com.br ___ Yahoo! doce lar. Faça do Yahoo! sua homepage. http://br.yahoo.com/homepageset.html -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos ___ Yahoo! doce lar. Faça do Yahoo! sua homepage. http://br.yahoo.com/homepageset.html -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos ___ Yahoo! doce lar. Faça do Yahoo! sua homepage. http://br.yahoo.com/homepageset.html -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Problema com campo
Olá, eu tenho um campo no interbase chamado PAGO do tipo varchar(3), e eu estou fazendo o seguinte para inserir no banco: DMReceber.QReceberPAGO.value:='sim'; Todos os outros campos que insiro, faço do mesmo jeito e funciona blz, mas somente este campo não insere nada no banco, sendo que deveria inserir o 'sim'. Eu utilizo o delphi6. Se alguém me responder fico agradecida. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erro XML: A página XML não pode ser exibida ,
não sei se oq vou dizer pode ajudar, mas eu programo em asp, e no asp tem uma função chamada URLENCODE(), ela serve para codificar os acentos e caracteres especiais para que os Browsers entendam, veja tem algo parecido no delphi [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Impressão direto p/ a porta.
Sim, mas o printers te dá o nome compartilhado da impressora. Se for uma impressora de rede, o nome vem assim: Epson LX-300 on \\marquina\epson. - Original Message - From: Doretto [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 06, 2005 10:39 PM Subject: Re: [delphi-br] Impressão direto p/ a porta. Obrigado Pela dica Mas o problema e quando a impressora é compartilhada com outro nome, ai a impressão da erro de IO pois nao acha a impressora Já passou por isso ? Abraço. - Original Message - From: Campus To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 06, 2005 4:37 PM Subject: Re: [delphi-br] Impressão direto p/ a porta. Printer.Printers te retorna a lista de impressoras instaladas no windows. Basta direcionar a impressão para o nome da impressora Eu uso um listbox para o usuario selecionar, dessa forma: ListBox1.Items.Assign(Printer.Printers); NomeDaImpressora := ItemSelecionado; no lugar de AssignFile(NomeArq,'LPT1'), use AssignFile(NomeArq,NomeDaImpressora) - Original Message - From: Doretto [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 06, 2005 6:01 PM Subject: [delphi-br] Impressão direto p/ a porta. Boa Tarde. Estou fazendo um relatório e estou imprimindo direto para a porta usando o WriteLn. Gotaria de saber se tem como eu escolher a impressora antes de imprimir ? Abraço Paulo Sérgio Doretto [EMAIL PROTECTED] www.qualitysystem.com.br [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Off: Registro de programa
Ola gente! estou com algumas duvidas, como eu faço para patetiar ou registrar um programa desevolvido, o q e necessario? Tem uma empresa q esta querendo contatar o meu trabalho, q é desevolver um sistema q simula um cubo tridimecional, mas eles querem os codigos fontes e ñ me autorizar a venda do mesmo para outroso programa tem mts calculos que eles me passaramqual o valor q posso cobrar??? [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Impressão direto p/ a porta.
Valeu... Deu certo Abraço. - Original Message - From: Campus To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 07, 2005 7:44 AM Subject: Re: [delphi-br] Impressão direto p/ a porta. Sim, mas o printers te dá o nome compartilhado da impressora. Se for uma impressora de rede, o nome vem assim: Epson LX-300 on \\marquina\epson. - Original Message - From: Doretto [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 06, 2005 10:39 PM Subject: Re: [delphi-br] Impressão direto p/ a porta. Obrigado Pela dica Mas o problema e quando a impressora é compartilhada com outro nome, ai a impressão da erro de IO pois nao acha a impressora Já passou por isso ? Abraço. - Original Message - From: Campus To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 06, 2005 4:37 PM Subject: Re: [delphi-br] Impressão direto p/ a porta. Printer.Printers te retorna a lista de impressoras instaladas no windows. Basta direcionar a impressão para o nome da impressora Eu uso um listbox para o usuario selecionar, dessa forma: ListBox1.Items.Assign(Printer.Printers); NomeDaImpressora := ItemSelecionado; no lugar de AssignFile(NomeArq,'LPT1'), use AssignFile(NomeArq,NomeDaImpressora) - Original Message - From: Doretto [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 06, 2005 6:01 PM Subject: [delphi-br] Impressão direto p/ a porta. Boa Tarde. Estou fazendo um relatório e estou imprimindo direto para a porta usando o WriteLn. Gotaria de saber se tem como eu escolher a impressora antes de imprimir ? Abraço Paulo Sérgio Doretto [EMAIL PROTECTED] www.qualitysystem.com.br [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Ajuda com trigger
Bom dia galera !!! Estou com o seguinte problema: Tenho as seguintes tabelas /* ARMAZENAR DADOS DE UMA TRANSFERENCIA */ CREATE TABLE TRANSF ( CTRANSF D_CODIGO NOT NULL, CEMPRESAD_CODIGO, LANCAMENTO CHAR(1) NOT NULL, DATAD_DATA, OBS D_BLOB_TEXTO, CEMP_LOJA D_CODIGO, TIPOCHAR(1), ENVIADO D_SIMNAO DEFAULT 'N' NOT NULL, DATA_INCD_DATA, DATA_ALTD_DATA, LANCADO D_SIMNAO DEFAULT 'N' NOT NULL /* PODE SER N OU S*/ ); /* ARMAZENAR OS PRODUTOS TRANSFERIDOS */ CREATE TABLE TRANSF2 ( CTRANSF2D_CODIGO, CTRANSF D_CODIGO, CEMPRESAD_CODIGO, LANCAMENTO CHAR(1), TIPOCHAR(1), CPROD D_CODPRODUTO, QTD NUMERIC(18,2) DEFAULT 0 NOT NULL, VENDIDO D_SIMNAO DEFAULT 'N' NOT NULL, ENVIADO D_SIMNAO DEFAULT 'N' NOT NULL ); /* RELAÇÃO DE PRODUTOS POR LOJA TRANSFERIDO */ CREATE TABLE TRANSF_REC ( CEMPRESAD_CODIGO, LANCAMENTO CHAR(1) NOT NULL, CEMP_LOJA D_CODIGO, TIPOCHAR(1) NOT NULL, CPRODUTOD_CODPRODUTO, QTD NUMERIC(18,3) DEFAULT 0 NOT NULL ); PRECISO FAZER O SEGUINTE: QDO MUDAR O VALOR DO CAMPO LANCADO DE N PARA S TENHO Q VERIFICAR SE O PRODUTO EXISTE NA TABELA DE TRANSF_REC. SE NÃO EXISITIR TENHO Q CADASTRAR CASO CONTRÁRIO TENHO Q AUMENTAR A QTD. DOO PRODUTOS... A TRIGGER Q TENHO É ESSA, SÓ Q ESTÁ DANDO ERRO E NÃO CONSIGO FAZER UM LOOP DO INICIO AO FIMA DA TABELA DE TRANSF2 as begin IF (UPDATING) THEN BEGIN IF ((OLD.LANCADO = 'N') AND (NEW.LANCADO = 'S')) THEN BEGIN for select CPROD, QTD from TRANSF2 where TRANSF2.CTRANSF = CTRANSF order by CPROD do BEGIN UPDATE TRANSF_REC SET QTD = (QTD + TRANSF2.QTD) WHERE TRANSF_REC.CEMPRESA = CEMPRESA ANDTRANSF_REC.LANCAMENTO = LANCAMENTO ANDTRANSF_REC.CEMP_LOJA = CEMP_LOJA ANDTRANSF_REC.TIPO = TIPO ANDTRANSF_REC.CPRODUTO = CPRODUTO; END END END end SERA Q ALGUEM PODERIA ME AJUDAR?? DESDE JÁ AGRADEÇO... Obrigado. Rodrigo Pedroso Winsoft Informática - (14) 3664-1586 [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Erro XML: A página XML nã o pode ser exibida ,
Faça o seguinte: modifique o cabeçalho do arquivo de ?xml version=1.0 standalone=yes? para ?xml version=1.0 standalone=yes? encoding=ISO-8859-1 Esse encoding permite que caracteres acentuados sejam utilizados. []s Mauro Junior escreveu: Pessoal, acho que descobri o problema. Existe um campo onde guardo o Status. Este Status pode assumir 3 valores: Ativo, Inativo e Invalido. Quando o Status era Inválido eu estava gravando esta string com acento, ou seja Status = Inválido. Depois passei a gravar a string sem o acento, ou seja Status = Invalido e daí funcionou tudo muito bem, consegui abrir o arquivo (com os dois cliques) sem que me aparecesse a mensagem de erro. Agora quero saber como faço para gravar o status Invalido com acento... Mauro Mauro Domingues Junior [EMAIL PROTECTED] escreveu: Olá, Desenvolvi um programa que utiliza uma base de dados XML. Bom, os dados ficam perfeitamente gravados nos arquivos XML. O problema é que não consigo abrir(dando dois cliques no arquivo) alguns destes arquivos. Aparece a seguinte mensagem: A página XML não pode ser exibida Não é possível exibir a entrada XML usando a folha de estilos XSL. Corrija o erro e clique no botão Atualizar ou tente novamente mais tarde Caractere inválido encontrado no texto. Erro ao processar o recurso 'file:///C:/ProUtil7/NetMonitor/Logs/Invalidos/051206.x... ?xml version=1.0 standalone=yes? DATAPACKET Version=2.0METADATAFIELDSFIELD attrna... O engraçado é que o programa lê e grava nos arquivos XML, mas quando quero abrir estes arquivos manualmente(dando dois cliques) aparece a tal mensagem de erro. Outra coisa: isto só acontece com alguns arquivos, mas não sei pq, já q todos são criados da mesma maneira. O que fazer? -- Atenciosamente ___ Giovani Benedetti Penha Coordenador de Projetos de TI Veltrac Rastreadores de Veículos Ltda. e-mail: [EMAIL PROTECTED] Av. Celso Garcia Cid, 1451 Londrina - Paraná www.veltrac.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Publicar um site feito em Delphi.NET
Fala aí galera, alguém tem alguma apostila ou doc, onde explica o que tenho que instalar no servidor para rodar sites para .NET? E também quais arquivos que preciso enviar ao servidor? Quais as configurações que devo fazer? Abraço a todos Murillo Proença -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Impressão com TPrinter
Bom, eu tentei configurar a página pra menor (tamanho do boleto) e para maior (maior que uma folha normal)mas não houve mudança. Testei em vários computadores e tipos de impressoras diferentes (Apesar que esta rotina só funcionará em um tipo de impressora). Os boletos são pré-impressos, não sei se deu pra pescar na msg anterior, esqueci de escrever isso antes, foi mal... Obrigado pelo toque, mas infelismente não deu certo. :( Continuo na mesma se alguem tiver alguma outra idéia e puder me ajudar Daniel A. Bastos Em 07/12/05, jmourajr2000 [EMAIL PROTECTED] escreveu: Daniel, bom dia! Você já tentou configurar o tamanho do formulário de boleto em propriedades da impressora, direto no Windows. Tenta utilizar um modelo que você possa informar as medidas do formulario. Para mim, esta foi a solução deste mesmo problema. Abraços. José de Moura --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos [EMAIL PROTECTED] escreveu Salve galera, to com um problema na impressão aqui. Se alguem puder me ajudar, vai me tirar uma dor de cabeça daquelas Quando uso impressão com TPrinter, é uma rotina de impressão de boletos. Ele só imprime até o terceiro boleto em qualquer impressora. Verifiquei que, se eu gerar um arquio bmp com o Canvas, todos os boletos saem corretamente. Tentei imprimir pelo Paint (O arquivo gerado) sai corretamente. Desta forma soube que não era problema nem da rotina de impressão, na qual gera o arquivo corretamente, nem do driver ou do Sistema operacional, pois imprime corretamenete. Tentei gerar o arquivo e imprimir o bmp por dentro do delphi, mas o resultado é exatamente o mesmo. Só imprime 3 boletos. Estes 3 boletos são exatamente o tamanho de uma página A4. Não sei se estes fatos tem relação. Alem destes, fiz muitos testes aqui. E no geral, não consigo imprimir no Delphi usando TPrinter(Com geradores de relatório como por exemplo o QuickReport, funciona perfeitamente) mais de 3 boletos se eu não der um NewPage. O Caso é que, se eu der um NewPage, ele vai pular o tamanho de uma página, consequentemente, pular 3 boletos e imprimir errado. o incrível é que nem uma impressão simples como a no código abaixo fuinciona var ct : integer; begin printer.BeginDoc; for ct := 0 to 1000 do printer.Canvas.TextOut(50, 50*ct, IntToStr(ct)); printer.EndDoc; este código só imprime até um determinado número dependendo da resolução da impressora, mas sempre no tamanho de 1 página a4. O mais incrível, é que a mesma rotina funcionava a alguns dias atraz. alguem tem alguma idéia. Abraços a todos Daniel A. Bastos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Impressão com TPrinter
Daniel, se tu não está conseguindo, tenta impressão direto na porta com write. Assim vc não precisa se preocupar com cfg de página e coisas do gênero. - Original Message - From: Daniel Bastos [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 07, 2005 12:28 PM Subject: Re: [delphi-br] Re: Impressão com TPrinter Bom, eu tentei configurar a página pra menor (tamanho do boleto) e para maior (maior que uma folha normal)mas não houve mudança. Testei em vários computadores e tipos de impressoras diferentes (Apesar que esta rotina só funcionará em um tipo de impressora). Os boletos são pré-impressos, não sei se deu pra pescar na msg anterior, esqueci de escrever isso antes, foi mal... Obrigado pelo toque, mas infelismente não deu certo. :( Continuo na mesma se alguem tiver alguma outra idéia e puder me ajudar Daniel A. Bastos Em 07/12/05, jmourajr2000 [EMAIL PROTECTED] escreveu: Daniel, bom dia! Você já tentou configurar o tamanho do formulário de boleto em propriedades da impressora, direto no Windows. Tenta utilizar um modelo que você possa informar as medidas do formulario. Para mim, esta foi a solução deste mesmo problema. Abraços. José de Moura --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos [EMAIL PROTECTED] escreveu Salve galera, to com um problema na impressão aqui. Se alguem puder me ajudar, vai me tirar uma dor de cabeça daquelas Quando uso impressão com TPrinter, é uma rotina de impressão de boletos. Ele só imprime até o terceiro boleto em qualquer impressora. Verifiquei que, se eu gerar um arquio bmp com o Canvas, todos os boletos saem corretamente. Tentei imprimir pelo Paint (O arquivo gerado) sai corretamente. Desta forma soube que não era problema nem da rotina de impressão, na qual gera o arquivo corretamente, nem do driver ou do Sistema operacional, pois imprime corretamenete. Tentei gerar o arquivo e imprimir o bmp por dentro do delphi, mas o resultado é exatamente o mesmo. Só imprime 3 boletos. Estes 3 boletos são exatamente o tamanho de uma página A4. Não sei se estes fatos tem relação. Alem destes, fiz muitos testes aqui. E no geral, não consigo imprimir no Delphi usando TPrinter(Com geradores de relatório como por exemplo o QuickReport, funciona perfeitamente) mais de 3 boletos se eu não der um NewPage. O Caso é que, se eu der um NewPage, ele vai pular o tamanho de uma página, consequentemente, pular 3 boletos e imprimir errado. o incrível é que nem uma impressão simples como a no código abaixo fuinciona var ct : integer; begin printer.BeginDoc; for ct := 0 to 1000 do printer.Canvas.TextOut(50, 50*ct, IntToStr(ct)); printer.EndDoc; este código só imprime até um determinado número dependendo da resolução da impressora, mas sempre no tamanho de 1 página a4. O mais incrível, é que a mesma rotina funcionava a alguns dias atraz. alguem tem alguma idéia. Abraços a todos Daniel A. Bastos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Impressão com TPrinter
Pow cara. To fugindo de impressão direta pois ta me dando problemas com relação a tamanho dos formulários pre impressos e tal Fora que o cara quer umas paradas com tamanho de fonte diferente, pra destacar algumas informações que ele quer que apareça no boleto, O que não da pra fazer com impressão direta. Mas valeu a atenção. Brigadão. Eu consegui agora a pouco, imprimir um pouco mais do que antes. Eu aumentei o tamanho da folha no windows e funcionou (Não sei pq não tinha funcionado antes, mas agora funcionou). Eu tava com a idéia de aumentar o tamanho do papel via programação, posteriormente, voltar ao tamanho original, mas não estou conseguindo. Se alguem souber, ja me adianta. Se vcs puderem continuar me ajudando, será muito bom. Abraços Daniel A. Bastos Em 07/12/05, Campus [EMAIL PROTECTED] escreveu: Daniel, se tu não está conseguindo, tenta impressão direto na porta com write. Assim vc não precisa se preocupar com cfg de página e coisas do gênero. - Original Message - From: Daniel Bastos [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 07, 2005 12:28 PM Subject: Re: [delphi-br] Re: Impressão com TPrinter Bom, eu tentei configurar a página pra menor (tamanho do boleto) e para maior (maior que uma folha normal)mas não houve mudança. Testei em vários computadores e tipos de impressoras diferentes (Apesar que esta rotina só funcionará em um tipo de impressora). Os boletos são pré-impressos, não sei se deu pra pescar na msg anterior, esqueci de escrever isso antes, foi mal... Obrigado pelo toque, mas infelismente não deu certo. :( Continuo na mesma se alguem tiver alguma outra idéia e puder me ajudar Daniel A. Bastos Em 07/12/05, jmourajr2000 [EMAIL PROTECTED] escreveu: Daniel, bom dia! Você já tentou configurar o tamanho do formulário de boleto em propriedades da impressora, direto no Windows. Tenta utilizar um modelo que você possa informar as medidas do formulario. Para mim, esta foi a solução deste mesmo problema. Abraços. José de Moura --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos [EMAIL PROTECTED] escreveu Salve galera, to com um problema na impressão aqui. Se alguem puder me ajudar, vai me tirar uma dor de cabeça daquelas Quando uso impressão com TPrinter, é uma rotina de impressão de boletos. Ele só imprime até o terceiro boleto em qualquer impressora. Verifiquei que, se eu gerar um arquio bmp com o Canvas, todos os boletos saem corretamente. Tentei imprimir pelo Paint (O arquivo gerado) sai corretamente. Desta forma soube que não era problema nem da rotina de impressão, na qual gera o arquivo corretamente, nem do driver ou do Sistema operacional, pois imprime corretamenete. Tentei gerar o arquivo e imprimir o bmp por dentro do delphi, mas o resultado é exatamente o mesmo. Só imprime 3 boletos. Estes 3 boletos são exatamente o tamanho de uma página A4. Não sei se estes fatos tem relação. Alem destes, fiz muitos testes aqui. E no geral, não consigo imprimir no Delphi usando TPrinter(Com geradores de relatório como por exemplo o QuickReport, funciona perfeitamente) mais de 3 boletos se eu não der um NewPage. O Caso é que, se eu der um NewPage, ele vai pular o tamanho de uma página, consequentemente, pular 3 boletos e imprimir errado. o incrível é que nem uma impressão simples como a no código abaixo fuinciona var ct : integer; begin printer.BeginDoc; for ct := 0 to 1000 do printer.Canvas.TextOut(50, 50*ct, IntToStr(ct)); printer.EndDoc; este código só imprime até um determinado número dependendo da resolução da impressora, mas sempre no tamanho de 1 página a4. O mais incrível, é que a mesma rotina funcionava a alguns dias atraz. alguem tem alguma idéia. Abraços a todos Daniel A. Bastos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Impressão com TPrinter
Cara, vc conhece o RDPrint? www.deltress.com.br É o fim destes problemas. --- Em delphi-br@yahoogrupos.com.br, Campus [EMAIL PROTECTED] escreveu Daniel, se tu não está conseguindo, tenta impressão direto na porta com write. Assim vc não precisa se preocupar com cfg de página e coisas do gênero. - Original Message - From: Daniel Bastos [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 07, 2005 12:28 PM Subject: Re: [delphi-br] Re: Impressão com TPrinter Bom, eu tentei configurar a página pra menor (tamanho do boleto) e para maior (maior que uma folha normal)mas não houve mudança. Testei em vários computadores e tipos de impressoras diferentes (Apesar que esta rotina só funcionará em um tipo de impressora). Os boletos são pré-impressos, não sei se deu pra pescar na msg anterior, esqueci de escrever isso antes, foi mal... Obrigado pelo toque, mas infelismente não deu certo. :( Continuo na mesma se alguem tiver alguma outra idéia e puder me ajudar Daniel A. Bastos Em 07/12/05, jmourajr2000 [EMAIL PROTECTED] escreveu: Daniel, bom dia! Você já tentou configurar o tamanho do formulário de boleto em propriedades da impressora, direto no Windows. Tenta utilizar um modelo que você possa informar as medidas do formulario. Para mim, esta foi a solução deste mesmo problema. Abraços. José de Moura --- Em delphi-br@yahoogrupos.com.br, Daniel Bastos [EMAIL PROTECTED] escreveu Salve galera, to com um problema na impressão aqui. Se alguem puder me ajudar, vai me tirar uma dor de cabeça daquelas Quando uso impressão com TPrinter, é uma rotina de impressão de boletos. Ele só imprime até o terceiro boleto em qualquer impressora. Verifiquei que, se eu gerar um arquio bmp com o Canvas, todos os boletos saem corretamente. Tentei imprimir pelo Paint (O arquivo gerado) sai corretamente. Desta forma soube que não era problema nem da rotina de impressão, na qual gera o arquivo corretamente, nem do driver ou do Sistema operacional, pois imprime corretamenete. Tentei gerar o arquivo e imprimir o bmp por dentro do delphi, mas o resultado é exatamente o mesmo. Só imprime 3 boletos. Estes 3 boletos são exatamente o tamanho de uma página A4. Não sei se estes fatos tem relação. Alem destes, fiz muitos testes aqui. E no geral, não consigo imprimir no Delphi usando TPrinter(Com geradores de relatório como por exemplo o QuickReport, funciona perfeitamente) mais de 3 boletos se eu não der um NewPage. O Caso é que, se eu der um NewPage, ele vai pular o tamanho de uma página, consequentemente, pular 3 boletos e imprimir errado. o incrível é que nem uma impressão simples como a no código abaixo fuinciona var ct : integer; begin printer.BeginDoc; for ct := 0 to 1000 do printer.Canvas.TextOut(50, 50*ct, IntToStr(ct)); printer.EndDoc; este código só imprime até um determinado número dependendo da resolução da impressora, mas sempre no tamanho de 1 página a4. O mais incrível, é que a mesma rotina funcionava a alguns dias atraz. alguem tem alguma idéia. Abraços a todos Daniel A. Bastos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Ajuda com trigger
Tira o FOR e use o update baseado na tabela em que vc quer fazer o FOR Tenta assim UPDATE TRANSF_REC SET QTD = (QTD + TRANSF2.QTD) FROM TRANSF2 where TRANSF2.CTRANSF = CTRANSF AND TRANSF_REC.CEMPRESA = CEMPRESA ANDTRANSF_REC.LANCAMENTO = LANCAMENTO ANDTRANSF_REC.CEMP_LOJA = CEMP_LOJA ANDTRANSF_REC.TIPO = TIPO ANDTRANSF_REC.CPRODUTO = CPRODUTO Obs.: Eu USO o SQL SERVER 2000 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
ENC: [delphi-br] DELPHI 7 +BDE +ORACLE +XP /2000
Já faz algum tempo que mando esta questão e ninguém consegue me auxiliar, se alguém tiver alguma idéia, tenho uma aplicação BDE utilizando ORACLE, em tquery+updatesql e depois dou um applyupdates na tquery, em maquinas Windows 95,98 da tudo certo agora em Windows XP e 2000 as vezes grava e as vezes não grava após um post, alguém tem alguma idéia o que fazer? [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Impressão com TPrinter
Olha amigo pelo que vc falou, do jeito que vc esta enviando a impressão, esta sendo interpretado como se fosse apenas uma página, mesmo q vc tenha 30 boletos em uma só imagem, a saida seria, vc criar essas imagens com apenas um ou 3 boletos, que é o máximo q esta dando para imprimir e mandar uma a uma 3 em 3 boletos, ate vc ou p pessoal da lista achar uma saida melhor [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Fw: RELAX!!!...As melhores de 2005
Cara vc num leu as regras da lista? alem de de crossposting vc ta completamente off do assunto da lista. Ás vezes isso gera punições. só pra avisar... Fabiano ___ Yahoo! doce lar. Faça do Yahoo! sua homepage. http://br.yahoo.com/homepageset.html -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Componente OCR
Olá Erivaldo tudo bem? Entre nesse site: http://www.mcm-design.dk/index.php, aí você vai encontrar o Imaging TWAIN toolkits, eles são um conjunto de componentes para o Delphi, e tem componentes para trabalhar com imagem, e com OCR. Posso saber pra que você precisa de OCR? Espero ter te ajudado. Willian Leal Em 07/12/05, Erivaldo de Almeida [EMAIL PROTECTED] escreveu: Galera , Bom dia ... alguem tem algum componente ou rotina ... para trabalhar com imagens , identificar caracteres .. Erivaldo [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE http://br.rd.yahoo.com/SIG=12f3oosv1/M=384888.7585449.8468440.1588051/D=brclubs/S=2137111264:HM/Y=BR/EXP=1133961392/A=3154525/R=0/SIG=12igfl26t/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE -- *Links do Yahoo! Grupos* - Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ - Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED][EMAIL PROTECTED] - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. -- Willian Leal Desenvolvedor de Softwares MSN: [EMAIL PROTECTED] Cel:(32) 8821 - 9182 Tel:(32) 3711 - 5012 Muriaé - MG [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [OFF TOPIC] Questionário
Fala aí galera, Estou precisando desenvolver um questionário para todos os gerentes de cada unidade da empresa, onde eles vão me passar as necessidades técnicas (hardware, software, mão de obra, infraestrutura) de que estão necessitando para utilizar o sistema de forma eficiente, e em meio as respostas, vou fazer um balanço entre o volume de trabalho de cada unidade, com o desempenho e com estas necessidades para tomar decisões sobre os investimentos físicos e remanejamento de pessoal. Alguém já fez um algum tipo de trabalho parecido e tem algum doc que eu posso utilizar como base? Grato Murillo Proença -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] DELPHI 7 +BDE +ORACLE +XP /2000
Boa tarde, Já tive um problema parecido com este mas utilizando o ADO com Sql Server e achei um artigo; mas agora não consigo me lembrar onde; que explicava como proceder com todos os tipos de conexões no delphi e banco de dados e a minha solução foi a seguinte: try dm_Base.ado_Conn.BeginTrans; // Inicio da transação sql_Acao.ExecSQL; // Executa a query dm_Base.ado_Conn.CommitTrans; // se tudo OK executa o commit except dm_Base.ado_Conn.RollbackTrans; // caso contrario executa o rollback end; No meu caso funciona e legal, estou usando tbem o delphi com oracle e odac e funciona da mesma maneira. Outra coisa é que o begintrans, committrans e rollbacktrans é do lado do componente de conexão e não a query. Espero ter ajudado. Abraços, == Emilio Córdova CMAC Informática Ltda [EMAIL PROTECTED] Cel : (41) 9228-7414 -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] DELPHI 7 +BDE +ORACLE +XP /2000
Achei. http://www.activedelphi.com.br/modules.php?op=modloadname=Newsfile=article sid=46 Aqui explica como atualizar os dados no banco de dados utilizando os mais conhecidos componente de acesso. Obrigado, == Emilio Córdova CMAC Informática Ltda [EMAIL PROTECTED] Cel : (41) 9228-7414 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de [EMAIL PROTECTED] Enviada em: quarta-feira, 7 de dezembro de 2005 15:17 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] DELPHI 7 +BDE +ORACLE +XP /2000 Boa tarde, Já tive um problema parecido com este mas utilizando o ADO com Sql Server e achei um artigo; mas agora não consigo me lembrar onde; que explicava como proceder com todos os tipos de conexões no delphi e banco de dados e a minha solução foi a seguinte: try dm_Base.ado_Conn.BeginTrans; // Inicio da transação sql_Acao.ExecSQL; // Executa a query dm_Base.ado_Conn.CommitTrans; // se tudo OK executa o commit except dm_Base.ado_Conn.RollbackTrans; // caso contrario executa o rollback end; No meu caso funciona e legal, estou usando tbem o delphi com oracle e odac e funciona da mesma maneira. Outra coisa é que o begintrans, committrans e rollbacktrans é do lado do componente de conexão e não a query. Espero ter ajudado. Abraços, == Emilio Córdova CMAC Informática Ltda [EMAIL PROTECTED] Cel : (41) 9228-7414 -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] procedure ou function?
Procure algo, chamado DWS. - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 07, 2005 7:54 AM Subject: RE: [delphi-br] procedure ou function? Não é possível. O Delphi não é como o Clipper que permite executar uma expressão que está em uma string e automaticamente determinar que se trata de uma procedure ou function. Resumindo, o Delphi(especificamente Object Pascal) não possui macro-substituição. Sds. From: Francisco [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] procedure ou function? Date: Tue, 6 Dec 2005 22:09:40 -0300 pessoal, tenho uma tabela com o nome de algumas funcoes e procedures dentro de um arquivo dbf. gostaria de saber se e possivel.. executar a procedure pelo nome que esta la dentro do dbf. tipo: pegar o nome e executar? e possivel? se sim como? desde ja agradeço. - Original Message - From: Uirá Tupinambás Lima [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 06, 2005 10:59 AM Subject: [delphi-br] FileExists Pessoal, Estou com uma dúvida aqui, o comando FileExists do Delphi funciona para um drive mapeado na rede pois estou fazendo uns testes aqui e não estou obtendo sucesso, que outro comando posso utilizar para esse caso ? Qualquer ajuda será bem vinda Grato Uirá [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos _ MSN Messenger: converse com os seus amigos online. http://messenger.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Protocolo SIP
Ola amigos, Alguém trabalha, ja trabalhou ou possui qualquer material/conhecimento sobre a utilização do protocolo SIP??? Se alguem tiver algo podemos trocar umas idéias, preciso desenvolver uma aplicação aqui e estou um pouco perdido. Att. Rodrigo Schiavo -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Protocolo SIP
Já tentou nos yahoo ou nos Google da vida? []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de -=SchiavoR=- Enviada em: quarta-feira, 7 de dezembro de 2005 15:30 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Protocolo SIP Ola amigos, Alguém trabalha, ja trabalhou ou possui qualquer material/conhecimento sobre a utilização do protocolo SIP??? Se alguem tiver algo podemos trocar umas idéias, preciso desenvolver uma aplicação aqui e estou um pouco perdido. Att. Rodrigo Schiavo -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Protocolo SIP
Ola eu trabalho com sistemas para planos de saúde e vc vai encontrar abrangentes documentos no site http://www.ans.gov.br/portal/site/perfil_operadoras/sip_regulamentacao.a sp , Ou diretamente http://www.ans.gov.br/portal/upload/legislacao/legislacao_regulamentacoe s/legislacao_regulamentacoes_normativas/anexos_rn96.pdf -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de -=SchiavoR=- Enviada em: quarta-feira, 7 de dezembro de 2005 16:30 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Protocolo SIP Ola amigos, Alguém trabalha, ja trabalhou ou possui qualquer material/conhecimento sobre a utilização do protocolo SIP??? Se alguem tiver algo podemos trocar umas idéias, preciso desenvolver uma aplicação aqui e estou um pouco perdido. Att. Rodrigo Schiavo -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12fr6231f/M=384888.7585449.8468440.1588051/D =brclubs/S=2137111264:HM/Y=BR/EXP=1133987438/A=3154524/R=0/SIG=12igfl26t /*http:/www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E8 7847EEEBE _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [OFF TOPIC] Conceito de Manutenção
Boa tarde, alguém possui algum artigo que explique conceitualmente os processos para um controle de manutenção? Precisarei montar um projeto com todas as definições corretas, tais como, abertura de ordem de serviço, autorização, fluxo das informações, controle de valores envolvidos, ou seja, tudo o que envolve um processo de manutenção. Grato Murillo Proença -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: Impressão com TPrinter
Gabriel: Hoje em dia, é assim que está funcionando. Apesar do cliente estar reclamando muito. Murilo: Não, eu só conheço o RDPrint de ouvir falar.Nas empresas onde eu trabalhei, eles nunca usaram o RDPrint. Vou pesquisar sobre esta solução, vou ver se posso implementa-la, mas o mais difícil, é reescrever os relatórios. Isso consome tempo, e, no momento, é o que me falta. Aos dois, muito obrigado. Vou continuar minha peregrinação :) Em 07/12/05, Gabriel Filho [EMAIL PROTECTED] escreveu: Olha amigo pelo que vc falou, do jeito que vc esta enviando a impressão, esta sendo interpretado como se fosse apenas uma página, mesmo q vc tenha 30 boletos em uma só imagem, a saida seria, vc criar essas imagens com apenas um ou 3 boletos, que é o máximo q esta dando para imprimir e mandar uma a uma 3 em 3 boletos, ate vc ou p pessoal da lista achar uma saida melhor [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Protocolo SIP
Sim achei uns componentes cujo manual tem 860 páginas em inglês com custo de U$ 199,00, por isso decidi postar aqui, falar com alguém que ja teve uma esperiência real, é muito mais simples do que gastar dias quebrando a cabeça pra entender o funcionamento do mesmo. A aplicação vai ser bem simples, utilizada apenas para realizar uma chamada pra um numero VoIP, aguardar o atendimento e desconectar. [ ]'s Walter Alves Chagas Junior escreveu: Já tentou nos yahoo ou nos Google da vida? []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de -=SchiavoR=- Enviada em: quarta-feira, 7 de dezembro de 2005 15:30 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Protocolo SIP Ola amigos, Alguém trabalha, ja trabalhou ou possui qualquer material/conhecimento sobre a utilização do protocolo SIP??? Se alguem tiver algo podemos trocar umas idéias, preciso desenvolver uma aplicação aqui e estou um pouco perdido. Att. Rodrigo Schiavo -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE http://br.rd.yahoo.com/SIG=12fpqg6jg/M=384888.7585449.8468440.1588051/D=brclubs/S=2137111264:HM/Y=BR/EXP=1133987733/A=3154524/R=0/SIG=12igfl26t/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE *Links do Yahoo! Grupos* * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.1.362 / Virus Database: 267.13.12/192 - Release Date: 5/12/2005 -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] [Deplhi-BR] Problemas com o Componente VKDBF
Já conseguiu usar o componente? Se precisar de ajuda.. [EMAIL PROTECTED] -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Jose Carlos A Dias Filho Enviada em: sexta-feira, 25 de novembro de 2005 10:42 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] [Deplhi-BR] Problemas com o Componente VKDBF Senhores Bom Dia, Estou utilizando o componente acima e conforme algumas tentativas nao consegui coloca-lo para funcionar. O meu teste e bem simples Os componentes que uso sao : - OpenDialog - DataSource - VKDNFNTX - DBGrid Como podem ver o meu teste e bem simples conforme um arquivo .DBF que especifico quero que seje mostrado os dados no DBGRID. Ja fiz a associacao do DataSource nos dois componentes VKDBFNTX e DBGRIG. Mas quando vou ativar (VKDBFNTX.ACTIVE:=TRUE) ele nao me traz naa e nem me diz que deu erro. Alguem pode me ajudar ? Jose Carlos A Dias Filho Analista de Negócios * 55 91 212-2242 * [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] FileExists
Caro Uirá, Porque nao manda o teste e o problema que está tendo ? José Roberto Uirá Tupinambás Lima [EMAIL PROTECTED] escreveu: Pessoal, Estou com uma dúvida aqui, o comando FileExists do Delphi funciona para um drive mapeado na rede pois estou fazendo uns testes aqui e não estou obtendo sucesso, que outro comando posso utilizar para esse caso ? Qualquer ajuda será bem vinda Grato Uirá [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. José Roberto [EMAIL PROTECTED] - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Delphi 2006
Acabei de receber meu Delphi 2006 comprado no BorCon. FANTÁSTICO! Pelo menos bem mais leve ele é. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] SQL: Consulta em ordem alfabetica
Pessoal uso o scrip abaixo para apresentar em ordem alfabetica os Produtos. o EDIT1.text, tem a funcao de o Usuario informar parte do nome do produto que deseja consultar. E isto funciona. naturalmente. Como fazer para que, se o Usuario quiser ver os produtos que estão acima ou abaixo dos que apareceram no resultado da pesquisa ? Exemplificando: O usuario informou Papel Oficio O scripit, apresenta todos os produtos que comecam com PAPEL OFICIO (dentro de um DBGRID) E se o usuario, usando as setas do teclado SUBIR e desejar ver produtos que entecedem os PAPEL OFICIO, como fazer ? Pergunto isso, pois o meu cliente estava acostumado com as consultas feitas em Paradox. E no Paradox, estava ali todos os produtos da Tabela. Ele podia subir, descer a vontade (eu nao usava SQL, usava os FindNearest) O cliente NAO quer retornar para o EDIT para informar um novo parametro (por exemplo PAPEL CARTA) para ver. Ele quer que, ao informar PAPEL OFICIO, seja apresentado os papeis oficios, e se ele subir - no dbgrid - automaticamente seja mostrado os produtos que estão acima. Tem algum meio de eu resolevr isto ? with IBQProdutos do begin if Active then Close; SQL.Text := 'select * Produtos P'; SQL.add('WHERE (P.Descr like :Descr) SQL.Add ('Order By P.Descr'); with params do ParamByName('Descr').AsString := edit1.text + '%'; Open; end; -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] ADO Acces com senha
Ola.. Gostaria de me conectar com um BD Access protegido por senha. Alguem pode dar um help, pois ja consegui conectar sem senha, mas com senha nao consigo. De ja agradeço []´s Paulo -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Ajuda com trigger
Eu sempre declaro uma variavel que será retornada pelo select... ex: no seu caso. declare variable cpro integer; declare variable qtd numeric(8,3); as begin IF (UPDATING) THEN BEGIN IF ((OLD.LANCADO = 'N') AND (NEW.LANCADO = 'S')) THEN BEGIN for select CPROD, QTD from TRANSF2 where TRANSF2.CTRANSF = CTRANSF order by CPROD into :Cpro,:Qtd do BEGIN UPDATE TRANSF_REC SET QTD = (QTD + :qtd) WHERE TRANSF_REC.CEMPRESA = CEMPRESA AND TRANSF_REC.LANCAMENTO = LANCAMENTO AND TRANSF_REC.CEMP_LOJA = CEMP_LOJA AND TRANSF_REC.TIPO = TIPO AND TRANSF_REC.CPRODUTO = :Cpro; END END END tenta aí e ver se funciona. Um Abraço Mário. --- Em delphi-br@yahoogrupos.com.br, Rodrigo - Winsoft [EMAIL PROTECTED] escreveu Bom dia galera !!! Estou com o seguinte problema: Tenho as seguintes tabelas /* ARMAZENAR DADOS DE UMA TRANSFERENCIA */ CREATE TABLE TRANSF ( CTRANSF D_CODIGO NOT NULL, CEMPRESAD_CODIGO, LANCAMENTO CHAR(1) NOT NULL, DATAD_DATA, OBS D_BLOB_TEXTO, CEMP_LOJA D_CODIGO, TIPOCHAR(1), ENVIADO D_SIMNAO DEFAULT 'N' NOT NULL, DATA_INCD_DATA, DATA_ALTD_DATA, LANCADO D_SIMNAO DEFAULT 'N' NOT NULL /* PODE SER N OU S*/ ); /* ARMAZENAR OS PRODUTOS TRANSFERIDOS */ CREATE TABLE TRANSF2 ( CTRANSF2D_CODIGO, CTRANSF D_CODIGO, CEMPRESAD_CODIGO, LANCAMENTO CHAR(1), TIPOCHAR(1), CPROD D_CODPRODUTO, QTD NUMERIC(18,2) DEFAULT 0 NOT NULL, VENDIDO D_SIMNAO DEFAULT 'N' NOT NULL, ENVIADO D_SIMNAO DEFAULT 'N' NOT NULL ); /* RELAÇÃO DE PRODUTOS POR LOJA TRANSFERIDO */ CREATE TABLE TRANSF_REC ( CEMPRESAD_CODIGO, LANCAMENTO CHAR(1) NOT NULL, CEMP_LOJA D_CODIGO, TIPOCHAR(1) NOT NULL, CPRODUTOD_CODPRODUTO, QTD NUMERIC(18,3) DEFAULT 0 NOT NULL ); PRECISO FAZER O SEGUINTE: QDO MUDAR O VALOR DO CAMPO LANCADO DE N PARA S TENHO Q VERIFICAR SE O PRODUTO EXISTE NA TABELA DE TRANSF_REC. SE NÃO EXISITIR TENHO Q CADASTRAR CASO CONTRÁRIO TENHO Q AUMENTAR A QTD. DOO PRODUTOS... A TRIGGER Q TENHO É ESSA, SÓ Q ESTÁ DANDO ERRO E NÃO CONSIGO FAZER UM LOOP DO INICIO AO FIMA DA TABELA DE TRANSF2 as begin IF (UPDATING) THEN BEGIN IF ((OLD.LANCADO = 'N') AND (NEW.LANCADO = 'S')) THEN BEGIN for select CPROD, QTD from TRANSF2 where TRANSF2.CTRANSF = CTRANSF order by CPROD do BEGIN UPDATE TRANSF_REC SET QTD = (QTD + TRANSF2.QTD) WHERE TRANSF_REC.CEMPRESA = CEMPRESA ANDTRANSF_REC.LANCAMENTO = LANCAMENTO ANDTRANSF_REC.CEMP_LOJA = CEMP_LOJA ANDTRANSF_REC.TIPO = TIPO ANDTRANSF_REC.CPRODUTO = CPRODUTO; END END END end SERA Q ALGUEM PODERIA ME AJUDAR?? DESDE JÁ AGRADEÇO... Obrigado. Rodrigo Pedroso Winsoft Informática - (14) 3664-1586 [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html