Re: [delphi-br] OFF TOPIC
Se vc não tiver os fontes ou a documentação fica dificil. Fausto Sergio Alexandre Georg Martins escreveu: Ronperso, Você tem os fontes do sistema em Cobol? Sergio - Original Message - From: Ronaldo Sousa [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Sunday, July 31, 2005 12:18 AM Subject: [delphi-br] OFF TOPIC Boa noite a todos Desculpe o off é que estou com um problema serio, um cliente tem um sistema em cobol (arquivos .dat) e o programador sumiu do mapa, agora preciso migrar para o Delphi, alguem pode me ajundar, preciso disso com urgencia. Favor entrar em contato em ptv Ronperso [EMAIL PROTECTED] _ MSN Messenger: converse com os seus amigos online. http://messenger.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Arquivo - comandos.txt
Comandos e endereços especiais do servidor eGroups - Lista delphi-br [EMAIL PROTECTED] para postar uma mensagem para a lista [EMAIL PROTECTED] manda um email para TODOS os owners e moderadores. Tanto pode ser usado pelo assinante (ou não) para comunicação direta com os responsáveis, QUANTO pode ser usado pelos próprios owners como se fosse uma listinha privativa dos moderadores, para discussão de questões administrativas da lista sem a ciência dos membros normais. Endereços de Comandos: (Envie uma msg em branco) [EMAIL PROTECTED] assina a lista [EMAIL PROTECTED] cancela a assinatura da lista [EMAIL PROTECTED] Ativa modo NO MAIL - suspende temporariamente a entrega de e-mails, sem sair da lista [EMAIL PROTECTED] Ativa modo DIGEST - Assinante passa a receber as mensagens em modo Digest (uma única mensagem é enviada, com todo texto, a cada final de dia, ou a cada vez que houverem 25 mensagens - o que ocorrer primeiro) [EMAIL PROTECTED] Desativa NO MAIL ou DIGEST - Estando em modo digest ou no mail, o assinante volta ao modo NORMAL de recebimento por e-mails individuais. Obs. Note que o e-mail remetente deve ser o mesmo e-mail de recebimento das mensagens. -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Arquivo - Files.txt
COMO OBTER ACESSO À SEÇÃO DE ARQUIVOS DA LISTA. --- Para ter acesso à todos os recursos da Lista Delphi-BR, você precisa estar inscrito no YahooGrupos. Todas as listas hospedadas pelo YahooGrupos possuem espaço para disponibilização de arquivos, enquetes, fotos, URL's e histórico de mensagens, entre outros recursos. Os passos abaixo o auxiliarão no acesso à seção de arquivos da lista: - Acesse o site da lista http://lista.delphi-br.org/. - Clique no link Entre neste grupo. - Irá aparecer uma caixa de diálogo pedindo um login e uma senha do YahooGrupos. Quem já for filiado ao YahooGrupos por outros motivos, bastará digitar seu login e sua senha nos respectivos locais para que o mesmo vincule sua conta à lista. NOTA: Este cadastro é independente da sua inscrição na mesma feita via e-mail. - Após digitar seu login e senha do YahooGrupos e confirmar volte à página do grupo e verifique se todos os links da esquerda estão habilitados (Mensagens, Arquivos, Enviar, Bate-Papo, etc..). Caso não esteja mas você já seja membro do grupo, é sinal que você precisará ativar a sua conta no YahooGrupos com o mesmo. Neste caso o link que irá aparecer será Editar minhas opções. - Se você não tem conta no YahooGrupos, clique no link Cadastre-se agora. - Para quem não é associado, preencha todos os dados e confirme o envio. Lhe será enviada, pelo e-mail que você definiu, uma senha com a qual você passa a ter acesso aos serviços do Yahoo entre eles a lista de discussão. - Após este cadastro, volte ao endereço do site da lista e clique no link Entre neste grupo. Verás que aparecerá uma tela de cadastro DO SEU PERFIL NO GRUPO. Basta cofigurar tudo do jeito que você desejar e confirme as alterações. - Feito isto, você verá que quando voltar ao site da lista novas opções estarão disponíveis para você, entre as quais a área Arquivos que é a área onde você pode baixar os arquivos que o pessoal disponibiliza na lista. Quaisquer dúvidas, favor contactar o moderador da lista: [EMAIL PROTECTED] -- 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] ou [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] OFF TOPPIc - O que esta havendo com a clube delphi
Salve Dr. Fausto Entraram mais duas materias novas. Uma inclusive minha. hehehe.. Novos reports foram colocados tb. Esse pequeno atrazo foi devido ao esforço empreendido no ClubeDelphi Tech Weekend, o maior evento de Delphi do Brasil. Mas já normalizamos a velocidade de atualização. A média de atualizaçãoes tem sido semanais, e com toda humildade... somos o site de conteúdo específico mais completo para o desenvolvedor. E nenhum outro site tem a velocidade de atualização que nós temos e também a qualidade do conteúdo técnico. Somos o maior portal de TI da América Latina e temos servido a comunidade Delphi de maneira singular desde o inicio. Com relação as video aulas de materias: Tem sido um sucesso tremendo, e junto delas tds nos estamos trabalhando para transaformar o maior conteudo possivel em video aula , palestras on-line e cursos devido a facilidade do aprendizado. eu mesmo assisto a todas qto posso, a riqueza do conteudo transmitido pelo autor na video aula e mto mais facil de assimilar e mais rico tb. Eu diria q se complementam. Temos trabalhado e disponibilizado nossos recursos e tempo para poder sempre servir da melhor maneira a comunidade. Precisamos sempre de opiniões e sugestões para q possamos sempre melhorar e de alguma forma poder contribuir com o sucesso de todos. Obrigado pela colaboração!!! E conta sempre comigo!!! Estou as ordens. []´s Bruno Lichot - Borlander Delphi Rad Man Micrologos Dream Team Equipe ClubeDelphi DevMedia [EMAIL PROTECTED] [EMAIL PROTECTED] www.micrologos.com.br - www.clubedelphi.net - www.delphirio.assespro-rj.org.br - Original Message - From: Evolution [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, July 29, 2005 7:52 PM Subject: [delphi-br] OFF TOPPIc - O que esta havendo com a clube delphi Boa noite pessoal, Antes de tudo me desculpem pelo off, mas o que esta havendo com o site/revista clubedelphi, entrei no site hoje após 15 dias e continua a mesma coisa, nada de novo sempre a mesma coisa. Tem um artigo lá que pelo jeito vai fazer aniversário, é o do Luciano Pimenta sobre os componente DevExpress, parece que o pessoal caiu na mesmisse, o Guinther esta lançando videos aulas sobre matérias que ele já publicou nas revistas... Fausto -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] somar campos de um clientdataset
Pessoal, tem como suma os valores de um campo num clientdataset com uma query poderia fazer assim select sum(campo) as resultado from tabela where campo = valorcampo só q não sei como fazer isso num cds alguem me ajuda?? Miguel Villacorta 4446-4100 ramal 4126 7312-5509 [EMAIL PROTECTED] www.dpfautopecas.com.br MSN [EMAIL PROTECTED] -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.338 / Virus Database: 267.9.6/59 - Release Date: 27/7/2005 [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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Onde será que estou errando???????????
Pessoal, num botao que exclui os dados das tabelas coloquei o seguinte código: if messagebox(0, 'TEM CERTEZA QUE DESEJA EXCLUIR A NOTA DE DEVOLUÇÃO?', 'CONFIRMAÇÃO', MB_YESNO + MB_ICONQUESTION) = 6 THEN IF MESSAGEBOX(0, 'TEM CERTEZA MESMO?' + #13+ 'APOS APAGAR A NOTA NÃO PODERAM SER RECUPERADA!', 'CONFIRMAÇÃO', MB_YESNO + MB_ICONQUESTION) = 6 THEN BEGIN WITH qrDados DO //apaga os itens da nota fiscal tabela itens_devolucao BEGIN CLOSE; SQL.Clear; SQL.Add('DELETE * FROM ITENS_DEVOLUCAO '); SQL.Add('WHERE DEVOLUCAO = :DEVOLUCAO '); ParamByName('DEVOLUCAO').AsInteger := cdsNotaDEVOLUCAO.Value; ExecSQL; END; WITH qrGrid DO //apaga os dados da tabela com os dados da nota BEGIN CLOSE; SQL.Clear; SQL.Add('DELETE * FROM DEVOLUCAO '); SQL.Add('WHERE DEVOLUCAO = :DEVOLUCAO '); ParamByName('DEVOLUCAO').AsInteger := cdsNotaDEVOLUCAO.Value; ExecSQL; END; END; cdsDadosQuery.Refresh; cdsNota.Refresh; da o seguinte erro INVALID USE OS KEYWORD TOKEN : * LINE NUMBER 1 se tiro o * da sentença sql, aparece outro erro, TABLE IS READ ONLY o que será que esta dando pau??? Miguel Villacorta 4446-4100 ramal 4126 7312-5509 [EMAIL PROTECTED] www.dpfautopecas.com.br MSN [EMAIL PROTECTED] -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.338 / Virus Database: 267.9.6/59 - Release Date: 27/7/2005 [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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Problemas com cds e rave
Pessoal, estou com um form usando clientdataset, as consultas inclusões e exclusoes estão funcionando legal e sem problemas, o unico problema é na geração do relatorio, pois ele não obedece a filtragem feita nos cds, por exemplo chamo uma nota de um cliente, ele me traz todos os itens de notas da tabela, assim q não esta funcionando, será que tem algum problema com cds e rave? se bem que tentei usar Tquery para fazer a pesquisa e deu oi mesmo resultado, em outros formularios q fiz funciona legal, eu não estou entendendo nada Miguel Villacorta 4446-4100 ramal 4126 7312-5509 [EMAIL PROTECTED] www.dpfautopecas.com.br MSN [EMAIL PROTECTED] -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.338 / Virus Database: 267.9.6/59 - Release Date: 27/7/2005 [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] ou [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] Onde será q ue estou errando???????????
Miguelito, o comando é sem o asterisco mesmo, ficando assim: Delete from tabela where campo=parametro Quanto ao erro de table is read only, verifique a propriedade RequestLive do qrDados, ela tem que ficar em True. [] Andrei PS: Parece que seu computador está com a data errada... A msg chegou com data de 28/02/2005 Em 28/02/05, Miguelito[EMAIL PROTECTED] escreveu: Pessoal, num botao que exclui os dados das tabelas coloquei o seguinte código: if messagebox(0, 'TEM CERTEZA QUE DESEJA EXCLUIR A NOTA DE DEVOLUÇÃO?', 'CONFIRMAÇÃO', MB_YESNO + MB_ICONQUESTION) = 6 THEN IF MESSAGEBOX(0, 'TEM CERTEZA MESMO?' + #13+ 'APOS APAGAR A NOTA NÃO PODERAM SER RECUPERADA!', 'CONFIRMAÇÃO', MB_YESNO + MB_ICONQUESTION) = 6 THEN BEGIN WITH qrDados DO //apaga os itens da nota fiscal tabela itens_devolucao BEGIN CLOSE; SQL.Clear; SQL.Add('DELETE * FROM ITENS_DEVOLUCAO '); SQL.Add('WHERE DEVOLUCAO = :DEVOLUCAO '); ParamByName('DEVOLUCAO').AsInteger := cdsNotaDEVOLUCAO.Value; ExecSQL; END; WITH qrGrid DO //apaga os dados da tabela com os dados da nota BEGIN CLOSE; SQL.Clear; SQL.Add('DELETE * FROM DEVOLUCAO '); SQL.Add('WHERE DEVOLUCAO = :DEVOLUCAO '); ParamByName('DEVOLUCAO').AsInteger := cdsNotaDEVOLUCAO.Value; ExecSQL; END; END; cdsDadosQuery.Refresh; cdsNota.Refresh; da o seguinte erro INVALID USE OS KEYWORD TOKEN : * LINE NUMBER 1 se tiro o * da sentença sql, aparece outro erro, TABLE IS READ ONLY o que será que esta dando pau??? Miguel Villacorta 4446-4100 ramal 4126 7312-5509 [EMAIL PROTECTED] www.dpfautopecas.com.br MSN [EMAIL PROTECTED] -- 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] ou [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] OFF TOPIC
Ronaldo, se vc não tem os fontes do sistema realmente vai ficar difícil, se pelo menos souber a estrutura dos arquivos, será possível, já que a estrutura normalmente fica dentro dos fontes. Converse com o cliente e veja com ele se realmente não há nenhum documento deixado pelo programador. Sheila - Original Message - From: Ronaldo Sousa To: delphi-br@yahoogrupos.com.br Sent: Sunday, July 31, 2005 12:32 AM Subject: Re: [delphi-br] OFF TOPIC Eu não o tenho... ronperso From: Sergio Alexandre Georg Martins [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] OFF TOPIC Date: Sun, 31 Jul 2005 00:23:37 -0300 Ronperso, Você tem os fontes do sistema em Cobol? Sergio - Original Message - From: Ronaldo Sousa [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Sunday, July 31, 2005 12:18 AM Subject: [delphi-br] OFF TOPIC Boa noite a todos Desculpe o off é que estou com um problema serio, um cliente tem um sistema em cobol (arquivos .dat) e o programador sumiu do mapa, agora preciso migrar para o Delphi, alguem pode me ajundar, preciso disso com urgencia. Favor entrar em contato em ptv Ronperso [EMAIL PROTECTED] _ MSN Messenger: converse com os seus amigos online. http://messenger.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] OFF TOPIC - Convite
Olá pessoal do grupo. Convido a todos que quiserem incluir seus softwares, apostilas, dicas de programação gratuitamente no meu site que acabo de criar.Lá vocês vão encontrar o espaço para isso em nossa seção de downloads ou na nossa loja virtual. Caso queiram conhecer acessem : www.brunovendas.com.br Um abraço a todos, Bruno __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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] ou [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] somar campos de um clientdataset
É possível fazer isso usando AggregateFields. Informe-se mais sobre campos agregados em clientdatasets. No site http://codecentral.borland.com, registre-se e procure por exemplos de uso de clientdataset feitos pelo Guinther Pauli, editor da revista ClubeDelphi. []s From: Miguelito [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br delphi-br@yahoogrupos.com.br Subject: [delphi-br] somar campos de um clientdataset Date: Mon, 28 Feb 2005 12:03:28 -0300 (Hora oficial do Brasil) Pessoal, tem como suma os valores de um campo num clientdataset com uma query poderia fazer assim select sum(campo) as resultado from tabela where campo = valorcampo só q não sei como fazer isso num cds alguem me ajuda?? Miguel Villacorta 4446-4100 ramal 4126 7312-5509 [EMAIL PROTECTED] www.dpfautopecas.com.br MSN [EMAIL PROTECTED] -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.338 / Virus Database: 267.9.6/59 - Release Date: 27/7/2005 [As partes desta mensagem que não continham texto foram removidas] _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Comando SQL no Firebird/Delphi
Estou tendo problemas em realizar esta consulta no banco de dados Se vcs tiverem alguma sugestão par melhorar esta consulta agradeço! Comando que simplesmente não aceita mais campos no select: select pessoa.id,pessoa.nome, pessoa.telefone, carro.placa,carro.ano, sum(carro.quantidade) from pessoa,carro where pessoa.id = carro.id_prorprietario group by 1 having sum(carro.quantidade) = 6 Mas este é o retorno do erro no IBExpert: ***Invalid token. ***Dynamic SQL Error. ***SQL error code = -104. ***Invalid expression in the select list (not contained in either an aggregate function or the GROUP BY clause). Desse jeito funciona: (mas não adianta) select pessoa.id, sum(carro.quantidade) from pessoa,carro where pessoa.id = carro.id_prorprietario group by 1 having sum(carro.quantidade) = 6 Estrutura da Tabela: Pessoa: - id (PK) - nome (Char 50) - idade (date) - telefone (Char 50) - endereco (Char 200) Carro: - placa (PK) - id_modelo (Estrangeira) - id_proprietario (Estrangeira, da tabela pessoa) - quantidade (int) - Ano (date) - Estado(Char 2) Utilizo Firebird 1.52, Delphi com IBX Um abraço! ÿ Fabiano Augusto C. R. Filho ¯ MSN Messenger: [EMAIL PROTECTED] ¯ ICQ UIN#: 191346865 È Celular: (28) 9885-4544 2 WebSite: http://fabiano3dfx.vila.bol.com.br/ + E-mail: [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [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] Comando SQL no Firebird/Delphi
A mensagem de erro diz: ***Invalid expression in the select list (not contained in either an aggregate function or the GROUP BY clause). Ela diz que a lista do SELECT é inválida, pq vc está agrupando os dados por apenas um dos campos que aparecem no SELECT. Se vc tirar do SELECT os campos pessoa.nome, pessoa.telefone, carro.placa e carro.ano a instrução SQL irá dar certo. Pq? Pq vc tem que fazer GROUP BY em TODOS os campos que não são resultado de SUM(), AVG(), COUNT(), etc. Revise seu SQL. []s From: Fabiano A. C. [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Comando SQL no Firebird/Delphi Date: Sun, 24 Jul 2005 18:41:59 -0300 Estou tendo problemas em realizar esta consulta no banco de dados Se vcs tiverem alguma sugestão par melhorar esta consulta agradeço! Comando que simplesmente não aceita mais campos no select: select pessoa.id,pessoa.nome, pessoa.telefone, carro.placa,carro.ano, sum(carro.quantidade) from pessoa,carro where pessoa.id = carro.id_prorprietario group by 1 having sum(carro.quantidade) = 6 Mas este é o retorno do erro no IBExpert: ***Invalid token. ***Dynamic SQL Error. ***SQL error code = -104. ***Invalid expression in the select list (not contained in either an aggregate function or the GROUP BY clause). Desse jeito funciona: (mas não adianta) select pessoa.id, sum(carro.quantidade) from pessoa,carro where pessoa.id = carro.id_prorprietario group by 1 having sum(carro.quantidade) = 6 Estrutura da Tabela: Pessoa: - id (PK) - nome (Char 50) - idade (date) - telefone (Char 50) - endereco (Char 200) Carro: - placa (PK) - id_modelo (Estrangeira) - id_proprietario (Estrangeira, da tabela pessoa) - quantidade (int) - Ano (date) - Estado(Char 2) Utilizo Firebird 1.52, Delphi com IBX Um abraço! ÿ Fabiano Augusto C. R. Filho ¯ MSN Messenger: [EMAIL PROTECTED] ¯ ICQ UIN#: 191346865 È Celular: (28) 9885-4544 2 WebSite: http://fabiano3dfx.vila.bol.com.br/ + E-mail: [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [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] Comando SQL no Firebird/Delphi
Primeiro erro: Na cláusula Group By deverão estar todos os campos contidos no Select, exceto os campos calculados. Segundo erro: Se você está trabalhando com objetos, lembre-se que Pessoa é um objeto e Carro é outro. Eles pertencem a classes diferentes, mas a classe Pessoa possui em seus atributos uma instância da classe Carro. Espero ter ajudado! Sds, Romario Fabiano A. C. escreveu: Estou tendo problemas em realizar esta consulta no banco de dados Se vcs tiverem alguma sugestão par melhorar esta consulta agradeço! Comando que simplesmente não aceita mais campos no select: select pessoa.id,pessoa.nome, pessoa.telefone, carro.placa,carro.ano, sum(carro.quantidade) from pessoa,carro where pessoa.id = carro.id_prorprietario group by 1 having sum(carro.quantidade) = 6 Mas este é o retorno do erro no IBExpert: ***Invalid token. ***Dynamic SQL Error. ***SQL error code = -104. ***Invalid expression in the select list (not contained in either an aggregate function or the GROUP BY clause). Desse jeito funciona: (mas não adianta) select pessoa.id, sum(carro.quantidade) from pessoa,carro where pessoa.id = carro.id_prorprietario group by 1 having sum(carro.quantidade) = 6 Estrutura da Tabela: Pessoa: - id (PK) - nome (Char 50) - idade (date) - telefone (Char 50) - endereco (Char 200) Carro: - placa (PK) - id_modelo (Estrangeira) - id_proprietario (Estrangeira, da tabela pessoa) - quantidade (int) - Ano (date) - Estado(Char 2) Utilizo Firebird 1.52, Delphi com IBX Um abraço! Fabiano Augusto C. R. Filho ___ Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- 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] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Controle de Transações com ADO+Access
Pessoal Tenho uma dúvida, estou tentando implementar algo como controle de transações na emissão de um Romaneio de saída, em monousuário tudo bem, mas quando executo a rotina em 2 máquinas, uma consegue fazer, a outra não, dando a mensagem de erro do except. Como posso implementar isso para que funcione corretamente? Onde estou errando no meu código ou na minha lógica? Existe alguma configuração do TADOConnection que podem estar influenciando nisso, pois não sei para que servem muitas das propriedades desse componente, pois só uso ConnectionString? Uso Delphi 5 + ADO + Access. Segue abaixo o meu código, resumidamente. Grato por qualquer ajuda procedure TFrmRomaneio.bbtGravarClick(Sender: TObject); begin FrmDM.AdoConnection1.BeginTrans; try GravaRomaneio; FrmDM.AdoConnection1.CommitTrans; except MessageDlg('Houve um erro na gravação dos dados.'+#13+#10+' As Informações não foram gravadas.', mtError, [mbOK], 0); FrmDM.AdoConnection1.RollBackTrans; end; end; procedure TFrmRomaneio.GravaRomaneio; var NumNFS : Integer; begin //Grava Romaneio NumNFS := 0; FrmDM.tbNFS.Open; FrmDM.tbNFS.Append; FrmDM.tbNFSCodCli.Value:= ebCodCli.AsInteger; FrmDM.tbNFSDtEmiss.Value := date; FrmDM.tbNFSVlProd.Value:= ebVlProd.Value; FrmDM.tbNFSRepr.Value := StrToInt(dblcbRepr.text); FrmDM.tbNFSOprVen.Value:= dblcbOprVen.Text; FrmDM.tbNFSStatus.Value:= 'A'; FrmDM.tbNFS.Post; NumNFS := FrmDM.tbNFSCodDocInt.Value; FrmDM.tbNFS.Close; //Grava Itens do Romaneio FrmDM.tbItensNFS.Open; memItens.First; while not (memItens.EOF) do begin FrmDM.tbItensNFS.Append; FrmDM.tbItensNFSCodDocInt.Value := NumNFS; FrmDM.tbItensNFSCodProd.Value:= memItensCodigo.Value; FrmDM.tbItensNFSDescricao.Value := memItensProduto.Value; FrmDM.tbItensNFSUnd.Value:= memItensUnd.Value; FrmDM.tbItensNFSQtd.Value:= memItensQtdRom.Value; FrmDM.tbItensNFSCustoUnit.Value := memItensVlUnitRom.Value; FrmDM.tbItensNFS.Post; memItens.Next; end; FrmDM.tbItensNFS.Close; end; [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] ou [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] Data Module
tbem fiz isso e funcionou perfeitamente, mas quando fui testar para dar essa parte como encerrada começou a aparecer esse problema e agora preciso saber como surgiu isso para corrigir e não deixar acontecer de novo... - Original Message - From: Evolution To: delphi-br@yahoogrupos.com.br Sent: Saturday, July 30, 2005 7:27 PM Subject: Re: [delphi-br] Data Module Eu sempre utilizei datamodules e nunca tive estes problemas, qto as funções/procedures, é só declara-las no form em que vc for utilizar. Caso seja eventos do tipo BeforeInsert..Post..Delete é só rescrevelos no form. Fausto Wilson Valdevite escreveu: testei assim e tbem parou de dar problema, mas o pior é que todas as funções que preciso para o funcionamento desta parte de orçamentos está todinha montada em uma unit separada, e ter que reescrever isso para cada form criado é uma dor de cabeça que nem quero imaginar - Original Message - From: Miguelito To: delphi-br@yahoogrupos.com.br Sent: Monday, March 28, 2005 3:33 PM Subject: Res: [delphi-br] Data Module olha, eu tambem teve muitos problemas trabalhando com datamodule, eu prefiro colocar no form e acabou, dava pau toda hora; Miguel Villacorta 4446-4100 ramal 4126 7312-5509 [EMAIL PROTECTED] www.dpfautopecas.com.br MSN [EMAIL PROTECTED] ---Mensagem original--- De: delphi-br@yahoogrupos.com.br Data: 07/28/05 13:14:01 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Data Module Galera, boa tarde... Depois dessa odisséia acho que consegui descobrir onde está o problema e acho que é no datamodule, pois coloquei os componentes de conexão nos forms e agora estão trabalhando que é uma beleza... Alguém já passou por isso e tem alguma idéia do que causa esses erros e como posso cirrigir? Desde já agradeço [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] ou [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 Termos do Serviço do Yahoo!. -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.338 / Virus Database: 267.9.6/59 - Release Date: 27/7/2005 [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] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.338 / Virus Database: 267.9.7/60 - Release Date: 28/07/2005 [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] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.338 / Virus Database: 267.9.7/60 - Release Date: 28/07/2005 [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas,
Re: [delphi-br] OFF TOPIC
uma maneira de recuparar os dados seria gerar os relatorio dos sistema em disco e com uma aplicacação em delphi RECORTAR o relatorio e importar para um banco. da um pouco de trabalho mas é viavel e seguro 1 - Para jogar os relatorio para DISCO eu uso um software muito antigo que se chama PRN2FILE.COM deve ser executotado em somemento prompt do dos pois entra em conflito com a lpt1 do windows 2 - tem na net 3- executa se assim prn2file c:\saida.txt roda o seu programa em cobol executa o relatorio e no final executa somente prn2file para finalizar a captura 4 - abra o arquivo c:\saida.txt com qualquer edito e bom trabalho _ [EMAIL PROTECTED] analista de sistemas Rio Grande - RS -- - Original Message - From: Sheila [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Sunday, July 31, 2005 11:59 AM Subject: Re: [delphi-br] OFF TOPIC Ronaldo, se vc não tem os fontes do sistema realmente vai ficar difícil, se pelo menos souber a estrutura dos arquivos, será possível, já que a estrutura normalmente fica dentro dos fontes. Converse com o cliente e veja com ele se realmente não há nenhum documento deixado pelo programador. Sheila - Original Message - From: Ronaldo Sousa To: delphi-br@yahoogrupos.com.br Sent: Sunday, July 31, 2005 12:32 AM Subject: Re: [delphi-br] OFF TOPIC Eu não o tenho... ronperso From: Sergio Alexandre Georg Martins [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] OFF TOPIC Date: Sun, 31 Jul 2005 00:23:37 -0300 Ronperso, Você tem os fontes do sistema em Cobol? Sergio - Original Message - From: Ronaldo Sousa [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Sunday, July 31, 2005 12:18 AM Subject: [delphi-br] OFF TOPIC Boa noite a todos Desculpe o off é que estou com um problema serio, um cliente tem um sistema em cobol (arquivos .dat) e o programador sumiu do mapa, agora preciso migrar para o Delphi, alguem pode me ajundar, preciso disso com urgencia. Favor entrar em contato em ptv Ronperso [EMAIL PROTECTED] _ MSN Messenger: converse com os seus amigos online. http://messenger.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [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