[delphi-br] Re: como fazer para não duplicar registros?
Gustavo, Pelo seu papo, acredita-se que você não conhece ou, se conhece, conhece pouco os fundamentos de um banco de dados. Por exemplo, uma coisa que você falou, para não duplicar registros, a não ser que o usuário queira que isso aconteça. Não se duplica registro em banco de dados sob nenhuma circunstância. Você pode sim duplicar dados. Todo e qualquer banco de dados permite você duplicar e até quadruplicar dados a vontade, mas registro não. Há uma diferença de conceito nisto daí. Eu sugiro você buscar uma linha de estudo em cima disto, como Chaveamentos, unicidade, relacionamentos e entidades que são fundamentalíssimos para que um sistema seje bom, eficiente e robusto. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 MSN: [EMAIL PROTECTED] --- Em delphi-br@yahoogrupos.com.br, Gustavo André de Freitas [EMAIL PROTECTED] escreveu Na verdade estou começando agora e entendi muito pouca coisa. Não estou entendendo muito ainda como fazer pesquisas. Gustavo André de Freitas --- Em delphi-br@yahoogrupos.com.br, Tamara Clemente tamara.grupos@ escreveu Bom Gustavo... desta forma eu acredito que só antes de efetuar o post da tabela, vc faça uma consulta com o parametro nome do setor na clausura where, e ai então, verificando o recordcount da consulta vc emite a msg da forma q vc deseja... ajudado ou atrapalhado???rs Qquer coisa estamos ai... Tamara Clemente Analista Desenvolvedor Em 16/01/07, Gustavo André de Freitasgustavo_sis@ escreveu: estou começando agora em programação e estou desenvolvendo um pequeno aplicativo de controle de patrimonio com Delphi 7 e Firebird 1.5, e gostaria de tirar a seguinte dúvida: como fazer para não duplicar registros, a não ser que o usuário queira que isso aconteça? Ex. tenho a tabela Setor. nela eu tenho 4 campos, codigo, nomesetor, ramal e obs. gostaria que o nome setor não duplicasse, a não ser que o usuário queira, que aparecesse uma caixa perguntando se deseja ou não efetuar o registro mesmo assim. ex. o setor já está cadastrado, deseja cadastrá-lo mesmo assim?, ou algo parecido. desde já agradeço a todos pela ajuda! Gustavo André de Freitas Linhares - ES
Re: [delphi-br] Revista
Olha amigo... existem dois órgãos que controlam a distribuição/circulação das revistas no Brasil que são a ANER (www.aner.org.br) e o IVC. Tente um contato diretamente com eles que provavelmente vc já vai conseguir essa info. []'s Ricardo. Francisco Thiago [EMAIL PROTECTED] escreveu: Boa tarde PessoAll! Nao sei se eh legal fazer este tipo de pedido... Mas nao custa arriscar. Eu estou precisando de uma listagem de todas as revistas distribuidas no Brasil. Algo como 1- Revista Veja 2- Revista Epoca 3- Revista Ana Maria 4- Revista PlayBoy 5- Revista Em Marcha 6- Revista Acao Games 7- Revista do CD-ROM e etc... Alguem tem ou sabe onde eu poderia encontrar? Alguem que tenha um sistema de comercio talvez possua essa informacao. Nao precisa passar o banco de dados inteiro se nao se quiser. Pode passar soh a tabela. Estou precisando muito disso aqui. Obrigado gente t+ Francisco Thiago de Almeida Se é verdade que todos os caminhos levam a Deus, porque será que nem todas estradas levam ao mesmo lugar? [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter negativo em positivo
Na verdade a intenção é mostrar uma função que sirva tanto para passar de negativo para positivo quanto o contrário (de positivo para negativo). []'s Ricardo. Nivaldo Stainle [EMAIL PROTECTED] escreveu: A Maneira correta e mais simples é : x := abs(x), pronto basta isto; na função abaixo se o nro. for positivo ele se tornará negativo. Stainle Ricardo César Cardoso [EMAIL PROTECTED] escreveu: Simples, amigo: Function Inverter(aNumero: Integer) : Integer; Begin Result := aNumero * -1; End; Para usar: Var X, Y : Integer; Begin X := 10; Y := Inverter(X); End; Espero que lhe ajude. []'s Ricardo. Marcelo [EMAIL PROTECTED] escreveu: Amigos da lista. Bom dia. Existe alguma forma de se converter algum número negativo em positivo no Delphi, alguma função que realize esse procedimento? Desde já agradeço a colaboração de todos. Obrigado. __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Converter negativo em positivo
Peguei o bonde andando, mas para inverter um numero basta multiplicar por -1. Eduardo Ricardo César Cardoso escreveu: Na verdade a intenção é mostrar uma função que sirva tanto para passar de negativo para positivo quanto o contrário (de positivo para negativo). []'s Ricardo. Nivaldo Stainle [EMAIL PROTECTED] mailto:stainle2003%40yahoo.com.br escreveu: A Maneira correta e mais simples é : x := abs(x), pronto basta isto; na função abaixo se o nro. for positivo ele se tornará negativo. Stainle Ricardo César Cardoso [EMAIL PROTECTED] mailto:ricardo_engsoft%40yahoo.com.br escreveu: Simples, amigo: Function Inverter(aNumero: Integer) : Integer; Begin Result := aNumero * -1; End; Para usar: Var X, Y : Integer; Begin X := 10; Y := Inverter(X); End; Espero que lhe ajude. []'s Ricardo. Marcelo [EMAIL PROTECTED] mailto:marcelo%40afasistemas.com.br escreveu: Amigos da lista. Bom dia. Existe alguma forma de se converter algum número negativo em positivo no Delphi, alguma função que realize esse procedimento? Desde já agradeço a colaboração de todos. Obrigado. __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
[delphi-br] Re: DataSetProvider perde propriedade DataSet
Sim, essa é a saída. Mas eu gostaria de saber o motivo do problema. Se seria o número de DSProviders no Remote. --- Em delphi-br@yahoogrupos.com.br, Dimas Fernando [EMAIL PROTECTED] escreveu Aconteceu algo parecido comigo, porem utilizo IB OBJECTS.. as vezes alguns componentes perdiam a referencia do DataSource (ficando vazios).. no oncreate dos formularios onde isso aconteceu.. eu atribuia novamente os DataSource aos componentes.. Nao tive mais problemas.. e o mais interessante..nao eram em todos os componentes.. so em alguns... - Original Message - From: thiagotosta To: delphi-br@yahoogrupos.com.br Sent: Monday, January 15, 2007 9:26 AM Subject: [delphi-br] DataSetProvider perde propriedade DataSet Em uma aplicação multicamadas os DSProviders do Remote Data Module estão perdendo a propriedade DataSet (ficando vazia), obrigando o programador a atribuir as propriedades toda a vez que executa o programa. Alguém já passou por um problema destes? O problema poderia estar ocorrendo pelo número de DSProviders do Remote (são vrios na aplicação)? Obrigado! --- --- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.432 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007 16:12 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Migração de Dados entre bases Firebird
Pessoal, preciso migrar dados de uma base firebird sem Character set definido para uma com character set definido para que eu possa trabalhar com o Collate PT_BR. Bom, qual a melhor ferramenta para se fazer isso? Preciso de uma que seja rápida e segura, pois o banco de onde vou migrar os dados já está com quase um 1GB. Agradeço desde já a ajuda de Todos. -- Marcelo A. Souza [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Aggregate(O QUE FAÇO?!)
Amigo, resolvi este problema fechando a tabela que possue o agregate e abrindo novamente... - Original Message - From: sampaiobrito To: delphi-br@yahoogrupos.com.br Sent: Monday, January 15, 2007 5:33 PM Subject: [delphi-br] Aggregate(O QUE FAÇO?!) Amigos, Tenho um relacionamento mestre detalhe (feito com 2 clientdataset's pela configuração da propriedade MasterFields) o problema é o seguinte: para o campo valor do clientdataset 'Filho' criei um Aggregate, só que quanto passo um parâmetro para o ClientDataSet 'Pai' e mudo os registros filhos, parece que ele está armazenando o valor da última linha e somando com a que está selecionada no conjunto atual ( no que foi carregado)... O que faço... Alguém já passou por isto e pode dá uma maozinha... Desde já agradeço! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Evento onCanResize de um componente TScrollbox
Estou criando um componente descendente de um TScrollbox o objetivo deste componente é pegar qualquer outro componente e centralizar dentro dele, consigo fazer centralizar mas, quando eu redimenciono o TScrollbox o componente que está dentro dele não se alinha a posição que eu determinel que é centralizado. Como faço para usar o evento onCanResize dentro deste componente que estou criando pois qualquer mudança no tamanho do TScrollbox fique sempre centralizado. -- Atenciosamente, Joandreiy Cordeiro [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: DataSetProvider perde propriedade DataSet
Provavelmente você deve ter DataSets em algum Data Module, ou em algum outro form do seu projeto, o que acontece é o seguinte: Quando você chama o formulário, e o Data Module com o DataSet em questão não está criado, ele perde a referência simplesmente porque o objeto ainda não está criado. Sempre que você for alterar, criar ect, novas coisas em seu projeto, abra os módulos de data antes de tudo, assim as referência não são perdidas. Vitor Luiz Redes Analista de Sistemas Redsystem Software / Bureau Software Messenger: [EMAIL PROTECTED] Phone: 3379-6939 Cel. Phone: 9677-8445 - Original Message - From: thiagotosta To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 17, 2007 9:12 AM Subject: [delphi-br] Re: DataSetProvider perde propriedade DataSet Sim, essa é a saída. Mas eu gostaria de saber o motivo do problema. Se seria o número de DSProviders no Remote. --- Em delphi-br@yahoogrupos.com.br, Dimas Fernando [EMAIL PROTECTED] escreveu Aconteceu algo parecido comigo, porem utilizo IB OBJECTS.. as vezes alguns componentes perdiam a referencia do DataSource (ficando vazios).. no oncreate dos formularios onde isso aconteceu.. eu atribuia novamente os DataSource aos componentes.. Nao tive mais problemas.. e o mais interessante..nao eram em todos os componentes.. so em alguns... - Original Message - From: thiagotosta To: delphi-br@yahoogrupos.com.br Sent: Monday, January 15, 2007 9:26 AM Subject: [delphi-br] DataSetProvider perde propriedade DataSet Em uma aplicação multicamadas os DSProviders do Remote Data Module estão perdendo a propriedade DataSet (ficando vazia), obrigando o programador a atribuir as propriedades toda a vez que executa o programa. Alguém já passou por um problema destes? O problema poderia estar ocorrendo pelo número de DSProviders do Remote (são vrios na aplicação)? Obrigado! -- --- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.432 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007 16:12 [As partes desta mensagem que não continham texto foram removidas] -- Internal Virus Database is out-of-date. Checked by AVG Free Edition. Version: 7.1.410 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: DataSetProvider perde propriedade DataSet
Não. Provavelmente a ordem de criação dos componentes está errada. Por algum motivo, dentro do delphi, o dataSetProvider estava sendo instanciado antes do seu DataSet. Daí o motivo de ele perder a referencia. Isso acontece comumente quando componentes em formulários diferentes estão relacionados. []'s Francisco Thiago de Almeida Se é verdade que todos os caminhos levam a Deus, porque será que nem todas estradas levam ao mesmo lugar? - Original Message - From: thiagotosta To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 17, 2007 9:12 AM Subject: [delphi-br] Re: DataSetProvider perde propriedade DataSet Sim, essa é a saída. Mas eu gostaria de saber o motivo do problema. Se seria o número de DSProviders no Remote. --- Em delphi-br@yahoogrupos.com.br, Dimas Fernando [EMAIL PROTECTED] escreveu Aconteceu algo parecido comigo, porem utilizo IB OBJECTS.. as vezes alguns componentes perdiam a referencia do DataSource (ficando vazios).. no oncreate dos formularios onde isso aconteceu.. eu atribuia novamente os DataSource aos componentes.. Nao tive mais problemas.. e o mais interessante..nao eram em todos os componentes.. so em alguns... - Original Message - From: thiagotosta To: delphi-br@yahoogrupos.com.br Sent: Monday, January 15, 2007 9:26 AM Subject: [delphi-br] DataSetProvider perde propriedade DataSet Em uma aplicação multicamadas os DSProviders do Remote Data Module estão perdendo a propriedade DataSet (ficando vazia), obrigando o programador a atribuir as propriedades toda a vez que executa o programa. Alguém já passou por um problema destes? O problema poderia estar ocorrendo pelo número de DSProviders do Remote (são vrios na aplicação)? Obrigado! -- --- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.432 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007 16:12 [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Revista
Muito boa a dica. Obrigado. Mas nenhum dos dois orgao tem no seu cadastro revistas como Clube Delphi, SQL Magazine e afins.. :( []'s Francisco Thiago de Almeida Se é verdade que todos os caminhos levam a Deus, porque será que nem todas estradas levam ao mesmo lugar? - Original Message - From: Ricardo César Cardoso To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 17, 2007 8:43 AM Subject: Re: [delphi-br] Revista Olha amigo... existem dois órgãos que controlam a distribuição/circulação das revistas no Brasil que são a ANER (www.aner.org.br) e o IVC. Tente um contato diretamente com eles que provavelmente vc já vai conseguir essa info. []'s Ricardo. Francisco Thiago [EMAIL PROTECTED] escreveu: Boa tarde PessoAll! Nao sei se eh legal fazer este tipo de pedido... Mas nao custa arriscar. Eu estou precisando de uma listagem de todas as revistas distribuidas no Brasil. Algo como 1- Revista Veja 2- Revista Epoca 3- Revista Ana Maria 4- Revista PlayBoy 5- Revista Em Marcha 6- Revista Acao Games 7- Revista do CD-ROM e etc... Alguem tem ou sabe onde eu poderia encontrar? Alguem que tenha um sistema de comercio talvez possua essa informacao. Nao precisa passar o banco de dados inteiro se nao se quiser. Pode passar soh a tabela. Estou precisando muito disso aqui. Obrigado gente t+ Francisco Thiago de Almeida Se é verdade que todos os caminhos levam a Deus, porque será que nem todas estradas levam ao mesmo lugar? [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: como fazer para não dupli car registros?
Walter só uma correcao, nao existe SEJE, e sim SEJA... rsrsrs Bricadeira Walter!! Bom Gustavo, como o Walter disse eu acho que vc deve se aprofundar nos conceitos de BD isso facilitaria sua vida na area de desenvolvimento de sistemas. Bom, tentando responder sua pergunta voce poderia fazer um: select count(SETOR) total_reg from TABELA group by SETOR having count(SETOR) 1 Se for retornado algo ai maior que zero é porque já existe algum registro duplicado. Esse select ai vc utilizará com o componente que desejar para acesso a dados. -- Atenciosamente, Vinicius S. L. Ribeiro [EMAIL PROTECTED] GNU/Linux User #293209. Get counted: http://counter.li.org/ Walter Chagas (Yahoo) escreveu: Gustavo, Pelo seu papo, acredita-se que você não conhece ou, se conhece, conhece pouco os fundamentos de um banco de dados. Por exemplo, uma coisa que você falou, para não duplicar registros, a não ser que o usuário queira que isso aconteça. Não se duplica registro em banco de dados sob nenhuma circunstância. Você pode sim duplicar dados. Todo e qualquer banco de dados permite você duplicar e até quadruplicar dados a vontade, mas registro não. Há uma diferença de conceito nisto daí. Eu sugiro você buscar uma linha de estudo em cima disto, como Chaveamentos, unicidade, relacionamentos e entidades que são fundamentalíssimos para que um sistema seje bom, eficiente e robusto. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] mailto:wchagasj%40yahoo.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://www.geocities.com/SiliconValley/Bay/1058 MSN: [EMAIL PROTECTED] mailto:whitesockets%40hotmail.com --- Em delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br, Gustavo André de Freitas [EMAIL PROTECTED] escreveu Na verdade estou começando agora e entendi muito pouca coisa. Não estou entendendo muito ainda como fazer pesquisas. Gustavo André de Freitas --- Em delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br, Tamara Clemente tamara.grupos@ escreveu Bom Gustavo... desta forma eu acredito que só antes de efetuar o post da tabela, vc faça uma consulta com o parametro nome do setor na clausura where, e ai então, verificando o recordcount da consulta vc emite a msg da forma q vc deseja... ajudado ou atrapalhado???rs Qquer coisa estamos ai... Tamara Clemente Analista Desenvolvedor Em 16/01/07, Gustavo André de Freitasgustavo_sis@ escreveu: estou começando agora em programação e estou desenvolvendo um pequeno aplicativo de controle de patrimonio com Delphi 7 e Firebird 1.5, e gostaria de tirar a seguinte dúvida: como fazer para não duplicar registros, a não ser que o usuário queira que isso aconteça? Ex. tenho a tabela Setor. nela eu tenho 4 campos, codigo, nomesetor, ramal e obs. gostaria que o nome setor não duplicasse, a não ser que o usuário queira, que aparecesse uma caixa perguntando se deseja ou não efetuar o registro mesmo assim. ex. o setor já está cadastrado, deseja cadastrá-lo mesmo assim?, ou algo parecido. desde já agradeço a todos pela ajuda! Gustavo André de Freitas Linhares - ES ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
Re: [delphi-br] Converter negativo em positivo
tudo bem, entendo a utilidade da função, mas a pergunta foi : como transformar um número negativo em positivo; o ABS() é genérico se for negativo fica positivo e se for positivo em nada se altera, não tem a necessidade de mais de uma linha de código. abraços Stainle Eduardo [EMAIL PROTECTED] escreveu: Peguei o bonde andando, mas para inverter um numero basta multiplicar por -1. Eduardo Ricardo César Cardoso escreveu: Na verdade a intenção é mostrar uma função que sirva tanto para passar de negativo para positivo quanto o contrário (de positivo para negativo). []'s Ricardo. Nivaldo Stainle [EMAIL PROTECTED] mailto:stainle2003%40yahoo.com.br escreveu: A Maneira correta e mais simples é : x := abs(x), pronto basta isto; na função abaixo se o nro. for positivo ele se tornará negativo. Stainle Ricardo César Cardoso [EMAIL PROTECTED] mailto:ricardo_engsoft%40yahoo.com.br escreveu: Simples, amigo: Function Inverter(aNumero: Integer) : Integer; Begin Result := aNumero * -1; End; Para usar: Var X, Y : Integer; Begin X := 10; Y := Inverter(X); End; Espero que lhe ajude. []'s Ricardo. Marcelo [EMAIL PROTECTED] mailto:marcelo%40afasistemas.com.br escreveu: Amigos da lista. Bom dia. Existe alguma forma de se converter algum número negativo em positivo no Delphi, alguma função que realize esse procedimento? Desde já agradeço a colaboração de todos. Obrigado. __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Evento onCanResize de um componente TScrollbox
Olá, Joandeiy! Tem alguns eventos melhores pra você usar... Uma opção boa é sobrescrever a procedure SetBounds que está no escopo public de todos os decendentes do TControl. Outra opção é interceptar a mensagem WM_Resize, enviada pelo Windows sempre que o controle é redimensionado... Pra este tipo de coisa, não vale a pena linkar os eventos lá no fim; pega pela raiz! :) Um abraço Henrique Netzka - Original Message - From: Joandreiy Cordeiro To: [EMAIL PROTECTED] ; delphi-br ; delphi-total Sent: Wednesday, January 17, 2007 8:36 AM Subject: [delphi-br] Evento onCanResize de um componente TScrollbox Estou criando um componente descendente de um TScrollbox o objetivo deste componente é pegar qualquer outro componente e centralizar dentro dele, consigo fazer centralizar mas, quando eu redimenciono o TScrollbox o componente que está dentro dele não se alinha a posição que eu determinel que é centralizado. Como faço para usar o evento onCanResize dentro deste componente que estou criando pois qualquer mudança no tamanho do TScrollbox fique sempre centralizado. -- Atenciosamente, Joandreiy Cordeiro [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] duvida como inserir em uma tabela, e deletar de outra
Complementando, você poderia criar uma Trigger ou Stored Procedure para fazer isso. Quando uma ordem de compra fosse finalizada, os itens seriam subtraidos da tabela de produtos. Dá uma pensada porque não é uma solução complicada de se implementar. Espero ter ajudado. Abraço. Atenciosamente: Eduardo Cláudio Nicácio Analista Programador JR. Fábrica 02 - CTIS Tel.: (11) 3150-6834 [EMAIL PROTECTED] - Original Message - From: Tamara Clemente To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 16, 2007 9:21 PM Subject: Re: [delphi-br] duvida como inserir em uma tabela, e deletar de outra Oi Walter... num sei se entendi muito bem, mas o q vc precisa basicamente é inserir as peças na ordem de serviço e retirá-las do estoque certo? Bom, existem varias formas, mas uma das q considero mais simples e de facil entendimento seria vc via comenado sql inserir(insert) as peças na ordem e com o delet, retirá-las do estoque, atraves de uma código em comum... Num sei se ajudei em grandes coisas, mas achei um pouco vaga a sua duvída... :o/ Mas qquer coisa, da um grito ai q a gente vê o q pode fazer...rs.. Tamara Clemente Analista Desenvolvedora Em 16/01/07, walter_3wm[EMAIL PROTECTED] escreveu: Boa Tarde à Todos!! Eu sou novato em delphi, estou fazendo um sistema para uma oficina mêcanica!! O sistema tem que fazer o seguinte: Na ordem de Servico se usou 5 peças , ele automaticamente retira 5 peças do estoque!!! Bom a ideia é essa só que eu não sei fazer isso na pratica!!! Alguem tem algum exemplo ou uma ideia!! Obrigado desde já!!! Vlw [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Action Toolbar Editável pelo usuário
Olá. Eu já vi um sistema que tinha a opção de mostrar o Editor de um ActionManager e permitia o usuário editar os icones da ActionToolbar. Alguém sabe como fazer isso? Tem outra maneira de permitir o usuário editar uma toolbar baseado em Actions? Valeu. -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however..
Re: [delphi-br] Action Toolbar Editável pelo usuár io
Tem um componente que chama customize dlg... na paleta Additional, você pode chamar o dialogo da sua aplicação e permitir que o usuário faça o que quiser, e salvar as configurações em um campo de um banco de dados, ou num arquivo ini mesmo... Dê uma olhada no componente. Vitor Luiz Redes Analista de Sistemas Redsystem Software / Bureau Software Messenger: [EMAIL PROTECTED] Phone: 3379-6939 Cel. Phone: 9677-8445 - Original Message - From: Leodinei Bielak To: delphi-br Sent: Wednesday, January 17, 2007 11:23 AM Subject: [delphi-br] Action Toolbar Editável pelo usuário Olá. Eu já vi um sistema que tinha a opção de mostrar o Editor de um ActionManager e permitia o usuário editar os icones da ActionToolbar. Alguém sabe como fazer isso? Tem outra maneira de permitir o usuário editar uma toolbar baseado em Actions? Valeu. -- Leodinei Bielak In theory, there is no difference between theory and practice. In practice, however.. -- Internal Virus Database is out-of-date. Checked by AVG Free Edition. Version: 7.1.410 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Rave Report - Delphi6
Instalei o Rave Report para o Delphi 6 e não obtive nenhum problema. Mas, ao tentar acessar o Rave Visual Designer, não estou tendo sucesso, pois através do Delphi, não me retorna abre nada e não me retorna mensagem de erro algum. Mas ao tentar abrir o rave.exe me informa a seguinte mensagem : duplicate license key found. Please install a separately licensed version on this system. 0/0 Por acaso alguém já passou por algo semelhante ? Desde já agradeço Atenciosamente Alessandro Yamasaki
[delphi-br] Rave Report - Delphi6
Rave Report - Delphi6 Instalei o Rave Report para o Delphi 6 e não obtive nenhum problema. Mas, ao tentar acessar o Rave Visual Designer, não estou tendo sucesso, pois através do Delphi, não me retorna abre nada e não me retorna mensagem de erro algum. Mas ao tentar abrir o rave.exe me informa a seguinte mensagem : duplicate license key found. Please install a separately licensed version on this system. 0/0 Por acaso alguém já passou por algo semelhante ? Desde já agradeço Atenciosamente Alessandro Yamasaki
Re: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II
Willian, fiz um pequeno aplicativo que vai corrigir esse problema, isso acontece porque os dados foram inseridos no banco por uma querie com a opção doOEMTranslate ativada, dai os acentos são convertidos e inseridos no banco de forma Þ diferente, ao buscar via select, não são reconhecidos. a aplicação faz isso, abre a tabela, converte os acentos e insere os dados em outra tabela. ta la no meu site www.drdsistemas.com/util/oem_zeos.zip qualquer duvida estamos ae.. grande abraço. -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ Em 16/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED] escreveu: Para não colocar muitas colunas... Pode usar uma simples estrutura de tabela, sendo: idEntidade int nmEntidade varchar(100) Minha busca sempre será pelo nome, com isso os outros campos não são importantes. Segue em anexo o script com a estrutura da tabela e os inserts. Grato pela ajuda. Att. Wilian Domingues Analista de Sistemas - Mensagem original De: Eduardo Silva dos Santos [EMAIL PROTECTED]eduardo.drd%40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Segunda-feira, 15 de Janeiro de 2007 18:08:07 Assunto: Re: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II Oi Wilian, eu novamente, quando enviei o e-mail a ideia era desabilitar o doOEMTranslate, se os dados so estão vindo corretamento com ele habilitado significa que foram inseridos na tabela com ele habilitado tb, por isso sua busca fica assim, sem buscar com os acentos. tenho uma ideia de como resolver mas não sei se vai dar certo, será que você pode gerar o script de uma dessas tabelas e me enviar pra eu fazer um teste? fico no aguardo. Em 15/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED]w1l14n_analista%40yahoo.com.br escreveu: Bom dia PessoALL, Tenho uma aplicação desenvolvida em Delphi + Mysql 4.1 + Zeos 6.5.1 Recentemente passei por um problema de acentuação, problema este, resolvido com a ajuda do Eduardo. A sua dica foi habilitar a opção do componente ZQuery: Options - doOemTranslate. Ao Habilitar, os dados do BD são carregados com os acentos corretos. Só que o meu problema está em cima disso. Quando vou realizar uma consulta com uma palavra acentuada não é localizado nada, estando a opção acima habilitada. Se eu desabilitar esta opção e trazer os dados com os caracteres malucos, ao realizar a consulta com as palavras acentuadas o resultado é feito com sucesso. Para realizar está consulta, eu carrego os dados em um combobox, seleciono um dos itens e mando localizar, assim o paramâtro da busca é exatamente a informação que está no BD. Exemplo: tabela FUNC ZQuery.SQL.Text := 'select * from func where nmfunc = :nmfunc'; O parâmetro nmfunc recebe o valor do COMBOBOX. Jos EstevÆo Braga - Sendo o parâmtro desta forma funciona José Estevão Braga - assim não funciona Já testei a consulta com doOemTranslate habilitado e desabilitado de ZQuery, mesmo assim o resultado é nulo qdo localizo com os acentos corretos. Alguém já passou por isso? Att. Wilian Domingues Analista de Sistemas __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ -- create table entidades( identidade int not null auto_increment, nmentidade varchar(100), primary key (identidade) ); insert into entidades(nmentidade) values(SME); insert into entidades(nmentidade) values(Casa do Professor); insert into entidades(nmentidade) values(Biblioteca P£blica); insert into entidades(nmentidade) values(E.M. Alfredo Bata); insert into entidades(nmentidade) values(E.M. Aleijadinho); insert into entidades(nmentidade) values(E.M. Ana Pereira de Lima); insert into entidades(nmentidade) values(E.M. Benedito Xavier); insert into entidades(nmentidade) values(E.M. Domingos Fleury da Rocha); insert into entidades(nmentidade) values(E.M. Dr. Alves de Brito); insert into entidades(nmentidade) values(E.M. Dr. Pedrosa); insert into entidades(nmentidade) values(E.M. Francisco de Araujo Silva); insert into entidades(nmentidade) values(E.M. Inacio de Souza); insert into entidades(nmentidade) values(E.M. Izaura Mendes); insert into entidades(nmentidade) values(E.M. Jos EstevÆo Braga); insert into
Re: [delphi-br] Revista
Provavelmente estes órgãos não tem essas revistas porque elas não devem ser afiliadas nem à ANER e nem passam por auditoria do IVC (Instituto Verificador de Circulação). Esse fato pode acontecer em revistas de baixa tiragem ou cuja periodicidade não é definida. Francisco Thiago [EMAIL PROTECTED] escreveu: Muito boa a dica. Obrigado. Mas nenhum dos dois orgao tem no seu cadastro revistas como Clube Delphi, SQL Magazine e afins.. :( []'s Francisco Thiago de Almeida Se é verdade que todos os caminhos levam a Deus, porque será que nem todas estradas levam ao mesmo lugar? - Original Message - From: Ricardo César Cardoso To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 17, 2007 8:43 AM Subject: Re: [delphi-br] Revista Olha amigo... existem dois órgãos que controlam a distribuição/circulação das revistas no Brasil que são a ANER (www.aner.org.br) e o IVC. Tente um contato diretamente com eles que provavelmente vc já vai conseguir essa info. []'s Ricardo. Francisco Thiago [EMAIL PROTECTED] escreveu: Boa tarde PessoAll! Nao sei se eh legal fazer este tipo de pedido... Mas nao custa arriscar. Eu estou precisando de uma listagem de todas as revistas distribuidas no Brasil. Algo como 1- Revista Veja 2- Revista Epoca 3- Revista Ana Maria 4- Revista PlayBoy 5- Revista Em Marcha 6- Revista Acao Games 7- Revista do CD-ROM e etc... Alguem tem ou sabe onde eu poderia encontrar? Alguem que tenha um sistema de comercio talvez possua essa informacao. Nao precisa passar o banco de dados inteiro se nao se quiser. Pode passar soh a tabela. Estou precisando muito disso aqui. Obrigado gente t+ Francisco Thiago de Almeida Se é verdade que todos os caminhos levam a Deus, porque será que nem todas estradas levam ao mesmo lugar? [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Action Toolbar Editável pelo usuário
Valeu. Era isso que eu queria mesmo. On 1/17/07, Vitor Luiz Redes [EMAIL PROTECTED] wrote: Tem um componente que chama customize dlg... na paleta Additional, você pode chamar o dialogo da sua aplicação e permitir que o usuário faça o que quiser, e salvar as configurações em um campo de um banco de dados, ou num arquivo ini mesmo... Dê uma olhada no componente. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Desbilitar ou Ocultar botão de Imprimir no Report Builder
Pessoal, ninguém pode me ajudar??? Marcelo. 2007/1/16, Marcelo Alves [EMAIL PROTECTED]: Pessoal, Alguém sabe como posso desabilitar ou ocultar o botão de imprimir do preview do Report Builder??? Agradeço desde já. -- Marcelo A. Souza [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] CAD com Delphi
Olá amigos, alguém poderia me informar alguma coisa sobre CAD com delphi. Componentes, bibliotecas, API o que for... estou precisando de algo sobre isso. desde já agradeço []s -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
Res: Fwd: [delphi-br] Acentução - Delphi + Mys ql 4.1 + Zeos 6.5.1 - Parte II
Eduardo, Primeiramenteo obrigado pela contribuição e mais um pequeno esclarecimento: Qdo alimentei a minha tabela com os dados, foi via console do Mysql. Nas linhas de inserção, as palavras estão acentuadas corretamente, ao realizar uma consulta na console do Mysql os registros são apresentados com os acentos corretos no banco. Qdo faço esta consulta através do Delphi, os acentos só veêm corretos, qdo a opção doOemTranslate está ativada. Att. Wilian Domingues Analista de Sistemas - Mensagem original De: Eduardo Silva dos Santos [EMAIL PROTECTED] Para: [EMAIL PROTECTED] Enviadas: Quarta-feira, 17 de Janeiro de 2007 12:41:04 Assunto: Fwd: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II -- Forwarded message -- From: Eduardo Silva dos Santos [EMAIL PROTECTED] Date: 17/01/2007 11:30 Subject: Re: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II To: delphi-br@yahoogrupos.com.br Willian, fiz um pequeno aplicativo que vai corrigir esse problema, isso acontece porque os dados foram inseridos no banco por uma querie com a opção doOEMTranslate ativada, dai os acentos são convertidos e inseridos no banco de forma Þ diferente, ao buscar via select, não são reconhecidos. a aplicação faz isso, abre a tabela, converte os acentos e insere os dados em outra tabela. ta la no meu site www.drdsistemas.com/util/oem_zeos.zip qualquer duvida estamos ae.. grande abraço. -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ Em 16/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED] escreveu: Para não colocar muitas colunas... Pode usar uma simples estrutura de tabela, sendo: idEntidade int nmEntidade varchar(100) Minha busca sempre será pelo nome, com isso os outros campos não são importantes. Segue em anexo o script com a estrutura da tabela e os inserts. Grato pela ajuda. Att. Wilian Domingues Analista de Sistemas - Mensagem original De: Eduardo Silva dos Santos [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Segunda-feira, 15 de Janeiro de 2007 18:08:07 Assunto: Re: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II Oi Wilian, eu novamente, quando enviei o e-mail a ideia era desabilitar o doOEMTranslate, se os dados so estão vindo corretamento com ele habilitado significa que foram inseridos na tabela com ele habilitado tb, por isso sua busca fica assim, sem buscar com os acentos. tenho uma ideia de como resolver mas não sei se vai dar certo, será que você pode gerar o script de uma dessas tabelas e me enviar pra eu fazer um teste? fico no aguardo. Em 15/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED] escreveu: Bom dia PessoALL, Tenho uma aplicação desenvolvida em Delphi + Mysql 4.1 + Zeos 6.5.1 Recentemente passei por um problema de acentuação, problema este, resolvido com a ajuda do Eduardo. A sua dica foi habilitar a opção do componente ZQuery: Options - doOemTranslate. Ao Habilitar, os dados do BD são carregados com os acentos corretos. Só que o meu problema está em cima disso. Quando vou realizar uma consulta com uma palavra acentuada não é localizado nada, estando a opção acima habilitada. Se eu desabilitar esta opção e trazer os dados com os caracteres malucos, ao realizar a consulta com as palavras acentuadas o resultado é feito com sucesso. Para realizar está consulta, eu carrego os dados em um combobox, seleciono um dos itens e mando localizar, assim o paramâtro da busca é exatamente a informação que está no BD. Exemplo: tabela FUNC ZQuery.SQL.Text := 'select * from func where nmfunc = :nmfunc'; O parâmetro nmfunc recebe o valor do COMBOBOX. Jos EstevÆo Braga - Sendo o parâmtro desta forma funciona José Estevão Braga - assim não funciona Já testei a consulta com doOemTranslate habilitado e desabilitado de ZQuery, mesmo assim o resultado é nulo qdo localizo com os acentos corretos. Alguém já passou por isso? Att. Wilian Domingues Analista de Sistemas __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ -- create table entidades( identidade int not null auto_increment, nmentidade varchar(100), primary key (identidade) ); insert into entidades(nmentidade) values(SME); insert into entidades(nmentidade) values(Casa do
[delphi-br] Descobrir o tamanho do arquivo
Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Descobrir o tamanho do arquivo
Já olhou no help do Delphi a função FileSize()? Sds. From: willer [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Descobrir o tamanho do arquivo Date: Wed, 17 Jan 2007 12:00:20 -0200 Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [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
Re: [delphi-br] Descobrir o tamanho do arquivo
Dá uma olhada nessas dicas dos links que estou te passando e ve se já te ajudam: Tamanho do arquivo: * http://www.swissdelphicenter.ch/torry/showcode.php?id=172 * Copiar um arquivo usando uma progressbar: http://www.swissdelphicenter.ch/torry/showcode.php?id=330 []'s Ricardo. willer [EMAIL PROTECTED] escreveu: Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Descobrir o tamanho do arquivo
Willer, achei essa funcao em um arq. PAS que baixei na net em 2004, sem referencias de autor. Nunca usei portanto nao garanto que funciona. Testa ai ok?! Abraco! uses Windows, Classes, Forms, Dialogs, SysUtils, FileCtrl, ShellAPI, ShlObj; Interface function getFileSize(const FileName: string): LongInt; implementation function getFileSize(const FileName: string): LongInt; var SearchRec: TSearchRec; sgPath : String; inRetval : Integer; begin sgPath := ExpandFileName(FileName); try inRetval := FindFirst(ExpandFileName(FileName), faAnyFile, SearchRec); If inRetval = 0 then Result := SearchRec.Size else Result := -1; finally SysUtils.FindClose(SearchRec); end; end; -- Atenciosamente, Vinicius S. L. Ribeiro [EMAIL PROTECTED] GNU/Linux User #293209. Get counted: http://counter.li.org/ willer escreveu: Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
Re: [delphi-br] CAD com Delphi
Dei uma busca rápida no Torry.net ( http://www.torry.net/quicksearchd.php?String=CADTitle=Yes ) e achei bastante coisa. Porém a maior parte dos componentes é pago (e bem pago, rsrsrsrsrs) e só tem um que é free e também que eu já tinha ouvido falar antes: CommonCAD v.0015. Parece-me que este projeto é um dos mais promissores em se tratando de componente free. Outro link interessante é esse (http://www.efg2.com/Lab/Library/Delphi/Graphics/FileFormatsAndConversion.htm) do site efgLABs. No link acima, procure por DXF que é um dos formatos com o qual o AutoCAD trabalha que nesse caso existe um componente para isso e na mesma página vc vai encontrar mais informações a respeito. []'s Ricardo. Fellipe Henrique [EMAIL PROTECTED] escreveu: Olá amigos, alguém poderia me informar alguma coisa sobre CAD com delphi. Componentes, bibliotecas, API o que for... estou precisando de algo sobre isso. desde já agradeço []s -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Instalação de programas feitos em d2006...
Gostaria de informações sobre a instalação de programas feito em d2006 (winform). Alguem tem o caminho das pedras do é preciso instalar na máquina do cliente para que o sistema funcione ? Obrigado. _ João Paulo [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Aggregate(O QUE FAÇO?!)
Em que classe estão estas constantes: Currencystring, DecimalSeparator, TNumericUtils? Francisco Thiago [EMAIL PROTECTED] escreveu: Funcionar funciona, mas quando quer... :D Eu criei esta funcao. Dai sempre que tenho um Agg redireciono o OnGetText dele para esta funcao. O codigo está abaixo. []'s Francisco Thiago de Almeida Se é verdade que todos os caminhos levam a Deus, porque será que nem todas estradas levam ao mesmo lugar? class procedure TDbUtils.getCurrencyField(Sender: TField; var Text: string; DisplayText: Boolean); begin if Sender.Value = Null then Text := Currencystring + '0'+ DecimalSeparator +'00' else Text := FloatToStrF(TNumericUtils.VariantToFloat(Sender.Value),ffCurrency,18,2); end; - Original Message - From: Aliely Sampaio To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 16, 2007 3:59 PM Subject: Re: [delphi-br] Aggregate(O QUE FAÇO?!) Se pudesse dar mais uma maozinha... é o seguinte: O display Format do Aggregate não funciona! É um valor monetário e queria saida formatada Alguma sugestão? Desde já agradeço! Wagner Binoto [EMAIL PROTECTED] escreveu: Amigo, eu resolvi isto fechando e abrindo o clientDataSet Abraços - Original Message - From: sampaiobrito To: delphi-br@yahoogrupos.com.br Sent: Monday, January 15, 2007 5:33 PM Subject: [delphi-br] Aggregate(O QUE FAÇO?!) Amigos, Tenho um relacionamento mestre detalhe (feito com 2 clientdataset's pela configuração da propriedade MasterFields) o problema é o seguinte: para o campo valor do clientdataset 'Filho' criei um Aggregate, só que quanto passo um parâmetro para o ClientDataSet 'Pai' e mudo os registros filhos, parece que ele está armazenando o valor da última linha e somando com a que está selecionada no conjunto atual ( no que foi carregado)... O que faço... Alguém já passou por isto e pode dá uma maozinha... Desde já agradeço! [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] configurar documento do word
Olá pessoal, estou exportando dados de 4 memos para o Word, procedure var i,j,l,m : integer; word: variant; begin for i := 0 to 3 do Begin if components[i] is Tedit then with TEdit(components[i]) do Memo1.Lines.add(text); end; for j := 4 to 7 do Begin if components[j] is Tedit then with TEdit(components[j]) do Memo2.Lines.add(text); end; for l := 8 to 11 do Begin if components[l] is Tedit then with TEdit(components[l]) do Memo3.Lines.add(text); end; for m := 12 to 15 do Begin if components[m] is Tedit then with TEdit(components[m]) do Memo4.Lines.add(text); end; Word := CreateOleObject('Word.application'); Word.visible := True; Word.Documents.Add; Word.selection.insertAfter(memo1.Text); Word.selection.insertAfter(memo2.Text); Word.selection.insertAfter(memo3.Text); Word.selection.insertAfter(memo4.Text); //Word.ActiveDocument.Save('Teste1.doc',0) ; end; mas gostaria que eles fossem divididos em 4 colunas, uma para cada memo ! até. by julio quierati __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] CAD com Delphi
No site da Torry.net tem uma seção soh com componentes CAD, desde de visualização até para desenhar... Abraços - Original Message - From: Fellipe Henrique To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 17, 2007 1:48 PM Subject: [delphi-br] CAD com Delphi Olá amigos, alguém poderia me informar alguma coisa sobre CAD com delphi. Componentes, bibliotecas, API o que for... estou precisando de algo sobre isso. desde já agradeço []s -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Descobrir o tamanho do arquivo
Acabei de conseguir. Eu havia tentado isso, mas meu arquivo era to tipo TextFile e a função FileSize me trazia o número de Registros. Agora estou abrindo o arquivo como outro tipo qualquer e a função está me trazendo os dados corretamente agora. Mas valeu pela ajuda. Willer - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 17, 2007 3:08 PM Subject: RE: [delphi-br] Descobrir o tamanho do arquivo Já olhou no help do Delphi a função FileSize()? Sds. From: willer [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Descobrir o tamanho do arquivo Date: Wed, 17 Jan 2007 12:00:20 -0200 Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [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 __ Informação do NOD32 IMON 1984 (20070117) __ 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] Sniffer!
Bom dia, Pessoa preciso fazer um sniffer em delphi, mas para a seguinte funcionalidade, em uma rede, preciso encontrar o servidor, não sei o ip dele, mas sei a porta, então vou varrer a rede e procurar um servidor com uma determinada porta. Alguém pode me dar alguma informação de como vou fazer isso? mto obriga! -- Atenciosamente Thiago Alves Teixeira [As partes desta mensagem que não continham texto foram removidas]
Re: Fwd: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II
Eu nunca tinha populado uma tabela via console do mysql, certamente esse é o problema, como ele roda no DOS a acentuação é diferente, eu sugiro uma conversão dos dados, como no exemplo, e que você faça futuras inserções atravez de um Front-end padrão Windows, mySQL Front é ótimo, se quiser posso te mandar eu uso dois, o mySQL Front 2.5 e EMS Manager Lite que são free. grande abraço. -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ Em 17/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED] escreveu: Eduardo, Primeiramenteo obrigado pela contribuição e mais um pequeno esclarecimento: Qdo alimentei a minha tabela com os dados, foi via console do Mysql. Nas linhas de inserção, as palavras estão acentuadas corretamente, ao realizar uma consulta na console do Mysql os registros são apresentados com os acentos corretos no banco. Qdo faço esta consulta através do Delphi, os acentos só veêm corretos, qdo a opção doOemTranslate está ativada. Att. Wilian Domingues Analista de Sistemas - Mensagem original De: Eduardo Silva dos Santos [EMAIL PROTECTED]eduardo.drd%40gmail.com Para: [EMAIL PROTECTED] w1l14n_analista%40yahoo.com.br Enviadas: Quarta-feira, 17 de Janeiro de 2007 12:41:04 Assunto: Fwd: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II -- Forwarded message -- From: Eduardo Silva dos Santos [EMAIL PROTECTED]eduardo.drd%40gmail.com Date: 17/01/2007 11:30 Subject: Re: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Willian, fiz um pequeno aplicativo que vai corrigir esse problema, isso acontece porque os dados foram inseridos no banco por uma querie com a opção doOEMTranslate ativada, dai os acentos são convertidos e inseridos no banco de forma Þ diferente, ao buscar via select, não são reconhecidos. a aplicação faz isso, abre a tabela, converte os acentos e insere os dados em outra tabela. ta la no meu site www.drdsistemas.com/util/oem_zeos.zip qualquer duvida estamos ae.. grande abraço. -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com Site: http://www.drdsistemas.com/ Em 16/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED] w1l14n_analista%40yahoo.com.br escreveu: Para não colocar muitas colunas... Pode usar uma simples estrutura de tabela, sendo: idEntidade int nmEntidade varchar(100) Minha busca sempre será pelo nome, com isso os outros campos não são importantes. Segue em anexo o script com a estrutura da tabela e os inserts. Grato pela ajuda. Att. Wilian Domingues Analista de Sistemas - Mensagem original De: Eduardo Silva dos Santos [EMAIL PROTECTED] eduardo.drd%40gmail.com Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Enviadas: Segunda-feira, 15 de Janeiro de 2007 18:08:07 Assunto: Re: [delphi-br] Acentução - Delphi + Mysql 4.1 + Zeos 6.5.1 - Parte II Oi Wilian, eu novamente, quando enviei o e-mail a ideia era desabilitar o doOEMTranslate, se os dados so estão vindo corretamento com ele habilitado significa que foram inseridos na tabela com ele habilitado tb, por isso sua busca fica assim, sem buscar com os acentos. tenho uma ideia de como resolver mas não sei se vai dar certo, será que você pode gerar o script de uma dessas tabelas e me enviar pra eu fazer um teste? fico no aguardo. Em 15/01/07, Wilian Domingues - Analista de [EMAIL PROTECTED]w1l14n_analista%40yahoo.com.br escreveu: Bom dia PessoALL, Tenho uma aplicação desenvolvida em Delphi + Mysql 4.1 + Zeos 6.5.1 Recentemente passei por um problema de acentuação, problema este, resolvido com a ajuda do Eduardo. A sua dica foi habilitar a opção do componente ZQuery: Options - doOemTranslate. Ao Habilitar, os dados do BD são carregados com os acentos corretos. Só que o meu problema está em cima disso. Quando vou realizar uma consulta com uma palavra acentuada não é localizado nada, estando a opção acima habilitada. Se eu desabilitar esta opção e trazer os dados com os caracteres malucos, ao realizar a consulta com as palavras acentuadas o resultado é feito com sucesso. Para realizar está consulta, eu carrego os dados em um combobox, seleciono um dos itens e mando localizar, assim o paramâtro da busca é exatamente a informação que está no BD. Exemplo: tabela FUNC ZQuery.SQL.Text := 'select * from func where nmfunc = :nmfunc'; O parâmetro nmfunc recebe o valor do COMBOBOX. Jos EstevÆo Braga - Sendo o parâmtro desta forma funciona José Estevão Braga - assim não funciona Já testei a consulta com doOemTranslate habilitado e desabilitado de ZQuery, mesmo assim o resultado é nulo qdo localizo com os acentos corretos. Alguém já passou por isso? Att. Wilian Domingues
Re: [delphi-br] Sniffer!
Fiz uma função que pode resolver seu problema... é claro que do jeito que ela está vai demorar um bom tempo. Agora vc tem duas tarefas: a primeira é desenvolver um função que faça o ping e te retorne se o computador respondeu ou não, e a outra é otimizar esse código e depois disponibilizá-lo para os nobres colegas da lista. Como escrevi essa msg no cliente de e-mail, não testei. Ahh, a função te retorna quais são os computadores ativos. Você tem uma terceira tarefa: escutar a porta desejada. [ ]'s, Andre function listaComputadoresAtivos : TStringList; var i,j,k,l : Integer; sl : TStringList; begin sl := TStringList.Create; for i := 1 to 254 do for j := 1 to 254 do for k := 1 to 254 do for l := 1 to 254 do begin ip := IntToStr(i)+'.'+IntToStr(j)+'.'+IntToStr(k)+'.'+IntToStr(l); if ping(ip) then sl.add(ip); // end if end; Result := sl; end; 2007/1/17, Thiago Teixeira [EMAIL PROTECTED]: Bom dia, Pessoa preciso fazer um sniffer em delphi, mas para a seguinte funcionalidade, em uma rede, preciso encontrar o servidor, não sei o ip dele, mas sei a porta, então vou varrer a rede e procurar um servidor com uma determinada porta. Alguém pode me dar alguma informação de como vou fazer isso? mto obriga! -- Atenciosamente Thiago Alves Teixeira [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos
Re: [delphi-br] CAD com Delphi
Valeu pessoal, tem um PowerCad...pelo que vi nos exemplos é do que preciso.. o problema é o valor.. :o) Quem souber de mais algum, estou as ordens mais uma vez obrigado. []s Em 17/01/07, Ricardo Berti [EMAIL PROTECTED] escreveu: No site da Torry.net tem uma seção soh com componentes CAD, desde de visualização até para desenhar... Abraços - Original Message - From: Fellipe Henrique To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, January 17, 2007 1:48 PM Subject: [delphi-br] CAD com Delphi Olá amigos, alguém poderia me informar alguma coisa sobre CAD com delphi. Componentes, bibliotecas, API o que for... estou precisando de algo sobre isso. desde já agradeço []s -- _ Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] PROBLEMA P DESTRUIR FORM
Olá colegas, estou migrando do D5 para o D7, só q estou com problemas qdo fecho o form, estou utilizando MDI, qdo tento destruir algum form aberto (MDIChild), utilizando a seguinte linha de código no Evento OnClose do form: Action:=caFree; até fecha o form, mais apresenta uma mensagem de Acess Violation at Adress 004C81EA agradeço a atenção dos colegas... Fábio. [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] Instalação de programas feitos em d2006...
Isso vai depender do seu software. Ex. utiliza banco de dados? então terá que instalar o banco de dados no cliente também. Procure pelo Inno Setup, é um gerador de instalador bem legal. Aproveite e baixe também o ISTool que é uma ferramenta pra montar o script do Inno Setup. [] Andrei Em 17/01/07, Joao Paulo EsPyl[EMAIL PROTECTED] escreveu: Gostaria de informações sobre a instalação de programas feito em d2006 (winform). Alguem tem o caminho das pedras do é preciso instalar na máquina do cliente para que o sistema funcione ? Obrigado.