Re: Res: [delphi-br] DBGRID + JEDI + 2 linhas
É eu tb acabei tendo que baixar de outro site, no caso o VCLComponents. E tive o mesmo problema do FF não deixar que acessasse o site original do componente. Tive o mesmo problema com o Delphi3000 hj tb... []'s Ricardo. Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em ter, 31/3/09, Silvio Clécio silviop...@yahoo.com.br escreveu: De: Silvio Clécio silviop...@yahoo.com.br Assunto: Res: [delphi-br] DBGRID + JEDI + 2 linhas Para: delphi-br@yahoogrupos.com.br Data: Terça-feira, 31 de Março de 2009, 18:45 Olá galera, Baixei e instalei sem problemas, veja no screenshot: Link - [http://geocities. yahoo.com. br/silvioprog/ KGrid.png]. P.S.: Uso o KasperSky, pra mim, o melhor de todos que já testei; até brinco chamando de anti-coisaruim. _ _ __ []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo. com.br Gmail, GTalk: silviop...@gmail. com Hotmail, MSN: silviop...@hotmail. com BlogSpot: http://silvioclecio .blogspot. com/ BlogSite: http://silvioprog. blogspot. com/ °oO| Seja livre, use Linux! |Oo° _ _ __ De: Ricardo César Cardoso ricardo_engsoft@ yahoo.com. br Para: delphi...@yahoogrup os.com.br Enviadas: Segunda-feira, 30 de Março de 2009 22:54:09 Assunto: Re: [delphi-br] DBGRID + JEDI + 2 linhas Fui acessar essa página aqui e tanto o AVG quanto o Norton fizeram o maior auê indicando que tinha um trojan/worm nessa página... Dá pra confiar? Atte, Ricardo. Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Gerar Vetor Dinâmico
Boa Noite Meu nome é Alessandro, iniciante em Delphi. Gostaria de uma ajuda de vcs se possível. Como faço para gerar números aleatórios que não se repitam. Abaixo a procedure que fiz. Estou fazendo alguns exercícios no Delphi, pois estou iniciando e no meu programa gero um vetor dinâmico em um Edit e tudo bem, Só que gostaria que esses números fossem aleatórios e não repetidos. procedure Gera(var v:TArray;k:Integer); var i : Integer; begin for i := 1 to k do begin SetLength(v,Length(v)+1); v[i]:=Random(k); end; end; Desde já agradeço [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Off Topic - Notebook
Soy Yo!! :) Falando em modelos, sempre tive notebooks da HP, sempre fui fã da qualidades e design da HP. Recentemente em uma viagem para fora acabei comprado um modelo da ASUS (série M51V). Até o momento não tenho o que reclamar. Hardware de excelente qualidade (processador centrino 2 P8600, 320Gb HD, 4Gb RAM e placa de video 3D com 512 dedicado, saida HDMI, e-sata). Infelizmente não sei como é a assistencia aqui no Brasil Abraços. Fernando Leal Citando Walter Chagas (Bol) wchag...@bol.com.br: Claudiney, Vou concordar com voce e discordar ao mesmo tempo :) Como você disse, Dell e HP são marcas realmente conceituadas e de qualidade inquestionável. Por exemplo. Eu tenho um Latitude D520 a dois anos. Já caiu no chão uma vez e até hoje roda com a bateria original sem vicio. Viajava comigo pra tudo quanto é lado. Aguentava pouso de avião e buraqueira de estrada viajando na Caçamba da Strada da minha esposa e tá lá, justificando a reputação da marca. Graças a Deus nunca precisei da assistencia técnica dele. Este ano a Telemont me deu um dela, um D530 para eu parar de usar o meu em serviço. Tem 6 meses e funciona direto. Taqui agora, no batente sem chiar e nem reclamar. Concord com voce quando diz que o importante e o seu conteúdo. Recentemente a Telemont adiquiriu um lote de notebooks da marca Lenovo. todos eles vem com tudo interno Intel com Windows Vista. Ate agora tão funcionando beleza. Como voce mesmo disse. Se vai pagar, exija pelo menos que o hardware tenha procedencia confiável. Agora quanto a questão de custo, eu discordo de você. Se vai desembolsar, ainda mais pra um produto que vai acabar se tornando parte da sua vida, entao eu penso que deve-se, ainda que pagar mais caro, por QUALIDADE E CONFIABILIDADE. Pagar barato por um notebook que vai lhe dar mais problemas do que solução, não é a melhor das alternativas ainda mais praquilo que se pretende usar. Então, se vais comprar uma coisa que voce sabe que não poe dar pra trás contigo, que não pode deixar a peteca cair, então convem realmente pagar um pouco mais pra ter, não só qualidade, como também apoio e retaguarda de qualidade. E tem mais! É totalmente desaconselhável comprar notebook em shopping Popular/Camelódromos porque depois de comprado e pago, a garantia soy quem??? []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com SKYPE: WalterChagasJr - Original Message - From: Claudiney Cogo To: delphi-br@yahoogrupos.com.br Sent: Monday, March 30, 2009 9:18 AM Subject: RES: [delphi-br] Off Topic - Notebook Bom dia Antônio. Na minha opinião, HP e Dell são realmente as marcas mais conceituadas. Mas o custo é alto. Já a Acer tem um valor bem mais acessível, porém não tem a fama da outras duas. Mas como digo sempre, o que vale nem sempre é a marca, mas o que tem dentro. Verifique sempre se os componentes são bons. Processador, memória, HD.. são de marcas boas? Então não vejo problema. Claro que em se tratando de assistência técnica, HP e Dell dão show. Mas isso tem o seu custo, claro. Aqui na empresa até 15 dias atrás trabalhamos com um notebook Acer (que não lembro o modelo, mas é um mais antigo) e um Asus A4000L. Os dois nos serviram muito bem por 4 anos, sem nenhum problema técnico. Os dois eram Intel Celeron. Agora trocamos os dois pelo Acer 6930-6455... Intel Core 2 Duo T5800 2.0Ghz, 800Mhz FSB, 2MB L2 Cacha, tela de 16.4, placa de vídeo Intel, 4 GB RAM DDR2, 250 GB HDD, Gravador de DVD Dual Layer, Wireless a/b/g/n, som Dolby Home Theater com subwoofer http://us.acer.com/acer/productv.do?acond26e=USinu45e.current.c2att92=447C ountryISOCtxParam=USrru3e.categoryId=4876inu41e.current.c2att92=447rcond9 1e.c2att1=25rcond92e.att21k=1kcond15e.c2att1=25rru3e.manufactererId=10276 4sp=page12ectx1g.c2att92=447rcond81e.c2att1=25rcond40e.c2att92=447kcond 21e.c2att92=447LanguageISOCtxParam=enacond28e=USlink=ln159ekcond27e.c2at t92=447rru2e.manufactererId=102764kcond22e.c2att101=39857rcond82e.att21k= 1rru2e.categoryId=4876acond23=USrcond88e.c2att92=447par170e=447switch4e .switch=1rru3e.pageNumber=1ctx2.c2att1=25rcond80e.c2att92=447ctx1.att21k =1CRC=1377918760 Não ficamos em nenhum momento arrependidos, pois a máquina é de primeira. Além de um ótimo acabamento, tudo nela é de qualidade. E suporta sem problema nenhum tudo o que usamos... Vista Ultimate 64, RAD Studio 2007, Visual Studio 2008, SQL Server 2005, Photoshop, CorelDraw, Dreamweaver, etc... O custo benefício dessa máquina foi ótimo. Porém, lógico, a assistência da HP e Dell são realmente melhor. Mas pelo tempo que utilizamos o Acer antigo sem nenhum problema, não tivemos medo em substituir por outro. E até o momento não temos motivo para
RES: [delphi-br] Ajuca com SQL
Grande Jose, olha, o resultado foi o mesmo, todas as duas opções (a minha e a sua com left outer join) deram o mesmo resultado. estou fazendo teste com coalesce... Vinicius Tenta assim : SELECT A.CDPEDIDO, A.DATAEVENTO, A.VALOR, SUM( G.VALORPAGTO ) FROM BDPEDIDOS A LEFT OUTER JOIN BDPAGAMENTOS G ON A.CDPEDIDO = G.CDPEDIDO WHERE A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Entendeu ? Vê se funciona. --- Em sex, 27/3/09, Vinicius da Silva Pinto vinic...@cnen.gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen.gov.br Assunto: [delphi-br] Ajuca com SQL Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 27 de Março de 2009, 15:33 Ve se alguem pode me ajudar, já quebrei a cabeça e não obtive o resultado satisfatório. São duas tabelas, bem simples uma com os dados de um pedido com codigo, nome...e ValorTotal. Na outra tabela, a de pagamentos, só tem registro quando o cliente paga, pode ser a vista ou parcelado. As duas tabelas são unidas pelo campo CDpedido O que eu quero é o seguinte... um relação de todos os pedidos que ainda não pagaram o valor total. Fiz a seguinte query: SELECT A.CDPEDIDO, A.dataevento, A.valor AS VALORTOTAL, SUM(G.ValorPgto) AS TOTALPAGO FROM BDpedidos A, BDpagamentos G WHERE G.CDpedido = A.CDpedido AND A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Funciona, só que só aparecem os pedidos que já tiveram algum pagamento, os registros que estão na tabela principal que ainda não tiveram nenhum pagamento, não sai... Pergunta . como faço para aparecer tbm os registros que não tiveram pagamento. Agradeço qualquer ajuda ou dica. Vinicius Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
RES: [delphi-br] Ajuca com SQL
Você tentou com a SQL que te passei? select num_pedido from pedido where vl_pedido (select coalesce(sum( vl_pagamento) , 0) from pagamento where cd_pedido = pedido.cd_pedido) Luciano Calenzani Simões Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro ao entrar no IBExpert
A solução que encontrei na home do ibExpert é a seguinte : Excluir o arquivo *IBExpert.dir* que está na pasta C:\Documents and Settings\Nome_Do_Usuario\Application Data\HK-Software\IBExpert []s Paulo Botelho 2009/3/31 Leandro - Grupos leacarbone...@yahoo.com.br E ai Moacir... blz... estranho mesmo, eu sai para o almoço e estava tudo ok, quando voltei começou a dar isso Tentei de tudo o que vc puder imaginar e não consegui. Eu tenho uma versão do IBExpert mais exuta, não é nem instalada, é só o executável, é mais limitada, mas funciona perfeitinho, se vc quiser me passa o teu email que te mando ela, pra ir pelo menos quebrando o galho... Se descobrir alguma coisa te aviso... Abraço Leandro Carbonera (54) 9977-1266 lean...@sigmatecnologia.com.br leandro%40sigmatecnologia.com.br www.sigmatecnologia.com.br -Mensagem original- De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Moacir - GMail Enviada em: terça-feira, 31 de março de 2009 14:32 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Erro ao entrar no IBExpert Opa !! Estou exatamente com o mesmo problema aqui em duas maquinas diferentes!! Começou esta manhã. Qualquer informação é bem vinda Moacir Leandro - Grupos escreveu: E ai pessoal blz... Seguinte, de uma hora para a outra meu ibexpert começou a apresentar a seguinte mensagem quando tento abri-lo Ungültiges Argument zum Codieren des Datums e para por ai Já procurei na internet, mas não achei nada a respeito, tentei desinstalar e instalar outras versões mas dá a mesma coisa... Alguém tem alguma idéia do que seja isso!! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Informação do NOD32 IMON 3977 (20090331) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ [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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Ajuca com SQL
Luciano, a sua funcionou: select CDPEDIDO, VALOR from BDpedidos where VALOR (select coalesce(sum(ValorPgto) , 0) from BDpagamentos where cdpedido = BDpedidos.cdpedido) Me retornou os numeros dos pedidos corretos, só que eu preciso que me retorne tbm o montante já pago. Quando eu coloco o SUM no primeiro select, volto a situação anterior. O retorno deve ser tipo assim: PEDIDO VALORTOTAL VALORPAGO 1500 200 3600 5400 50 6290 150 7450 8600 99 320 100 Eu consigo mais estou fazendo duas querys... em uma só tá dificil. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]em nome de Luciano Calenzani Simões Enviada em: quarta-feira, 1 de abril de 2009 08:05 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Ajuca com SQL Você tentou com a SQL que te passei? select num_pedido from pedido where vl_pedido (select coalesce(sum( vl_pagamento) , 0) from pagamento where cd_pedido = pedido.cd_pedido) Luciano Calenzani Simões Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
[delphi-br] Tradução Delphi 2007
Pessoal, algum mágico aqui já conseguiu traduzir o Delphi 2007?? Alex [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Me expliquem o porque por favor.
Tenta fazer assim: procedure TForm1.Button1Click(Sender: TObject); begin Label1.Visible := False; Application.ProcessMessages; Sleep(5000); Label1.Visible := True; Application.ProcessMessages; end; --- Em delphi-br@yahoogrupos.com.br, Roberto wa...@... escreveu Tenho num form um botão e um label (visible =false) Ao clicar no botão na primeira vez, o label apaga e depois do tempo decorrido sleep acende normalmente. Porque ao clicar nas vezes seguinte não apaga e acende depois do tempo, fica sempre aceso? Já resolvi o assunto, mudando o foco para outro componente e depois retornando ao clicar, ainda assim não entendo porque acende e não apaga mais. procedure TForm1.Button1Click(Sender: TObject); begin Label1.Visible := false; // esta não acontece na segunda vez em diante sleep(5000); Label1.Visible := true; end; Roberto(RJ) Em tempo, mesmo com tempos maiores, continua o problema [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Ajuca com SQL
Vou fazer de uma forma que o Sybase suporte, não sei no seu SGDB. select CDPEDIDO, VALOR, (select coalesce(sum( ValorPgto) , 0) from BDpagamentos where cdpedido = BDpedidos.cdpedido) VALOR_PAGO from BDpedidos where VALOR VALOR_PAGO Luciano Calenzani Simões De: Vinicius da Silva Pinto vinic...@cnen.gov.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 1 de Abril de 2009 8:34:05 Assunto: RES: [delphi-br] Ajuca com SQL Luciano, a sua funcionou: select CDPEDIDO, VALOR from BDpedidos where VALOR (select coalesce(sum( ValorPgto) , 0) from BDpagamentos where cdpedido = BDpedidos.cdpedido) Me retornou os numeros dos pedidos corretos, só que eu preciso que me retorne tbm o montante já pago. Quando eu coloco o SUM no primeiro select, volto a situação anterior. O retorno deve ser tipo assim: PEDIDO VALORTOTAL VALORPAGO 1500 200 3600 5400 50 6290 150 7450 8600 99 320 100 Eu consigo mais estou fazendo duas querys... em uma só tá dificil. Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Ajuca com SQL
Complicado, hein, Vinicius. Será que não é o HAVING ? Porque o LEFT OUTER JOIN vai retornar nulo se o registro não existir. A dúvida que fica é como o HAVING trataria isso ... --- Em qua, 1/4/09, Vinicius da Silva Pinto vinic...@cnen.gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen.gov.br Assunto: RES: [delphi-br] Ajuca com SQL Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 1 de Abril de 2009, 7:56 Grande Jose, olha, o resultado foi o mesmo, todas as duas opções (a minha e a sua com left outer join) deram o mesmo resultado. estou fazendo teste com coalesce... Vinicius Tenta assim : SELECT A.CDPEDIDO, A.DATAEVENTO, A.VALOR, SUM( G.VALORPAGTO ) FROM BDPEDIDOS A LEFT OUTER JOIN BDPAGAMENTOS G ON A.CDPEDIDO = G.CDPEDIDO WHERE A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Entendeu ? Vê se funciona. --- Em sex, 27/3/09, Vinicius da Silva Pinto vinic...@cnen. gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen. gov.br Assunto: [delphi-br] Ajuca com SQL Para: delphi...@yahoogrup os.com.br Data: Sexta-feira, 27 de Março de 2009, 15:33 Ve se alguem pode me ajudar, já quebrei a cabeça e não obtive o resultado satisfatório. São duas tabelas, bem simples uma com os dados de um pedido com codigo, nome...e ValorTotal. Na outra tabela, a de pagamentos, só tem registro quando o cliente paga, pode ser a vista ou parcelado. As duas tabelas são unidas pelo campo CDpedido O que eu quero é o seguinte... um relação de todos os pedidos que ainda não pagaram o valor total. Fiz a seguinte query: SELECT A.CDPEDIDO, A.dataevento, A.valor AS VALORTOTAL, SUM(G.ValorPgto) AS TOTALPAGO FROM BDpedidos A, BDpagamentos G WHERE G.CDpedido = A.CDpedido AND A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Funciona, só que só aparecem os pedidos que já tiveram algum pagamento, os registros que estão na tabela principal que ainda não tiveram nenhum pagamento, não sai... Pergunta . como faço para aparecer tbm os registros que não tiveram pagamento. Agradeço qualquer ajuda ou dica. Vinicius Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RES: RES: [delphi-br] Ajuca com SQL
Utilizando HEAVING, ele reclama do campo VALOR_PAGO select a.CDPEDIDO, a.VALOR, (select coalesce(sum(b.ValorPgto) , 0) from BDpagamentos b where b.cdpedido = a.cdpedido) VALOR_PAGO from BDpedidos a group by a.CDpedido, a.Valor HAVING A.VALOR VALOR_PAGO Retirando Group by e heavin, funciona que é uma beleza, mais traz tbm todos os registros pagos integralmente. Estou fazendo diversos testes utilizando o IBexpert em uma base INTERBASE 6.5 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]em nome de José Roberto Marque Enviada em: quarta-feira, 1 de abril de 2009 08:37 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Ajuca com SQL Complicado, hein, Vinicius. Será que não é o HAVING ? Porque o LEFT OUTER JOIN vai retornar nulo se o registro não existir. A dúvida que fica é como o HAVING trataria isso ... --- Em qua, 1/4/09, Vinicius da Silva Pinto vinic...@cnen.gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen.gov.br Assunto: RES: [delphi-br] Ajuca com SQL Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 1 de Abril de 2009, 7:56 Grande Jose, olha, o resultado foi o mesmo, todas as duas opções (a minha e a sua com left outer join) deram o mesmo resultado. estou fazendo teste com coalesce... Vinicius Tenta assim : SELECT A.CDPEDIDO, A.DATAEVENTO, A.VALOR, SUM( G.VALORPAGTO ) FROM BDPEDIDOS A LEFT OUTER JOIN BDPAGAMENTOS G ON A.CDPEDIDO = G.CDPEDIDO WHERE A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Entendeu ? Vê se funciona. --- Em sex, 27/3/09, Vinicius da Silva Pinto vinic...@cnen. gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen. gov.br Assunto: [delphi-br] Ajuca com SQL Para: delphi...@yahoogrup os.com.br Data: Sexta-feira, 27 de Março de 2009, 15:33 Ve se alguem pode me ajudar, já quebrei a cabeça e não obtive o resultado satisfatório. São duas tabelas, bem simples uma com os dados de um pedido com codigo, nome...e ValorTotal. Na outra tabela, a de pagamentos, só tem registro quando o cliente paga, pode ser a vista ou parcelado. As duas tabelas são unidas pelo campo CDpedido O que eu quero é o seguinte... um relação de todos os pedidos que ainda não pagaram o valor total. Fiz a seguinte query: SELECT A.CDPEDIDO, A.dataevento, A.valor AS VALORTOTAL, SUM(G.ValorPgto) AS TOTALPAGO FROM BDpedidos A, BDpagamentos G WHERE G.CDpedido = A.CDpedido AND A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Funciona, só que só aparecem os pedidos que já tiveram algum pagamento, os registros que estão na tabela principal que ainda não tiveram nenhum pagamento, não sai... Pergunta . como faço para aparecer tbm os registros que não tiveram pagamento. Agradeço qualquer ajuda ou dica. Vinicius Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
RES: [delphi-br] Ajuca com SQL
Testou desta forma? select CDPEDIDO, VALOR, (select coalesce(sum( ValorPgto) , 0) from BDpagamentos where cdpedido = BDpedidos.cdpedido) VALOR_PAGO from BDpedidos where VALOR VALOR_PAGO Luciano Calenzani Simões De: Vinicius da Silva Pinto vinic...@cnen.gov.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 1 de Abril de 2009 9:26:09 Assunto: RES: RES: [delphi-br] Ajuca com SQL Utilizando HEAVING, ele reclama do campo VALOR_PAGO select a.CDPEDIDO, a.VALOR, (select coalesce(sum( b.ValorPgto) , 0) from BDpagamentos b where b.cdpedido = a.cdpedido) VALOR_PAGO from BDpedidos a group by a.CDpedido, a.Valor HAVING A.VALOR VALOR_PAGO Retirando Group by e heavin, funciona que é uma beleza, mais traz tbm todos os registros pagos integralmente. Estou fazendo diversos testes utilizando o IBexpert em uma base INTERBASE 6.5 -Mensagem original - De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br]Em nome de José Roberto Marque Enviada em: quarta-feira, 1 de abril de 2009 08:37 Para: delphi...@yahoogrup os.com.br Assunto: Re: RES: [delphi-br] Ajuca com SQL Complicado, hein, Vinicius. Será que não é o HAVING ? Porque o LEFT OUTER JOIN vai retornar nulo se o registro não existir. A dúvida que fica é como o HAVING trataria isso ... --- Em qua, 1/4/09, Vinicius da Silva Pinto vinic...@cnen. gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen. gov.br Assunto: RES: [delphi-br] Ajuca com SQL Para: delphi...@yahoogrup os.com.br Data: Quarta-feira, 1 de Abril de 2009, 7:56 Grande Jose, olha, o resultado foi o mesmo, todas as duas opções (a minha e a sua com left outer join) deram o mesmo resultado. estou fazendo teste com coalesce... Vinicius Tenta assim : SELECT A.CDPEDIDO, A.DATAEVENTO, A.VALOR, SUM( G.VALORPAGTO ) FROM BDPEDIDOS A LEFT OUTER JOIN BDPAGAMENTOS G ON A.CDPEDIDO = G.CDPEDIDO WHERE A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Entendeu ? Vê se funciona. --- Em sex, 27/3/09, Vinicius da Silva Pinto vinic...@cnen. gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen. gov.br Assunto: [delphi-br] Ajuca com SQL Para: delphi...@yahoogrup os.com.br Data: Sexta-feira, 27 de Março de 2009, 15:33 Ve se alguem pode me ajudar, já quebrei a cabeça e não obtive o resultado satisfatório. São duas tabelas, bem simples uma com os dados de um pedido com codigo, nome...e ValorTotal. Na outra tabela, a de pagamentos, só tem registro quando o cliente paga, pode ser a vista ou parcelado. As duas tabelas são unidas pelo campo CDpedido O que eu quero é o seguinte... um relação de todos os pedidos que ainda não pagaram o valor total. Fiz a seguinte query: SELECT A.CDPEDIDO, A.dataevento, A.valor AS VALORTOTAL, SUM(G.ValorPgto) AS TOTALPAGO FROM BDpedidos A, BDpagamentos G WHERE G.CDpedido = A.CDpedido AND A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Funciona, só que só aparecem os pedidos que já tiveram algum pagamento, os registros que estão na tabela principal que ainda não tiveram nenhum pagamento, não sai... Pergunta . como faço para aparecer tbm os registros que não tiveram pagamento. Agradeço qualquer ajuda ou dica. Vinicius Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Ajuca com SQL
Sim, ele reclama logo de cara do campo VALOR_PAGO, mesmo colocando HAVING -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]em nome de Luciano Calenzani Simões Enviada em: quarta-feira, 1 de abril de 2009 09:40 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Ajuca com SQL Testou desta forma? select CDPEDIDO, VALOR, (select coalesce(sum( ValorPgto) , 0) from BDpagamentos where cdpedido = BDpedidos.cdpedido) VALOR_PAGO from BDpedidos where VALOR VALOR_PAGO Luciano Calenzani Simões De: Vinicius da Silva Pinto vinic...@cnen.gov.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 1 de Abril de 2009 9:26:09 Assunto: RES: RES: [delphi-br] Ajuca com SQL Utilizando HEAVING, ele reclama do campo VALOR_PAGO select a.CDPEDIDO, a.VALOR, (select coalesce(sum( b.ValorPgto) , 0) from BDpagamentos b where b.cdpedido = a.cdpedido) VALOR_PAGO from BDpedidos a group by a.CDpedido, a.Valor HAVING A.VALOR VALOR_PAGO Retirando Group by e heavin, funciona que é uma beleza, mais traz tbm todos os registros pagos integralmente. Estou fazendo diversos testes utilizando o IBexpert em uma base INTERBASE 6.5 -Mensagem original - De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br]Em nome de José Roberto Marque Enviada em: quarta-feira, 1 de abril de 2009 08:37 Para: delphi...@yahoogrup os.com.br Assunto: Re: RES: [delphi-br] Ajuca com SQL Complicado, hein, Vinicius. Será que não é o HAVING ? Porque o LEFT OUTER JOIN vai retornar nulo se o registro não existir. A dúvida que fica é como o HAVING trataria isso ... --- Em qua, 1/4/09, Vinicius da Silva Pinto vinic...@cnen. gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen. gov.br Assunto: RES: [delphi-br] Ajuca com SQL Para: delphi...@yahoogrup os.com.br Data: Quarta-feira, 1 de Abril de 2009, 7:56 Grande Jose, olha, o resultado foi o mesmo, todas as duas opções (a minha e a sua com left outer join) deram o mesmo resultado. estou fazendo teste com coalesce... Vinicius Tenta assim : SELECT A.CDPEDIDO, A.DATAEVENTO, A.VALOR, SUM( G.VALORPAGTO ) FROM BDPEDIDOS A LEFT OUTER JOIN BDPAGAMENTOS G ON A.CDPEDIDO = G.CDPEDIDO WHERE A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Entendeu ? Vê se funciona. --- Em sex, 27/3/09, Vinicius da Silva Pinto vinic...@cnen. gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen. gov.br Assunto: [delphi-br] Ajuca com SQL Para: delphi...@yahoogrup os.com.br Data: Sexta-feira, 27 de Março de 2009, 15:33 Ve se alguem pode me ajudar, já quebrei a cabeça e não obtive o resultado satisfatório. São duas tabelas, bem simples uma com os dados de um pedido com codigo, nome...e ValorTotal. Na outra tabela, a de pagamentos, só tem registro quando o cliente paga, pode ser a vista ou parcelado. As duas tabelas são unidas pelo campo CDpedido O que eu quero é o seguinte... um relação de todos os pedidos que ainda não pagaram o valor total. Fiz a seguinte query: SELECT A.CDPEDIDO, A.dataevento, A.valor AS VALORTOTAL, SUM(G.ValorPgto) AS TOTALPAGO FROM BDpedidos A, BDpagamentos G WHERE G.CDpedido = A.CDpedido AND A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Funciona, só que só aparecem os pedidos que já tiveram algum pagamento, os registros que estão na tabela principal que ainda não tiveram nenhum pagamento, não sai... Pergunta . como faço para aparecer tbm os registros que não tiveram pagamento. Agradeço qualquer ajuda ou dica. Vinicius Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
RES: [delphi-br] Ajuca com SQL
Isso que esta me deixando maluco, nesta situação: select a.CDPEDIDO, a.VALOR, (select coalesce(sum(b.ValorPgto) , 0) from BDpagamentos b where b.cdpedido = a.cdpedido) VALOR_PAGO from BDpedidos a group by a.CDpedido, a.Valor, VALOR_PAGO o resultado são tres colunas, CDPEDIDO, VALOR e VALOR_PAGO Mais se eu acrescento HAVING: select a.CDPEDIDO, a.VALOR, (select coalesce(sum(b.ValorPgto) , 0) from BDpagamentos b where b.cdpedido = a.cdpedido) VALOR_PAGO from BDpedidos a group by a.CDpedido, a.Valor, VALOR_PAGO having VALOR VALOR_PAGO me retorna o seguinte erro: Column does not belong to referenced table. Dynamic SQL Error. SQL error code = -206. Column unknown. VALORGERAL. At line 5, column 17. é coisa de doido -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]em nome de Vinicius da Silva Pinto Enviada em: quarta-feira, 1 de abril de 2009 09:43 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Ajuca com SQL Sim, ele reclama logo de cara do campo VALOR_PAGO, mesmo colocando HAVING -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]em nome de Luciano Calenzani Simões Enviada em: quarta-feira, 1 de abril de 2009 09:40 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Ajuca com SQL Testou desta forma? select CDPEDIDO, VALOR, (select coalesce(sum( ValorPgto) , 0) from BDpagamentos where cdpedido = BDpedidos.cdpedido) VALOR_PAGO from BDpedidos where VALOR VALOR_PAGO Luciano Calenzani Simões De: Vinicius da Silva Pinto vinic...@cnen.gov.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 1 de Abril de 2009 9:26:09 Assunto: RES: RES: [delphi-br] Ajuca com SQL Utilizando HEAVING, ele reclama do campo VALOR_PAGO select a.CDPEDIDO, a.VALOR, (select coalesce(sum( b.ValorPgto) , 0) from BDpagamentos b where b.cdpedido = a.cdpedido) VALOR_PAGO from BDpedidos a group by a.CDpedido, a.Valor HAVING A.VALOR VALOR_PAGO Retirando Group by e heavin, funciona que é uma beleza, mais traz tbm todos os registros pagos integralmente. Estou fazendo diversos testes utilizando o IBexpert em uma base INTERBASE 6.5 -Mensagem original - De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br]Em nome de José Roberto Marque Enviada em: quarta-feira, 1 de abril de 2009 08:37 Para: delphi...@yahoogrup os.com.br Assunto: Re: RES: [delphi-br] Ajuca com SQL Complicado, hein, Vinicius. Será que não é o HAVING ? Porque o LEFT OUTER JOIN vai retornar nulo se o registro não existir. A dúvida que fica é como o HAVING trataria isso ... --- Em qua, 1/4/09, Vinicius da Silva Pinto vinic...@cnen. gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen. gov.br Assunto: RES: [delphi-br] Ajuca com SQL Para: delphi...@yahoogrup os.com.br Data: Quarta-feira, 1 de Abril de 2009, 7:56 Grande Jose, olha, o resultado foi o mesmo, todas as duas opções (a minha e a sua com left outer join) deram o mesmo resultado. estou fazendo teste com coalesce... Vinicius Tenta assim : SELECT A.CDPEDIDO, A.DATAEVENTO, A.VALOR, SUM( G.VALORPAGTO ) FROM BDPEDIDOS A LEFT OUTER JOIN BDPAGAMENTOS G ON A.CDPEDIDO = G.CDPEDIDO WHERE A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Entendeu ? Vê se funciona. --- Em sex, 27/3/09, Vinicius da Silva Pinto vinic...@cnen. gov.br escreveu: De: Vinicius da Silva Pinto vinic...@cnen. gov.br Assunto: [delphi-br] Ajuca com SQL Para: delphi...@yahoogrup os.com.br Data: Sexta-feira, 27 de Março de 2009, 15:33 Ve se alguem pode me ajudar, já quebrei a cabeça e não obtive o resultado satisfatório. São duas tabelas, bem simples uma com os dados de um pedido com codigo, nome...e ValorTotal. Na outra tabela, a de pagamentos, só tem registro quando o cliente paga, pode ser a vista ou parcelado. As duas tabelas são unidas pelo campo CDpedido O que eu quero é o seguinte... um relação de todos os pedidos que ainda não pagaram o valor total. Fiz a seguinte query: SELECT A.CDPEDIDO, A.dataevento, A.valor AS VALORTOTAL, SUM(G.ValorPgto) AS TOTALPAGO FROM BDpedidos A, BDpagamentos G WHERE G.CDpedido = A.CDpedido AND A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Funciona, só que só aparecem os pedidos que já tiveram algum pagamento, os registros que estão na tabela principal que ainda não tiveram nenhum pagamento, não sai... Pergunta . como faço para aparecer tbm os registros que não tiveram pagamento. Agradeço qualquer ajuda ou dica. Vinicius Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com
[delphi-br] Formatar campo
Utilizo DBExpress, Firebird 1.5 e tenho um campo Numeric(12,2) Formato ele no grid assim: qConsulta é um SQLQuery. (qConsulta.FieldByName('VALOR') as TNumericField).DisplayFormat := '#0.00'; Mas ele não está formatando numeros inteiros. Fica assim no Grid. 12,20 18 23,22 Fiz teste aumentando uma casa decimal e ainda... 12,200 18 23,220 Alguém sabe porque? Ja procurei outras formas, e todas, acontece a mesma coisa.
RES: [delphi-br] Formatar campo
Bom dia Também já tive este problema, na época também não achei uma solução viável mesmo fazendo muitas pesquisas, inclusive terminei achando que poderia ser um erro do Delphi, para resolver eu criei o meu campo como sendo DoublePrecision, nunca mais tive problemas... Na verdade aconselho o uso de campos Double precision quando existe a necessidade campos para trabalhar com casas decimais... att. Juliano De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de deco0_07 Enviada em: quarta-feira, 1 de abril de 2009 10:28 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Formatar campo Utilizo DBExpress, Firebird 1.5 e tenho um campo Numeric(12,2) Formato ele no grid assim: qConsulta é um SQLQuery. (qConsulta.FieldByName('VALOR') as TNumericField).DisplayFormat := '#0.00'; Mas ele não está formatando numeros inteiros. Fica assim no Grid. 12,20 18 23,22 Fiz teste aumentando uma casa decimal e ainda... 12,200 18 23,220 Alguém sabe porque? Ja procurei outras formas, e todas, acontece a mesma coisa. __ Informação do NOD32 IMON 3980 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Formatar campo
André, Tive fazendo alguns testes aqui na versão 2007 do Delphi, para ver se o problema persiste, de duas uma, na época que fiz os testes, eu tentava inclusive formatar em um TClientDataSet e mesmo assim não funcionava por isso passei a achar que poderia ser um problema do Delphi, bem, segue o que fiz, tente ai... lembrando que fiz no Delphi 2007, formatei a informação no ClientDataSet. Pois se você tem que exibir as informações em um Grid, você terá que utilizar o ClientDataSet with qryProfessores do begin SQL.Add('SELECT PROF_ID, PROF_SALARIO FROM PROFESSORES'); end; cdsProfessores.Open; (cdsProfessores.FieldByName('PROF_SALARIO') as TNumericField).DisplayFormat := '#0.00'; De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de deco0_07 Enviada em: quarta-feira, 1 de abril de 2009 10:28 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Formatar campo Utilizo DBExpress, Firebird 1.5 e tenho um campo Numeric(12,2) Formato ele no grid assim: qConsulta é um SQLQuery. (qConsulta.FieldByName('VALOR') as TNumericField).DisplayFormat := '#0.00'; Mas ele não está formatando numeros inteiros. Fica assim no Grid. 12,20 18 23,22 Fiz teste aumentando uma casa decimal e ainda... 12,200 18 23,220 Alguém sabe porque? Ja procurei outras formas, e todas, acontece a mesma coisa. __ Informação do NOD32 IMON 3980 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Ajuca com SQL
AS VALORTOTAL, SUM(G.ValorPgto) AS TOTALPAGO FROM BDpedidos A, BDpagamentos G WHERE G.CDpedido = A.CDpedido AND A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Funciona, só que só aparecem os pedidos que já tiveram algum pagamento, os registros que estão na tabela principal que ainda não tiveram nenhum pagamento, não sai... Pergunta . como faço para aparecer tbm os registros que não tiveram pagamento. Agradeço qualquer ajuda ou dica. Vinicius Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Informação do NOD32 IMON 3980 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Re: Me expliquem o porque por favor.
Ao André e Saulofg, agradeço pelo atendimento, realmente resolveu com o Application.ProcessMessages; Obrigado Roberto (RJ) De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de saulofg Enviada em: quarta-feira, 1 de abril de 2009 08:45 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: Me expliquem o porque por favor. Tenta fazer assim: procedure TForm1.Button1Click(Sender: TObject); begin Label1.Visible := False; Application.ProcessMessages; Sleep(5000); Label1.Visible := True; Application.ProcessMessages; end; --- Em delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br , Roberto wa...@... escreveu Tenho num form um botão e um label (visible =false) Ao clicar no botão na primeira vez, o label apaga e depois do tempo decorrido sleep acende normalmente. Porque ao clicar nas vezes seguinte não apaga e acende depois do tempo, fica sempre aceso? Já resolvi o assunto, mudando o foco para outro componente e depois retornando ao clicar, ainda assim não entendo porque acende e não apaga mais. procedure TForm1.Button1Click(Sender: TObject); begin Label1.Visible := false; // esta não acontece na segunda vez em diante sleep(5000); Label1.Visible := true; end; Roberto(RJ) Em tempo, mesmo com tempos maiores, continua o problema [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Ajuca com SQL
ValorTotal. Na outra tabela, a de pagamentos, só tem registro quando o cliente paga, pode ser a vista ou parcelado. As duas tabelas são unidas pelo campo CDpedido O que eu quero é o seguinte... um relação de todos os pedidos que ainda não pagaram o valor total. Fiz a seguinte query: SELECT A.CDPEDIDO, A.dataevento, A.valor AS VALORTOTAL, SUM(G.ValorPgto) AS TOTALPAGO FROM BDpedidos A, BDpagamentos G WHERE G.CDpedido = A.CDpedido AND A.DATAEVENTO = '01/04/2009' GROUP BY CDPEDIDO, DATAEVENTO, VALOR HAVING SUM(G.ValorPgto) A.valor Funciona, só que só aparecem os pedidos que já tiveram algum pagamento, os registros que estão na tabela principal que ainda não tiveram nenhum pagamento, não sai... Pergunta . como faço para aparecer tbm os registros que não tiveram pagamento. Agradeço qualquer ajuda ou dica. Vinicius Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] - - -- -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Informação do NOD32 IMON 3980 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
[delphi-br] Resolvido - Formatar campo
Boa tarde Juliano. Na internet acabei encontrando este link http://www.mail-archive.com/delphi-br@yahoogrupos.com.br/msg31610.html Mas acabei encontrando outra solução na propria select ao inves de passar apenas o campo VALOR, passo CAST(VALOR AS FLOAT) aí nem preciso formatar no clientdataset que funciona.. Obrigado pela ajuda --- Em delphi-br@yahoogrupos.com.br, Juliano Silva - Yahoo smjjuli...@... escreveu André, Tive fazendo alguns testes aqui na versão 2007 do Delphi, para ver se o problema persiste, de duas uma, na época que fiz os testes, eu tentava inclusive formatar em um TClientDataSet e mesmo assim não funcionava por isso passei a achar que poderia ser um problema do Delphi, bem, segue o que fiz, tente ai... lembrando que fiz no Delphi 2007, formatei a informação no ClientDataSet. Pois se você tem que exibir as informações em um Grid, você terá que utilizar o ClientDataSet with qryProfessores do begin SQL.Add('SELECT PROF_ID, PROF_SALARIO FROM PROFESSORES'); end; cdsProfessores.Open; (cdsProfessores.FieldByName('PROF_SALARIO') as TNumericField).DisplayFormat := '#0.00';
RES: [delphi-br] Resolvido - Formatar campo
Ao menos agora sabemos que realmente é um problema... no Delphi 2007 já está corrigido... De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de deco0_07 Enviada em: quarta-feira, 1 de abril de 2009 12:38 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Resolvido - Formatar campo Boa tarde Juliano. Na internet acabei encontrando este link http://www.mail-archive.com/delphi-br@yahoogrupos.com.br/msg31610.html Mas acabei encontrando outra solução na propria select ao inves de passar apenas o campo VALOR, passo CAST(VALOR AS FLOAT) aí nem preciso formatar no clientdataset que funciona.. Obrigado pela ajuda --- Em delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br , Juliano Silva - Yahoo smjjuli...@... escreveu André, Tive fazendo alguns testes aqui na versão 2007 do Delphi, para ver se o problema persiste, de duas uma, na época que fiz os testes, eu tentava inclusive formatar em um TClientDataSet e mesmo assim não funcionava por isso passei a achar que poderia ser um problema do Delphi, bem, segue o que fiz, tente ai... lembrando que fiz no Delphi 2007, formatei a informação no ClientDataSet. Pois se você tem que exibir as informações em um Grid, você terá que utilizar o ClientDataSet with qryProfessores do begin SQL.Add('SELECT PROF_ID, PROF_SALARIO FROM PROFESSORES'); end; cdsProfessores.Open; (cdsProfessores.FieldByName('PROF_SALARIO') as TNumericField).DisplayFormat := '#0.00'; __ Informação do NOD32 IMON 3980 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] saber quando o PC entrou na tela de descanço
boa tarde, queria saber qual comando que eu uso para saber quando o Windows entra na tela de descanço ... []s .. Felipe Milagres Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com
RE: [delphi-br] sabe r quando o PC entrou na tela de descanço
Para identificar se está ativo o screen saver (a.k.a.¹ tela de DESCANSO), você terá que interceptar e tratar a mensagem do Windows SC_SCREENSAVE. Veja exemplo em http://www.swissdelphicenter.ch/en/showcode.php?id=344. P.S.: (1)A.K.A. = As Known As (também conhecido como) To: delphi-br@yahoogrupos.com.br From: felipe_a_milag...@yahoo.com.br Date: Wed, 1 Apr 2009 10:08:53 -0700 Subject: [delphi-br] saber quando o PC entrou na tela de descanço boa tarde, queria saber qual comando que eu uso para saber quando o Windows entra na tela de descanço ... []s .. Felipe Milagres Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com _ Messenger 2009: Instale já! http://download.live.com [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] sabe r quando o PC entrou na tela de descanço
Apenas ratificando a resposta. Não é um comando de q vc precisa, e sim interagir com mensagens do Windows. Em casos onde a programação é muito específica (como este), nem sempre a coisa está pronta e consolidada a ponto de ser chamada por meio de uma função ou rotina. Muito menos comando! Sds. To: delphi-br@yahoogrupos.com.br From: djpardalro...@hotmail.com Date: Wed, 1 Apr 2009 17:22:48 + Subject: RE: [delphi-br] saber quando o PC entrou na tela de descanço Para identificar se está ativo o screen saver (a.k.a.¹ tela de DESCANSO), você terá que interceptar e tratar a mensagem do Windows SC_SCREENSAVE. Veja exemplo em http://www.swissdelphicenter.ch/en/showcode.php?id=344. P.S.: (1)A.K.A. = As Known As (também conhecido como) To: delphi-br@yahoogrupos.com.br From: felipe_a_milag...@yahoo.com.br Date: Wed, 1 Apr 2009 10:08:53 -0700 Subject: [delphi-br] saber quando o PC entrou na tela de descanço boa tarde, queria saber qual comando que eu uso para saber quando o Windows entra na tela de descanço ... []s .. Felipe Milagres Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com __ Messenger 2009: Instale já! http://download.live.com [As partes desta mensagem que não continham texto foram removidas] _ Emoticons e Winks super diferentes para o Messenger. Baixe agora, é grátis! http://specials.br.msn.com/ilovemessenger/pacotes.aspx [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gerar Vetor Dinâmico
Você poderia, ao invés de usar a variável k, usar a variável i acrescida de algum fator. Você poderia pegar um valor a partir da hora atual pra gerar esse fator. O exemplo abaixo cria um número com 3 algarismos a partir do final da hora. var iFator : Integer; sHora : String; begin sHora := DateTimeToStr(Now); sHora := StringReplace(sHora, '/', '', [rfReplaceAll]); sHora := StringReplace(sHora, ':', '', [rfReplaceAll]); sHora := StringReplace(sHora, ' ', '', [rfReplaceAll]); iFator := StrToInt(Copy(sHora, Length(sHora)-2, 3)); end; __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/
[delphi-br] [OFF-TOPIC] Criar mailing com Delphi
Amigos, Tenho um software que enviar e-mail (Indy) usando contas do Yahoo. No Yahoo, é possível enviar 100 e-mails por dias. Além disso, o provedor bloqueia afim de evitar spam. Minha dúvida é a seguinte: Se eu tiver 100 contas de e-mail no Yahoo e minha aplicação enviar 100 correspondências por cada conta por dia, o provedor vai me bloquear? Serei considerado spammer? Entrarei na lista negra? As pessoas que receberão os e-mails estão cientes (são associados de um time de futebol) e autorizam o envio das mensagens. O problema é que tenho que usar provedor gratuito. Quem conhece bem isso? Grato, Reinaldo [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gerar Vetor Dinâmico
Para gerar um numero faco assim .. chavearquivo := FormatDateTime('hhmmss',now) ; O que isso tem a ver com vetor?? att. Marcio At 15:45 1/4/2009 -0300, you wrote: Você poderia, ao invés de usar a variável k, usar a variável i acrescida de algum fator. Você poderia pegar um valor a partir da hora atual pra gerar esse fator. O exemplo abaixo cria um número com 3 algarismos a partir do final da hora. var iFator : Integer; sHora : String; begin sHora := DateTimeToStr(Now); sHora := StringReplace(sHora, '/', '', [rfReplaceAll]); sHora := StringReplace(sHora, ':', '', [rfReplaceAll]); sHora := StringReplace(sHora, ' ', '', [rfReplaceAll]); iFator := StrToInt(Copy(sHora, Length(sHora)-2, 3)); end; __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/http://br.beta.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [OFF-TOPIC] Criar mailing com Delphi
Reinaldo, Vou te dar uma sugestão bem diferente do que você perguntou: já pensou em criar um grupo no yahoo grupos pra enviar essas msgs? [] Andrei 2009/4/1 Reinaldo Aparecido Pereira ctocv...@yahoo.com.br Amigos, Tenho um software que enviar e-mail (Indy) usando contas do Yahoo. No Yahoo, é possível enviar 100 e-mails por dias. Além disso, o provedor bloqueia afim de evitar spam. Minha dúvida é a seguinte: Se eu tiver 100 contas de e-mail no Yahoo e minha aplicação enviar 100 correspondências por cada conta por dia, o provedor vai me bloquear? Serei considerado spammer? Entrarei na lista negra? As pessoas que receberão os e-mails estão cientes (são associados de um time de futebol) e autorizam o envio das mensagens. O problema é que tenho que usar provedor gratuito. Quem conhece bem isso? Grato, Reinaldo [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gerar Vetor Dinâmico
Para vedor dinamico voce pode usar assim .. Var arrayValue : array of variant; begin SetLength(arrayValue,Length(arrayValue) + 1); arrayValue[Length(arrayValue) - 1] := dataFinal; att. Marcio. At 15:45 1/4/2009 -0300, you wrote: Você poderia, ao invés de usar a variável k, usar a variável i acrescida de algum fator. Você poderia pegar um valor a partir da hora atual pra gerar esse fator. O exemplo abaixo cria um número com 3 algarismos a partir do final da hora. var iFator : Integer; sHora : String; begin sHora := DateTimeToStr(Now); sHora := StringReplace(sHora, '/', '', [rfReplaceAll]); sHora := StringReplace(sHora, ':', '', [rfReplaceAll]); sHora := StringReplace(sHora, ' ', '', [rfReplaceAll]); iFator := StrToInt(Copy(sHora, Length(sHora)-2, 3)); end; __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/http://br.beta.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] [OFF-TOPIC] Criar mailing com Delphi
Reinaldo Uma vez precisei de uma solução muito parecida com a sua, eu tinha que enviar um e-mail para uma lista de bem grande de clientes, e isso era constante, tive os mesmos problemas, bloqueio por parte do provedor, as caixas de e-mail dos clientes detectavam como Spam, etc... O que eu fiz? Crie um programa onde lia a lista de clientes que eu precisa enviar e-mail e envia um-a-um os e-mail para os clientes, com um delay configurado, normalmente eu deixava configurado para enviar um e-mail a cada 2 min, na época resolveu muito bem, não foi mais detectado como Spam e também não fui mais bloqueado pelo provedor, o inconveniente era que do primeiro cliente ao ultimo demorava em média 3 dias... Agora olhando as soluções apresentadas, foi bem interessante a questão de criar um grupo no Yahoo pena que o problema se torna quem vai cadastrar os e-mails rsrsrrs bem, ta aí algumas sugestões, a minha funcionou muito bem na época, inclusive usava Indy também... Juliano De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Andrei Luís Enviada em: quarta-feira, 1 de abril de 2009 17:25 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] [OFF-TOPIC] Criar mailing com Delphi Reinaldo, Vou te dar uma sugestão bem diferente do que você perguntou: já pensou em criar um grupo no yahoo grupos pra enviar essas msgs? [] Andrei 2009/4/1 Reinaldo Aparecido Pereira ctocv...@yahoo.com.br mailto:ctocvl_1%40yahoo.com.br Amigos, Tenho um software que enviar e-mail (Indy) usando contas do Yahoo. No Yahoo, é possível enviar 100 e-mails por dias. Além disso, o provedor bloqueia afim de evitar spam. Minha dúvida é a seguinte: Se eu tiver 100 contas de e-mail no Yahoo e minha aplicação enviar 100 correspondências por cada conta por dia, o provedor vai me bloquear? Serei considerado spammer? Entrarei na lista negra? As pessoas que receberão os e-mails estão cientes (são associados de um time de futebol) e autorizam o envio das mensagens. O problema é que tenho que usar provedor gratuito. Quem conhece bem isso? Grato, Reinaldo [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 3981 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Formatar campo
Olá galera, Já tentou definir a propriedade currency do Field para True (eu acho que tem) ? Pq daí vc esquece o DisplayFormat. []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo.com.br Gmail, GTalk: silviop...@gmail.com Hotmail, MSN: silviop...@hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ BlogSite: http://silvioprog.blogspot.com/ °oO| Seja livre, use Linux! |Oo° De: deco0_07 andre.alme...@medicator.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 1 de Abril de 2009 10:28:11 Assunto: [delphi-br] Formatar campo Utilizo DBExpress, Firebird 1.5 e tenho um campo Numeric(12,2) Formato ele no grid assim: qConsulta é um SQLQuery. (qConsulta.FieldByN ame('VALOR' ) as TNumericField) .DisplayFormat := '#0.00'; Mas ele não está formatando numeros inteiros. Fica assim no Grid. 12,20 18 23,22 Fiz teste aumentando uma casa decimal e ainda... 12,200 18 23,220 Alguém sabe porque? Ja procurei outras formas, e todas, acontece a mesma coisa. Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Off Topic - Notebook
Claudio eu discordo de você. A meu ver vale mais a pena comprar uma máquina com menos recursos, mas que não vá te incomodar do que comprar uma super máquina que poderá te dar problemas. Como já disse não temos boas experiências com Acer, pois esse necessita de muito cuidado para não dar problema. Trabalho com automação industrial e temos que agradecer quando arranjamos algum lugar para apoiar o note quando estamos no cliente fazendo um try out/startup. Nesse ponto não temos o que reclamar da Dell ou da HP pois são equipamentos extremamente resistentes. Claudiney Cogo escreveu: Olá Walter Concordo com você plenamente. Também sou adepto de gastar um pouco a mais e comprar o melhor pra não ter dor de cabeça depois. O que eu quis dizer é que a escolha pode ser diretamente influenciada pelo valor disponível que a pessoa tenha no momento da aquisição, pois os valores são realmente muito diferentes. Enquanto você paga uns 3.000 reais num Acer C2D com tudo de última geração, o equivalente em um Dell ou HP vai custar pelo menos uns 5.000 reais. A diferença é muito grande, justamente por causa da marca e do suporte e não porque o equipamento tem peças melhores, pois processador Intel é Intel em qualquer uma. Então se a compra é imprescindível e o valor disponível não dá pra comprar um HP ou um Dell com todas as vantagens que eles tem de suporte (e acho que é a única grande diferença entre eles), vai de Acer mesmo, de Asus, de Lenovo, ou de qualquer outro, pois vai resolver da mesma maneira o problema de ter uma máquina disponível para trabalho. Depois é só se organizar e na próxima troca tentar partir pra uma dessas marcas, se achar conveniente. Como eu disse, aqui eu tive notebook Asus e Acer por 4 anos sem ter um único dia parado. E funcionava dia e noite, pois ficava ligado no escritório, pois as vezes de casa precisava fazer acesso a eles. Nem todo dia era levado pra casa. Hoje temos Acer novos, também sem nenhum problema. Acho que a questão sorte no quesito precisar de assistência também vale, claro. Mas não dá pra dizer que as máquinas que não são Dell ou HP são ruins. Muito pelo contrário. O Acer 6930 que tenho hoje é um espetáculo de máquina. Se um dia der problema, aí é outra história. Sei que vou ter que correr atrás do conserto. Mas ela resolve todos os problemas que tenho no dia a dia. Agora, uma coisa você disse aí que tenho certeza que todos concordam... não se compra notebook em “camelô”, rsrs. Tem que ser em loja ou com um vendedor de confiança. Você tem que ter a quem recorrer na hora do aperto. Alguém pra espremer na parede... rsrsrs Abraço De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br] Em nome de Walter Chagas (Bol) Enviada em: terça-feira, 31 de março de 2009 15:18 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Off Topic - Notebook Claudiney, Vou concordar com voce e discordar ao mesmo tempo :) Como você disse, Dell e HP são marcas realmente conceituadas e de qualidade inquestionável. Por exemplo. Eu tenho um Latitude D520 a dois anos. Já caiu no chão uma vez e até hoje roda com a bateria original sem vicio. Viajava comigo pra tudo quanto é lado. Aguentava pouso de avião e buraqueira de estrada viajando na Caçamba da Strada da minha esposa e tá lá, justificando a reputação da marca. Graças a Deus nunca precisei da assistencia técnica dele. Este ano a Telemont me deu um dela, um D530 para eu parar de usar o meu em serviço. Tem 6 meses e funciona direto. Taqui agora, no batente sem chiar e nem reclamar. Concord com voce quando diz que o importante e o seu conteúdo. Recentemente a Telemont adiquiriu um lote de notebooks da marca Lenovo. todos eles vem com tudo interno Intel com Windows Vista. Ate agora tão funcionando beleza. Como voce mesmo disse. Se vai pagar, exija pelo menos que o hardware tenha procedencia confiável. Agora quanto a questão de custo, eu discordo de você. Se vai desembolsar, ainda mais pra um produto que vai acabar se tornando parte da sua vida, entao eu penso que deve-se, ainda que pagar mais caro, por QUALIDADE E CONFIABILIDADE. Pagar barato por um notebook que vai lhe dar mais problemas do que solução, não é a melhor das alternativas ainda mais praquilo que se pretende usar. Então, se vais comprar uma coisa que voce sabe que não poe dar pra trás contigo, que não pode deixar a peteca cair, então convem realmente pagar um pouco mais pra ter, não só qualidade, como também apoio e retaguarda de qualidade. E tem mais! É totalmente desaconselhável comprar notebook em shopping Popular/Camelódromos porque depois de comprado e pago, a garantia soy quem??? []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br mailto:wchagasj%40bol.com.br mailto:wchagasj%40bol.com.br
[delphi-br] Como abrir outro projeto diretamente no form requerido ?
A partir de um projeto em execução, como fazer para abrir outro projeto, e dentro deste outro projeto, um form diretamente, PORÉM, SEM DECLARÁ-LO NA USES DO 1º. PROJETO, E SIM PELO OnClick DO MENU DO 1º.PROJETO ?Exemplo: Projeto CORES composto SOMENTE pelo menu A-VERMELHO B-PRETO C-VERDE Projeto NOME composto pelos forms. JOAO PEDRO PAULO -Quando o usuário executar o CORES.EXE e clicar na opção A (VERMELHO) deverá ser aberto automaticamente o NOME.EXE, e dentro deste deverá ser aberto automaticamente o form JOAO. PORÉM: -Um projeto foi desenvolvido em Delphi 7, com vários componentes de terceiros próprios para esta versão -Outro projeto foi desenvolvido em Delphi 2007, também com vários componentes de terceiros, mas próprios para o D2007. -Devido a este fato não há como incluir no Path ou na Uses as units de um projeto no outro, pois na compilação ocorrerão vários erros devido a falta de diversos componentes de terceiros de uma versão na outra. Há solução para isso ? Agradeço antecipadamente a atenção dispensada. Dival
[delphi-br] Banco de dados/Distribuição
Bom dia a todos. Preciso montar um sistema e gostaria de informações sobre acesso a dados. Atualmente utilizo banco de dados MySql, e faço a conexão ao banco de dados apenas em execução. Algumas desvantagens desse processo é a distribuição. Primeiro por que preciso instalar o banco de dados no cliente, não descobri uma forma de automatizar isso na instalação do software e a outra desvantagem é a questão da conexão apenas em execução, no momento que estou utilizando o Delphi faço tudo via código. Relatórios, Grids, etc...etc... Gostaria de sugestões de banco de dados e forma de trabalho, afim de automatizar o sistema de distribuição da aplicação. Atenciosamente, Fernando José Ramos Figueira da Silva [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Retorno Stored Procedure Delphi x Mysql
DELIMITER $$; DROP PROCEDURE IF EXISTS `adm`.`sp_comissoes`$$ CREATE PROCEDURE `adm`.`sp_comissoes` (IN teste Varchar(50)) BEGIN select * from classepro where chav_cli = teste; END$$ DELIMITER ;$$ Essa é a chamada da procedure: call sp_comissoes(5) Dentro do mysql funciona mas quando uso o delphi ele fala que uma procedure não retorna recordset. Como eu fa isso ? aguém pode me ajudar ?
[delphi-br] INICIANTE DELPHI7
OLA GALERA USO O DELPHI FAZ POUCO TEMPO POIS ESTOU COM UM PROJETINHO DE CONTROLE DE ESTOQUE E PRESCISO DAR ANDAMAMENTO. MAS TENHO UMA DIFICULDADE, ESTOU USANDO O ADO E O BANCO EM ACESS COSTARIA DE SABER COMO MANIPULAR CULUNAS E TABELAS DENTRO DE OUTROS FORMS ,EXPLO COMO POSSO FAZER ENTRADA E SAIDA DE ESTOQUE E BAIXA NO ESTOQUE OBRIGADO ABRAÇO.
Re: [delphi-br] Erro com ClientDataSet X Cone xão Firebird
tambem pode apontar para localhost --- Em qua, 1/4/09, berdam berdamzi...@yahoo.com.br escreveu: De: berdam berdamzi...@yahoo.com.br Assunto: Re: [delphi-br] Erro com ClientDataSet X Conexão Firebird Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 1 de Abril de 2009, 1:28 tenta mudar o caminho de acesso para o nome ou ip real da máquina Huander escreveu: Pessoal, estou tenho um problema em um cliente, e por incrível que pareça só esta acontecendo com ele! Faz uma consulta utilizando um ClientDataSet que me retorna cerca de 1900 registros. Utilizo este retorno na impressão de um relatório (utilizando QuickReport), ao chegar nos 95% faltando uns 5 registros finais dá erro técnicamente de conexão com o banco de dados (ou rede) ... Aparecendo a seguinte mensagem de erro: “ Unable to complete network request to host 127.0.0.1. Failed to establish a connection. Normalmente é permitida apenas uma utilização de cada endereço de soquete (protocolo/endereço de rede/porta). “ Alguém ai já passou por algo semelhante e poderia me dar uma luz? Só pra completar estou executando o comando na própria máquina onde está o banco de dados. Agradeço a todos a colaboração! Huander Leão [As partes desta mensagem que não continham texto foram removidas] -- - Uberdam Cavaletti Formado em Tecnologia da informação - Unoesc - Xxe Pós graduado em Desenvolvimento Java - Unoesc - Xxe Acesse http://www.curricular.com.br/berdam Acesse http://passandoveneno.blogspot.com - -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com
Re: [delphi-br] INICIANTE DELPHI7
Cara, primeiramente você deveria aprender a escrever emails, NUNCA ESCREVA EMAIS EM CAIXA ALTA, a não ser que você queira expressar que esteja gritando com a pessoa. Att, Marcos A. Ferreira São Paulo - Brasil MSN: maferre...@hotmail.it Google Talk: maf.decisiva Skype: m_abreuferreira Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar, ou divulgar as informações nela contidas ou tomar qualquer ação baseada nestas informações. Se você recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperação. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE. ENVIRONMENT commitment and responsibility, think about Before Printing. From: jamilton_felix Sent: Wednesday, April 01, 2009 12:08 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] INICIANTE DELPHI7 OLA GALERA USO O DELPHI FAZ POUCO TEMPO POIS ESTOU COM UM PROJETINHO DE CONTROLE DE ESTOQUE E PRESCISO DAR ANDAMAMENTO. MAS TENHO UMA DIFICULDADE, ESTOU USANDO O ADO E O BANCO EM ACESS COSTARIA DE SABER COMO MANIPULAR CULUNAS E TABELAS DENTRO DE OUTROS FORMS ,EXPLO COMO POSSO FAZER ENTRADA E SAIDA DE ESTOQUE E BAIXA NO ESTOQUE OBRIGADO ABRAÇO. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Retorno Stored Procedure Delphi x Mysql
Qual a versão do MySQL, do Delphi e qual componente de acesso? 2009/4/1 ajama_1 ajam...@yahoo.com.br DELIMITER $$; DROP PROCEDURE IF EXISTS `adm`.`sp_comissoes`$$ CREATE PROCEDURE `adm`.`sp_comissoes` (IN teste Varchar(50)) BEGIN select * from classepro where chav_cli = teste; END$$ DELIMITER ;$$ Essa é a chamada da procedure: call sp_comissoes(5) Dentro do mysql funciona mas quando uso o delphi ele fala que uma procedure não retorna recordset. Como eu fa isso ? aguém pode me ajudar ? -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo@gmail.com Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como abrir outro projeto diretamente no form requerido ?
Uma saída pode ser alterar o aplicativo NOME.EXE para fazer o reconhecimento de parâmetros no momento da execução do aplicativo. E na chamada do aplicativo CORES.EXE incluir o parâmetro para abertura do form. Chamada no aplicativo CORES.EXE, quando opção A (VERMELHO) WinExec ('NOME.EXE JOAO', SW_SHOWNORMAL); Identificação de parâmetros no aplicativo NOME.EXE if ParamStr(1) = 'JOAO' then FormJOAO.ShowModal; Abraço 2009/4/1 quirius.dival quirius.di...@yahoo.com.br A partir de um projeto em execução, como fazer para abrir outro projeto, e dentro deste outro projeto, um form diretamente, PORÉM, SEM DECLARÁ-LO NA USES DO 1º. PROJETO, E SIM PELO OnClick DO MENU DO 1º.PROJETO ? Exemplo: Projeto CORES composto SOMENTE pelo menu A-VERMELHO B-PRETO C-VERDE Projeto NOME composto pelos forms. JOAO PEDRO PAULO -Quando o usuário executar o CORES.EXE e clicar na opção A (VERMELHO) deverá ser aberto automaticamente o NOME.EXE, e dentro deste deverá ser aberto automaticamente o form JOAO. PORÉM: -Um projeto foi desenvolvido em Delphi 7, com vários componentes de terceiros próprios para esta versão -Outro projeto foi desenvolvido em Delphi 2007, também com vários componentes de terceiros, mas próprios para o D2007. -Devido a este fato não há como incluir no Path ou na Uses as units de um projeto no outro, pois na compilação ocorrerão vários erros devido a falta de diversos componentes de terceiros de uma versão na outra. Há solução para isso ? Agradeço antecipadamente a atenção dispensada. Dival Mensagens neste tópico http://br.groups.yahoo.com/group/delphi-br/message/198926;_ylc=X3oDMTM4OTVxZHRuBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE5ODkyNgRzZWMDZnRyBHNsawN2dHBjBHN0aW1lAzEyMzg2MTk2NTAEdHBjSWQDMTk4OTI2( 1) Responder (através da web) http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJycm1vaWxyBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE5ODkyNgRzZWMDZnRyBHNsawNycGx5BHN0aW1lAzEyMzg2MTk2NTA-?act=replymessageNum=198926| Adicionar um novo tópico http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJlbGIyZmFpBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTIzODYxOTY1MA-- Mensagenshttp://br.groups.yahoo.com/group/delphi-br/messages;_ylc=X3oDMTJlaTdtZjRoBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA21zZ3MEc3RpbWUDMTIzODYxOTY0OQ--| Arquivoshttp://br.groups.yahoo.com/group/delphi-br/files;_ylc=X3oDMTJmZ2JtcGVnBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2ZpbGVzBHN0aW1lAzEyMzg2MTk2NDk-| Fotoshttp://br.groups.yahoo.com/group/delphi-br/photos;_ylc=X3oDMTJlYzNmZDRwBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA3Bob3QEc3RpbWUDMTIzODYxOTY0OQ--| Linkshttp://br.groups.yahoo.com/group/delphi-br/links;_ylc=X3oDMTJmM3JvNWI4BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2xpbmtzBHN0aW1lAzEyMzg2MTk2NDk-| Banco de dadoshttp://br.groups.yahoo.com/group/delphi-br/database;_ylc=X3oDMTJjMnNmbmFtBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2RiBHN0aW1lAzEyMzg2MTk2NDk- [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] INICIANTE DELPHI7
por exemplo: form1.table1.algum comando o melhor e vc colocar todos os componentes de acesso a dados em um datamodule. 2009/4/1 Marcos Ferreira m.abreuferre...@hotmail.com Cara, primeiramente você deveria aprender a escrever emails, NUNCA ESCREVA EMAIS EM CAIXA ALTA, a não ser que você queira expressar que esteja gritando com a pessoa. Att, Marcos A. Ferreira São Paulo - Brasil MSN: maferre...@hotmail.it maferreira%40hotmail.it Google Talk: maf.decisiva Skype: m_abreuferreira Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar, ou divulgar as informações nela contidas ou tomar qualquer ação baseada nestas informações. Se você recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperação. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE. ENVIRONMENT commitment and responsibility, think about Before Printing. From: jamilton_felix Sent: Wednesday, April 01, 2009 12:08 PM To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: [delphi-br] INICIANTE DELPHI7 OLA GALERA USO O DELPHI FAZ POUCO TEMPO POIS ESTOU COM UM PROJETINHO DE CONTROLE DE ESTOQUE E PRESCISO DAR ANDAMAMENTO. MAS TENHO UMA DIFICULDADE, ESTOU USANDO O ADO E O BANCO EM ACESS COSTARIA DE SABER COMO MANIPULAR CULUNAS E TABELAS DENTRO DE OUTROS FORMS ,EXPLO COMO POSSO FAZER ENTRADA E SAIDA DE ESTOQUE E BAIXA NO ESTOQUE OBRIGADO ABRAÇO. [As partes desta mensagem que não continham texto foram removidas] -- Felipe Govoni - GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Banco de dados/Distribuição
Fernando, boa noite Bem, com relação a distribuição eu utilizo o banco de dados Firebird, depois que está tudo pronto, eu utilizo um programa chamado InnoSetup ele gera um instalador para mim, nele é possível empacotar a instalação do banco (Firebird) e também todos os .exes da minha aplicação, isso não quer dizer que será tudo instalado sozinho, mas quando o cliente executa esse pacote que envio para ele, tem a opções 1. Banco de Dados, 2. Sistema, 3. Etc.., Etc.. A verdade que empacoto a instalação do banco, daí quando ele seleciona a opção 1. Bando de Dados, é aberto para ele a instalação do Firebird, ele vai dando Next, Next, Finish... Quando ele seleciona a opção 2. Sistema nada mais é feito do que criada uma pasta e colocado os .exes e .dll que empacotei em uma pasta pré-definida, inclusive no InnoSetup você tem um suporte bem legal para montar estruturas de pastas, e dizer que o arquivo A.txt vai para a pasta Y, o arquivo B.doc para a pasta Z e por ai vai... Diante da situação se seu problema é distribuição ta ai um programinha bacana que vai te ajudar a gerar instaladores... Se a instalação do MySQL não for complicada, for padrão NEXT, NEXT, FINISH talvez valha a pena você dar uma olhada no INNOSetup... Juliano De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Fernando José Ramos Figueira da Silva Enviada em: quarta-feira, 1 de abril de 2009 09:19 Para: Grupo - Delphi Br Assunto: [delphi-br] Banco de dados/Distribuição Bom dia a todos. Preciso montar um sistema e gostaria de informações sobre acesso a dados. Atualmente utilizo banco de dados MySql, e faço a conexão ao banco de dados apenas em execução. Algumas desvantagens desse processo é a distribuição. Primeiro por que preciso instalar o banco de dados no cliente, não descobri uma forma de automatizar isso na instalação do software e a outra desvantagem é a questão da conexão apenas em execução, no momento que estou utilizando o Delphi faço tudo via código. Relatórios, Grids, etc...etc... Gostaria de sugestões de banco de dados e forma de trabalho, afim de automatizar o sistema de distribuição da aplicação. Atenciosamente, Fernando José Ramos Figueira da Silva [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 3981 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Erro com Client DataSet X Conexão Firebird
A impressão que dá é que não é esta conexão que está dando problema, uma vez que já processou 95% do relatório, durante este processo do relatório não é startado alguma outra coisa? Realmente é estranho um relatório que já está rodando a 95% apresentar o erro de conexão... Observação: Sempre que vc emite o relatório ocorre isso? Você poderia colocar para processar somente 100 registros para verificar se o problema ocorre, ou até mesmo uma quantidade que pode ser próxima ao final... já que o problema está no final do relatório, é muito pouco provável, mas pode ser um problema de corrosão de dados do banco... então vai minerando... vai aumentando gradativamente a quantidade de dados que são processados para verificar se o problema ocorre em um determinado ponto... Juliano De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de leite romano Enviada em: quarta-feira, 1 de abril de 2009 10:11 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Erro com ClientDataSet X Conexão Firebird tambem pode apontar para localhost --- Em qua, 1/4/09, berdam berdamzi...@yahoo.com.br mailto:berdamzinho%40yahoo.com.br escreveu: De: berdam berdamzi...@yahoo.com.br mailto:berdamzinho%40yahoo.com.br Assunto: Re: [delphi-br] Erro com ClientDataSet X Conexão Firebird Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Data: Quarta-feira, 1 de Abril de 2009, 1:28 tenta mudar o caminho de acesso para o nome ou ip real da máquina Huander escreveu: Pessoal, estou tenho um problema em um cliente, e por incrível que pareça só esta acontecendo com ele! Faz uma consulta utilizando um ClientDataSet que me retorna cerca de 1900 registros. Utilizo este retorno na impressão de um relatório (utilizando QuickReport), ao chegar nos 95% faltando uns 5 registros finais dá erro técnicamente de conexão com o banco de dados (ou rede) ... Aparecendo a seguinte mensagem de erro: “ Unable to complete network request to host 127.0.0.1. Failed to establish a connection. Normalmente é permitida apenas uma utilização de cada endereço de soquete (protocolo/endereço de rede/porta). “ Alguém ai já passou por algo semelhante e poderia me dar uma luz? Só pra completar estou executando o comando na própria máquina onde está o banco de dados. Agradeço a todos a colaboração! Huander Leão [As partes desta mensagem que não continham texto foram removidas] -- - Uberdam Cavaletti Formado em Tecnologia da informação - Unoesc - Xxe Pós graduado em Desenvolvimento Java - Unoesc - Xxe Acesse http://www.curricular.com.br/berdam Acesse http://passandoveneno.blogspot.com - -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com __ Informa磯 do NOD32 IMON 3981 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antiv�s http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] INICIANTE DELPHI7
Ao ler este e-mail imagino que você já tenha lido os que os demais amigos lhe enviou... Bem a minha dica é a seguinte: Por você ser iniciante, você está começando do meio, e isso não é bom... recomendo a você parar tudo e pegar uma apostila ou até mesmo vídeo aula (tem muitas na net) que mostre como desenvolve um sistema do inicio ao fim, normalmente estas apostilas/vídeos não implementam sistemas grande são coisas pequenas, mas você terá uma visão geral de como as coisas devem ser feitas... Quando você terminar, você verá que já ira conseguir fazer bastante coisa, e suas dúvidas passará a ser sobre como fazer um controle de estoque e não como manipular dados, ou trabalhar com componentes mais básicos... Juliano Silva De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de jamilton_felix Enviada em: quarta-feira, 1 de abril de 2009 12:08 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] INICIANTE DELPHI7 OLA GALERA USO O DELPHI FAZ POUCO TEMPO POIS ESTOU COM UM PROJETINHO DE CONTROLE DE ESTOQUE E PRESCISO DAR ANDAMAMENTO. MAS TENHO UMA DIFICULDADE, ESTOU USANDO O ADO E O BANCO EM ACESS COSTARIA DE SABER COMO MANIPULAR CULUNAS E TABELAS DENTRO DE OUTROS FORMS ,EXPLO COMO POSSO FAZER ENTRADA E SAIDA DE ESTOQUE E BAIXA NO ESTOQUE OBRIGADO ABRAÇO. __ Informação do NOD32 IMON 3981 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] INICIANTE DELPHI7
Amigo Você pode adiquir o meu livro, vai ensinar a você fazer um controle de estoque passo a passo www.lcm.com.br Rubens Antunes Autor do Livro - Delphi Faça Uma Aplicação Comercial Blog http://rubensantunes.zip.net/ --- Em qua, 1/4/09, Juliano Silva - Yahoo smjjuli...@yahoo.com.br escreveu: De: Juliano Silva - Yahoo smjjuli...@yahoo.com.br Assunto: RES: [delphi-br] INICIANTE DELPHI7 Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 1 de Abril de 2009, 21:58 Ao ler este e-mail imagino que você já tenha lido os que os demais amigos lhe enviou... Bem a minha dica é a seguinte: Por você ser iniciante, você está começando do meio, e isso não é bom... recomendo a você parar tudo e pegar uma apostila ou até mesmo vídeo aula (tem muitas na net) que mostre como desenvolve um sistema do inicio ao fim, normalmente estas apostilas/vídeos não implementam sistemas grande são coisas pequenas, mas você terá uma visão geral de como as coisas devem ser feitas... Quando você terminar, você verá que já ira conseguir fazer bastante coisa, e suas dúvidas passará a ser sobre como fazer um controle de estoque e não como manipular dados, ou trabalhar com componentes mais básicos... Juliano Silva De: delphi...@yahoogrup os.com.br [mailto:delphi...@yahoogrup os.com.br] Em nome de jamilton_felix Enviada em: quarta-feira, 1 de abril de 2009 12:08 Para: delphi...@yahoogrup os.com.br Assunto: [delphi-br] INICIANTE DELPHI7 OLA GALERA USO O DELPHI FAZ POUCO TEMPO POIS ESTOU COM UM PROJETINHO DE CONTROLE DE ESTOQUE E PRESCISO DAR ANDAMAMENTO. MAS TENHO UMA DIFICULDADE, ESTOU USANDO O ADO E O BANCO EM ACESS COSTARIA DE SABER COMO MANIPULAR CULUNAS E TABELAS DENTRO DE OUTROS FORMS ,EXPLO COMO POSSO FAZER ENTRADA E SAIDA DE ESTOQUE E BAIXA NO ESTOQUE OBRIGADO ABRAÇO. __ Informação do NOD32 IMON 3981 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset. com.br [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Erro ao entrar no IBExpert
Grande Paulo..muito obrigado, funcionou certinho Valeu mesmo -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Paulo Botelho Enviada em: quarta-feira, 1 de abril de 2009 08:14 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Erro ao entrar no IBExpert A solução que encontrei na home do ibExpert é a seguinte : Excluir o arquivo *IBExpert.dir* que está na pasta C:\Documents and Settings\Nome_Do_Usuario\Application Data\HK-Software\IBExpert []s Paulo Botelho 2009/3/31 Leandro - Grupos leacarbone...@yahoo.com.br E ai Moacir... blz... estranho mesmo, eu sai para o almoço e estava tudo ok, quando voltei começou a dar isso Tentei de tudo o que vc puder imaginar e não consegui. Eu tenho uma versão do IBExpert mais exuta, não é nem instalada, é só o executável, é mais limitada, mas funciona perfeitinho, se vc quiser me passa o teu email que te mando ela, pra ir pelo menos quebrando o galho... Se descobrir alguma coisa te aviso... Abraço Leandro Carbonera (54) 9977-1266 lean...@sigmatecnologia.com.br leandro%40sigmatecnologia.com.br www.sigmatecnologia.com.br -Mensagem original- De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Moacir - GMail Enviada em: terça-feira, 31 de março de 2009 14:32 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: Re: [delphi-br] Erro ao entrar no IBExpert Opa !! Estou exatamente com o mesmo problema aqui em duas maquinas diferentes!! Começou esta manhã. Qualquer informação é bem vinda Moacir Leandro - Grupos escreveu: E ai pessoal blz... Seguinte, de uma hora para a outra meu ibexpert começou a apresentar a seguinte mensagem quando tento abri-lo Ungültiges Argument zum Codieren des Datums e para por ai Já procurei na internet, mas não achei nada a respeito, tentei desinstalar e instalar outras versões mas dá a mesma coisa... Alguém tem alguma idéia do que seja isso!! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Informação do NOD32 IMON 3977 (20090331) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM __ Informação do NOD32 IMON 3981 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/
Res: RES: [delphi-br] INICIANTE DELPHI7
Olá galera, Amigo Você pode adiquir o meu livro, vai ensinar a você fazer um controle de estoque passo a passo Rubens, só um pitaco: informe o título do seu livro, aparecem muitos no link [http://www.lcm.com.br/], beleza brother? ;) Parabéns pela livro, pelo que vejo o pessoal comentar está Show! []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo.com.br Gmail, GTalk: silviop...@gmail.com Hotmail, MSN: silviop...@hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ BlogSite: http://silvioprog.blogspot.com/ °oO| Seja livre, use Linux! |Oo° Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Delphi3000 - Malware
Pessoal. Uso o Firefox, e o WOT. Tentei acessar o Delphi3000, e meu bowser bloqueou como sendo site reportado como atacado por malware... Alguém pode explicar isso? Sds, _ Emanuel Coutinho Salvador-Ba-Brasil Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Banco de dados/Distribuição
Quanto a distribuição do banco vc pode gerar um script do metadado do banco e executa-lo no cliente depois de instalado o sistema e o servidor do mysql, pode até usar o InnoSetup como o Juliano comentou, e quanto a conexão vc pode criar um arquivo INI que tenha os campos necessários para criar a conexão como servidor, usuário, senha e porta... dá uma olhada nesse video q achei no tio google http://www.4shared.com/file/45037371/67fff...rified=ab1866fd Não precisa nem baixar é só assistir Arquivos install_mysql: http://www.4shared.com/file/45120517/b7a04...rified=ab1866fd uninstall_mysql: http://www.4shared.com/file/45120519/50186...rified=ab1866fd Vlw JM 2009/4/1 Juliano Silva - Yahoo smjjuli...@yahoo.com.br Fernando, boa noite Bem, com relação a distribuição eu utilizo o banco de dados Firebird, depois que está tudo pronto, eu utilizo um programa chamado InnoSetup ele gera um instalador para mim, nele é possível empacotar a instalação do banco (Firebird) e também todos os .exes da minha aplicação, isso não quer dizer que será tudo instalado sozinho, mas quando o cliente executa esse pacote que envio para ele, tem a opções 1. Banco de Dados, 2. Sistema, 3. Etc.., Etc.. A verdade que empacoto a instalação do banco, daí quando ele seleciona a opção 1. Bando de Dados, é aberto para ele a instalação do Firebird, ele vai dando Next, Next, Finish... Quando ele seleciona a opção 2. Sistema nada mais é feito do que criada uma pasta e colocado os .exes e .dll que empacotei em uma pasta pré-definida, inclusive no InnoSetup você tem um suporte bem legal para montar estruturas de pastas, e dizer que o arquivo A.txt vai para a pasta Y, o arquivo B.doc para a pasta Z e por ai vai... Diante da situação se seu problema é distribuição ta ai um programinha bacana que vai te ajudar a gerar instaladores... Se a instalação do MySQL não for complicada, for padrão NEXT, NEXT, FINISH talvez valha a pena você dar uma olhada no INNOSetup... Juliano De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Fernando José Ramos Figueira da Silva Enviada em: quarta-feira, 1 de abril de 2009 09:19 Para: Grupo - Delphi Br Assunto: [delphi-br] Banco de dados/Distribuição Bom dia a todos. Preciso montar um sistema e gostaria de informações sobre acesso a dados. Atualmente utilizo banco de dados MySql, e faço a conexão ao banco de dados apenas em execução. Algumas desvantagens desse processo é a distribuição. Primeiro por que preciso instalar o banco de dados no cliente, não descobri uma forma de automatizar isso na instalação do software e a outra desvantagem é a questão da conexão apenas em execução, no momento que estou utilizando o Delphi faço tudo via código. Relatórios, Grids, etc...etc... Gostaria de sugestões de banco de dados e forma de trabalho, afim de automatizar o sistema de distribuição da aplicação. Atenciosamente, Fernando José Ramos Figueira da Silva [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 3981 (20090401) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] -- _ Jhosef Marks de Carvalho Delphi Developer http://groups.google.com/group/soumaisdelphi # CAMPANHA POR UMA INTERNET SEGURA Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar mensagens use SEMPRE o Cco (cópia oculta). Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar um e-mail, delete todas as informações que apareçam no corpo do e-mail e que possam ser usadas por hackers. # Sent from Joinville, SC, Brazil [As partes desta mensagem que não continham texto foram removidas]