[delphi-br] Interface grafica para o fire bird
Alguem pode me dizer onde baixar o administrado com a interface grafica para o fire bird? Desde já, obridado. Igor Alexandre. -- 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] Interface grafica para o fire bird
O FireBird não possui um software gerenciador com interface gráfica padrão com ele. Vc deve optar pelas alternativas que existem elaboradas por terceiros, como o IBExpert. Informe-se sobre download desta e de outras ferramentas de administração de bancos de dados FireBird em sites dedicados ao tema, como: http://www.firebird.com.br http://www.firebase.com.br http://www.comunidade-firebird.org Sds. From: igoralexandres [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Interface grafica para o fire bird Date: Sun, 05 Feb 2006 12:26:11 - Alguem pode me dizer onde baixar o administrado com a interface grafica para o fire bird? Desde já, obridado. Igor Alexandre. _ MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.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] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] [URGENTE] Clientdataset e delphi 2006
Estimado, Bom dia. Se o sql está no ClientDataSet, certifique-se de que a opção AllowCommandText do seu PROVIDER esteja TRUE. Isso faz com que o SQLDataSet ou SQLQuery que está na outra ponta aceite os comandos vindos do clientDataset. Outra coisa é com o jeito de fazer os selects e joins. Eu faço assim: SELECT v.*, c.Nome, c.Bairro, c.Numero, c.Cidade, c.Telefone, c.Endereco, c.Uf, c.Cep, r.Nome AS NomeVendedor FROM venda_pedido v LEFT JOIN cliente c ON c.Codigo = v.Codigo LEFT JOIN vendedor r ON r.Codigo = v.Vendedor WHERE v.Empresa = :emp AND v.NumPedido = :pedido Sinceramente eu não utilizo a prática de passar comandos pelo ClientDataSet. Eu faco sempre: SQLQuery + Provider + ClientDataSet + DataSource Todos os comandos eu passo direto para a SQLQuery e o ClientDataSet só serve pra dar Open/Post/Apply/Insert/Edit e Delete. Mas cada um trabalha como quer né. Outra questão é sobre o UPDATEMODE, do provider. Nesse seu caso ai ele tem que ser KeyOnly. Daí, no SQLQuery eu adiciono todos os campos. No Tfields da SQLQuery, para os campos que não sofreram nenhuma modificação (caso os do cliente e o vendedor) eu desabilito todos os providers flag. Para os campos chave (empresa e teoricamente numero do pedido, que você não mencionou) eu coloco pfInUpdate, pfInWhere e pfInKey como true. Por fim, para o restante dos campos somente pfInUpdate. Tem alguns exemplos na net como o sistema DATACAR do Guinther que tá no quality central da borland, é só se cadastrar e baixar. Tem também apostilas e vários outros materiais do nosso companheiro Bruno. www.micrologos.com.br/mc_clienteservidor.zip E por aí vai. Aguardamos um retorno seu. Saudações. --- []'s Alexandre Frase da semana: Não basta ter grandes qualidades, cumpre saber usá-las. (La Rochefoucauld) -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rafael Jorge Enviada em: sábado, 4 de fevereiro de 2006 13:51 Para: delphi-br Assunto: [delphi-br] [URGENTE] Clientdataset e delphi 2006 eu utilizava IBO é ao migrar para dbexpress to apanhando feio com erros estranhos. um deles e o que esta impedindo de dar continuidade ao meu trabalho e esse, ao dar um post num clientdataset esta tudo certo ai dou um applyupdates e acontece isso - raised exception class edatabaseerror with message 'Database server error: column unknown nome da coluna da tabela' se eu mando continuar ai vem essa proxima mensagem - raised exception class edatabaseerror with message 'unables to find record. no key specified' so que a tabela tem chave primaria e tudo. ao abrir ela ela abre. da post e tudo so na hora do applyupdates ele da pau. o sql que ta no clientdataset é : select venda_pedido.*, cliente.nome, cliente.bairro, cliente.numero, cliente.cidade, cliente.telefone, cliente.endereco, cliente.uf,cliente.cep, venda_vendedor.nome vendnome from cliente, venda_pedido, venda_vendedor where cliente.codigo = venda_pedido.cliente and venda_vendedor.codigo = venda_pedido.vendedor and venda_pedido.empresa = :emp realmente nao sei mais o que fazer. COLOQUEI o providerflags o pfinupdate = false nos campos que vem de outra tabela, mas deu em nada. sempre o mesmo erro. nao sei mais o que fazer. meu trabalho esta parado e nao arrumo solucao pra isso. t+ -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos __ NOD32 1.1392 (20060202) Information __ This message was checked by NOD32 antivirus system. http://www.eset.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] 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] Controle de usuarios
Utilize o treview é bem mais facil. Clovis - Original Message - From: Carlos To: Undisclosed-Recipient:; Sent: Saturday, February 04, 2006 5:36 PM Subject: [delphi-br] Controle de usuarios Salve, salve companheiros... Novamente, venho aos nobres amigos solicitar ajuda. Estou tentando criar um controle de acessos por nível de usuário - antes de me estender, já testei o UserControl, porém, ele além de engordar muito meu executável, apresentou alguns bugs (até já os reportei a seu idealizadores a fim de colaborar para sua melhoria, enfim, não quero utiliza-lo, pelo menos por enquanto). O que preciso em principio, é preencher um ListView ou um TreeView, com os itens do meu menu (TMainMenu). Será que alguém poderia me ajudar?? E de repente até me aconselhar qual dos dois componentes utilizar, já que todos já sabem a finalidade. Realmente, agradeço muito a preciosa colaboração. Meu sistema é Delphi7 com MySql Carlos E. Carvalho [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Desligar Windows XP
Existem outras formas de desligar o windows dá uma passadinha no www.seven.com.br e procura as dicas para delphi. Clovis - Original Message - From: Felipe Souza To: delphi-br@yahoogrupos.com.br Sent: Saturday, February 04, 2006 8:06 PM Subject: Re: [delphi-br] Desligar Windows XP Obrigado amigo, funcionou perfeitamente, só umd etalhe, nao é free nao... hehehe Atenciosamente, Felipe Souza From: [EMAIL PROTECTED] [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Desligar Windows XP Date: Fri, 3 Feb 2006 14:26:09 -0200 Tem um componente chama-se abf procura é free, dica tá no baixaki. Clovis - Original Message - From: Felipe Souza To: delphi-br@yahoogrupos.com.br Sent: Thursday, February 02, 2006 12:09 AM Subject: [delphi-br] Desligar Windows XP Amigos, Há algum tempo atrás eu tinha conseguido um comando o qual prometia desligar o Windows XP ao clicar em um botão, mas o mesmo somente fazia LogOFF, hoje não tenho mais este comando, gostaria da ajuda dos amigos para um comando que REALMENTE DESLIGUE o windows XP por completo (da mesma forma que clicar em iniciar-Desligar), será que alguém tem essa informação para compartilhar comigo? Agradeço desde já, Atenciosamente, Felipe Souza From: Walter Alves Chagas Junior [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: 'delphi-br@yahoogrupos.com.br' delphi-br@yahoogrupos.com.br Subject: RES: [delphi-br] Proteção anti-cópias Date: Wed, 1 Feb 2006 09:10:34 -0300 É ... Tens razão... A dica foi para IPs fixos. Se a rede trabalhar com IP Fixo é até válido, mas como isto é uma prática hoje em desuso no mercado, acho que a dica também deverá ser revista :) Mas... Acho que é facil adapta-la para IP dinâmicos, bastando retirar esta checagem, substituindo por existencias de arquivos, datas de arquivos, pastas, etc. Pode-se usar também o endereço MAC da placa de rede. Ninguem falou nisto ó! É como eu falei... Foi apenas uma dica. Na minha opinião, toda e qualquer dica, por mais viajada que seja, é válida aqui. Afinal de contas, a lista existe é pra isto mesmo. Hummm... Isto é assunto para mais de metro :) Acho que cada um deve escolher a melhor opção. Ou seja ... A que ele consegue e que melhor se adequa. Também concordo. Dicas de proteção são uma eterna polêmica nos foruns, mas na minha opinião, a melhor proteção contra pirataria é aquela desenvolvida por você mesmo. Mas... Quero deixar registrado... que discordo completamente... das soluções caras via Hardwares que prometem travar tudo. Eu já trabalhei com Hardlock, ele não tem segredo não mas tem um inconveniente sério: Se o cliente perder o bagulho, o programa dele não vai rodar e ele vai querer que você assuma este onus... Já tivemos este tipo de problema lá na CABTEC. Um chegado (amigo) meu... analisou as informações que passavam de-para a trava e o software... Desmontou um dispositivo, e quebrou a trava... colocando uma gambiarra na serial de dar inveja ao cara que martelou anos para inventar a joça. * vale lembrar que ele não tem formação acadêmica. * tudo aprendido na tora, nos livros e com outro amigos. Por favor, não vamos começar com esta discussão infundamentada de que o Diploma é ou não, faz ou não faz, etc... Deixa esse assunto de fora. Sei que este não é assunto para a lista... Mas até a alguns me mostraram (e experimentei para testes) um ship da TIM que permitia ligações/conferências... etc... sem pagar nada :) Ship escreve é com C e não com S. Tem sites aí na WEB que ensinam você a quebrar proteções e validadores de Chips de celulares GSM. Mas nisto existem dois meros probleminhas que podem lhe causar problemas futuros (para os que se julgam mais espertos que a esperteza): 1) Seu chip pode ter estes recursos disponíveis, mas a quebra dos limitadores podem ter comprometido o funcionamento dele pra outras coisas. 2)A operadora tem plenas condições de descobrir que você está fazendo ligaçõs interurbanas e etc sem estar pagando. Se ela ver que seu chip foi adulterado, você pode ir pra cadeia por estelionato. Cara... Para os meninos que mechem com JUMPS em assembler é só questão de tempo para descobrir e reverter qualquer lógica de proteção
[delphi-br] Justificação Memo
Olá amigos, Estou com uma dúvida, alguém possui uma função que justifica texto no Memo?? ou no QReport. Atenciosamente, Halley Wesley Gondim -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Desligar Windows XP
Vc pode usar o comando shutdown -s ou veja as possibilidades usando shutdown /? José Roberto -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de [EMAIL PROTECTED] Enviada em: domingo, 5 de fevereiro de 2006 10:12 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Desligar Windows XP Existem outras formas de desligar o windows dá uma passadinha no www.seven.com.br e procura as dicas para delphi. Clovis - Original Message - From: Felipe Souza To: delphi-br@yahoogrupos.com.br Sent: Saturday, February 04, 2006 8:06 PM Subject: Re: [delphi-br] Desligar Windows XP Obrigado amigo, funcionou perfeitamente, só umd etalhe, nao é free nao... hehehe Atenciosamente, Felipe Souza From: [EMAIL PROTECTED] [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Desligar Windows XP Date: Fri, 3 Feb 2006 14:26:09 -0200 Tem um componente chama-se abf procura é free, dica tá no baixaki. Clovis - Original Message - From: Felipe Souza To: delphi-br@yahoogrupos.com.br Sent: Thursday, February 02, 2006 12:09 AM Subject: [delphi-br] Desligar Windows XP Amigos, Há algum tempo atrás eu tinha conseguido um comando o qual prometia desligar o Windows XP ao clicar em um botão, mas o mesmo somente fazia LogOFF, hoje não tenho mais este comando, gostaria da ajuda dos amigos para um comando que REALMENTE DESLIGUE o windows XP por completo (da mesma forma que clicar em iniciar-Desligar), será que alguém tem essa informação para compartilhar comigo? Agradeço desde já, Atenciosamente, Felipe Souza From: Walter Alves Chagas Junior [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: 'delphi-br@yahoogrupos.com.br' delphi-br@yahoogrupos.com.br Subject: RES: [delphi-br] Proteção anti-cópias Date: Wed, 1 Feb 2006 09:10:34 -0300 É ... Tens razão... A dica foi para IPs fixos. Se a rede trabalhar com IP Fixo é até válido, mas como isto é uma prática hoje em desuso no mercado, acho que a dica também deverá ser revista :) Mas... Acho que é facil adapta-la para IP dinâmicos, bastando retirar esta checagem, substituindo por existencias de arquivos, datas de arquivos, pastas, etc. Pode-se usar também o endereço MAC da placa de rede. Ninguem falou nisto ó! É como eu falei... Foi apenas uma dica. Na minha opinião, toda e qualquer dica, por mais viajada que seja, é válida aqui. Afinal de contas, a lista existe é pra isto mesmo. Hummm... Isto é assunto para mais de metro :) Acho que cada um deve escolher a melhor opção. Ou seja ... A que ele consegue e que melhor se adequa. Também concordo. Dicas de proteção são uma eterna polêmica nos foruns, mas na minha opinião, a melhor proteção contra pirataria é aquela desenvolvida por você mesmo. Mas... Quero deixar registrado... que discordo completamente... das soluções caras via Hardwares que prometem travar tudo. Eu já trabalhei com Hardlock, ele não tem segredo não mas tem um inconveniente sério: Se o cliente perder o bagulho, o programa dele não vai rodar e ele vai querer que você assuma este onus... Já tivemos este tipo de problema lá na CABTEC. Um chegado (amigo) meu... analisou as informações que passavam de-para a trava e o software... Desmontou um dispositivo, e quebrou a trava... colocando uma gambiarra na serial de dar inveja ao cara que martelou anos para inventar a joça. * vale lembrar que ele não tem formação acadêmica. * tudo aprendido na tora, nos livros e com outro amigos. Por favor, não vamos começar com esta discussão infundamentada de que o Diploma é ou não, faz ou não faz, etc... Deixa esse assunto de fora. Sei que este não é assunto para a lista... Mas até a alguns me mostraram (e experimentei para testes) um ship da TIM que permitia ligações/conferências... etc... sem pagar nada :) Ship escreve é com C e não com S. Tem sites aí na WEB que ensinam você a quebrar proteções e validadores de Chips de celulares GSM. Mas nisto existem dois meros probleminhas que podem lhe causar problemas futuros (para os que se julgam mais espertos que a esperteza): 1) Seu chip pode ter estes recursos disponíveis, mas a quebra dos limitadores podem ter comprometido o funcionamento dele pra outras coisas. 2)A operadora tem plenas condições de descobrir
Re: RES: RES: [delphi-br] Delphi + Quick Report + SQL
Roberto, acho que também não tá certa essa linha do subselect Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita experimente simplesmente Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita = visita.vis_tipovisita abs. Júio Abdala José Roberto [EMAIL PROTECTED] escreveu: A questão eh que só separa corretamente para o primeiro select no subselect ele coloca os mesmos valores desconsiderando o tipo da visita, veja o resultado que eu havia passado msn: [EMAIL PROTECTED] José Roberto -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Julio Abdala Enviada em: sábado, 4 de fevereiro de 2006 23:14 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Delphi + Quick Report + SQL olhando o teu sql e imaginando a tua tabela, me veio uma pergunta... ele realmente está agrupando por tipo de visita, mas.. não é por pagou ou não pago que ele quer o resultado? tipo de visita = avulta ou contrato, pagto_ok = sim ou não logo, se você deseja dividir as linhas em pagos e não pagos tem que incluir este campo na consulta e no group by. o resultado do sql tá correto para o que foi escrito, está agrupando por tipo de visita, se você deseja o dados por pagto_ok (sim ou não) inclua-o na consulta e no group by. Tente: select visita.vis_tipovisita, visita.vis_pagto_ok, sum(vis_valor) valortotal, (Select Sum(vis_valor) from visita visita_pagar Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita And visita_pagar.vis_dt_inicio '01/01/2006') As Pagar, (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou from visita where vis_tipovisita is not null and vis_dt_inicio '01/01/2006' group by visita.vis_tipovisita, visita.vis_pagto_ok abs. Júlio Abdala José Roberto [EMAIL PROTECTED] escreveu: Denner e Julio, Usando este igual vcs indicaram SQL pelo Ibexpert (Firebird) select vis_tipovisita, sum(vis_valor) valortotal, (Select Sum(vis_valor) from visita visita_pagar Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita And visita_pagar.vis_dt_inicio '01/01/2006') As Pagar, (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou from visita where vis_tipovisita is not null and vis_dt_inicio '01/01/2006' group by vis_tipovisita dá esse Resultado VIS_TIPOVISITA VALORTOTAL PAGAR PAGOU Avulsa 1204 249 1335 Contrato 380 249 1335 Se eu ignorar o tipo da visita, tirando do select inicial e do group by aí dá certo, mas aí não terei a separação que queria, mas por enquanto usarei desta forma, mas se alguém tiver alguma idéia, agradeço -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Denner Bizarria Branco Enviada em: sábado, 4 de fevereiro de 2006 07:23 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Delphi + Quick Report + SQL nos subselects coloca o alias que voce colocou na tabela nas condições... (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou José Roberto wrote: Fiz dessa forma mas ainda não tá legal, select vis_tipovisita tipovisita, sum(vis_valor) valortotal, (select sum(vis_valor) from visita visita_pagar where vis_pagto_ok = 'NÃO' and visita.vis_tipovisita = visita_pagar.vis_tipovisita AND vis_tipovisita is not null) as Receber, (select sum(vis_valor) from visita visita_paga where vis_pagto_ok = 'SIM' AND vis_tipovisita is not null and visita.vis_tipovisita = visita_paga.vis_tipovisita and vis_dt_inicio '01/01/2006') as Pagou from visita where vis_tipovisita is not null and vis_dt_inicio '01/01/2006' group by vis_tipovisita O resultado ta assim TIPOVISITA VALORTOTAL RECEBER PAGOU Avulsa 12048091335 Contrato 3808091335 Ele dá os totais mas ignora o tipo de visita nos dois subselects José Roberto [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos
RES: RES: RES: [delphi-br] Delphi + Quick Report + SQL
Mas eu acho que devia ter algo como um group by nos subs pois se não só retorna os valores mesmos diferente do select principal José Roberto -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Julio Abdala Enviada em: domingo, 5 de fevereiro de 2006 19:54 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: RES: [delphi-br] Delphi + Quick Report + SQL Roberto, acho que também não tá certa essa linha do subselect Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita experimente simplesmente Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita = visita.vis_tipovisita abs. Júio Abdala José Roberto [EMAIL PROTECTED] escreveu: A questão eh que só separa corretamente para o primeiro select no subselect ele coloca os mesmos valores desconsiderando o tipo da visita, veja o resultado que eu havia passado msn: [EMAIL PROTECTED] José Roberto -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Julio Abdala Enviada em: sábado, 4 de fevereiro de 2006 23:14 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Delphi + Quick Report + SQL olhando o teu sql e imaginando a tua tabela, me veio uma pergunta... ele realmente está agrupando por tipo de visita, mas.. não é por pagou ou não pago que ele quer o resultado? tipo de visita = avulta ou contrato, pagto_ok = sim ou não logo, se você deseja dividir as linhas em pagos e não pagos tem que incluir este campo na consulta e no group by. o resultado do sql tá correto para o que foi escrito, está agrupando por tipo de visita, se você deseja o dados por pagto_ok (sim ou não) inclua-o na consulta e no group by. Tente: select visita.vis_tipovisita, visita.vis_pagto_ok, sum(vis_valor) valortotal, (Select Sum(vis_valor) from visita visita_pagar Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita And visita_pagar.vis_dt_inicio '01/01/2006') As Pagar, (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou from visita where vis_tipovisita is not null and vis_dt_inicio '01/01/2006' group by visita.vis_tipovisita, visita.vis_pagto_ok abs. Júlio Abdala José Roberto [EMAIL PROTECTED] escreveu: Denner e Julio, Usando este igual vcs indicaram SQL pelo Ibexpert (Firebird) select vis_tipovisita, sum(vis_valor) valortotal, (Select Sum(vis_valor) from visita visita_pagar Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita And visita_pagar.vis_dt_inicio '01/01/2006') As Pagar, (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou from visita where vis_tipovisita is not null and vis_dt_inicio '01/01/2006' group by vis_tipovisita dá esse Resultado VIS_TIPOVISITA VALORTOTAL PAGAR PAGOU Avulsa 1204 249 1335 Contrato 380 249 1335 Se eu ignorar o tipo da visita, tirando do select inicial e do group by aí dá certo, mas aí não terei a separação que queria, mas por enquanto usarei desta forma, mas se alguém tiver alguma idéia, agradeço -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Denner Bizarria Branco Enviada em: sábado, 4 de fevereiro de 2006 07:23 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Delphi + Quick Report + SQL nos subselects coloca o alias que voce colocou na tabela nas condições... (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou José Roberto wrote: Fiz dessa forma mas ainda não tá legal, select vis_tipovisita tipovisita, sum(vis_valor) valortotal, (select sum(vis_valor) from visita visita_pagar where vis_pagto_ok = 'NÃO' and visita.vis_tipovisita = visita_pagar.vis_tipovisita AND vis_tipovisita is not null) as Receber, (select sum(vis_valor) from visita visita_paga where vis_pagto_ok = 'SIM' AND vis_tipovisita is not null and visita.vis_tipovisita = visita_paga.vis_tipovisita and vis_dt_inicio '01/01/2006') as Pagou from visita where vis_tipovisita is not null and vis_dt_inicio '01/01/2006' group by vis_tipovisita O resultado ta
Re: RES: RES: RES: [delphi-br] Delphi + Quick Report + SQL
humm... group by? nos subselect? acho desnecessário, tenta como eu te disse. Abs. Júlio José Roberto [EMAIL PROTECTED] escreveu: Mas eu acho que devia ter algo como um group by nos subs pois se não só retorna os valores mesmos diferente do select principal José Roberto -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Julio Abdala Enviada em: domingo, 5 de fevereiro de 2006 19:54 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: RES: [delphi-br] Delphi + Quick Report + SQL Roberto, acho que também não tá certa essa linha do subselect Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita experimente simplesmente Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita = visita.vis_tipovisita abs. Júio Abdala José Roberto [EMAIL PROTECTED] escreveu: A questão eh que só separa corretamente para o primeiro select no subselect ele coloca os mesmos valores desconsiderando o tipo da visita, veja o resultado que eu havia passado msn: [EMAIL PROTECTED] José Roberto -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Julio Abdala Enviada em: sábado, 4 de fevereiro de 2006 23:14 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Delphi + Quick Report + SQL olhando o teu sql e imaginando a tua tabela, me veio uma pergunta... ele realmente está agrupando por tipo de visita, mas.. não é por pagou ou não pago que ele quer o resultado? tipo de visita = avulta ou contrato, pagto_ok = sim ou não logo, se você deseja dividir as linhas em pagos e não pagos tem que incluir este campo na consulta e no group by. o resultado do sql tá correto para o que foi escrito, está agrupando por tipo de visita, se você deseja o dados por pagto_ok (sim ou não) inclua-o na consulta e no group by. Tente: select visita.vis_tipovisita, visita.vis_pagto_ok, sum(vis_valor) valortotal, (Select Sum(vis_valor) from visita visita_pagar Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita And visita_pagar.vis_dt_inicio '01/01/2006') As Pagar, (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou from visita where vis_tipovisita is not null and vis_dt_inicio '01/01/2006' group by visita.vis_tipovisita, visita.vis_pagto_ok abs. Júlio Abdala José Roberto [EMAIL PROTECTED] escreveu: Denner e Julio, Usando este igual vcs indicaram SQL pelo Ibexpert (Firebird) select vis_tipovisita, sum(vis_valor) valortotal, (Select Sum(vis_valor) from visita visita_pagar Where visita_pagar.vis_pagto_ok = 'NÃO' And visita_pagar.vis_tipovisita Is Not Null And visita_pagar.vis_tipovisita = visita.vis_tipovisita And visita_pagar.vis_dt_inicio '01/01/2006') As Pagar, (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou from visita where vis_tipovisita is not null and vis_dt_inicio '01/01/2006' group by vis_tipovisita dá esse Resultado VIS_TIPOVISITA VALORTOTAL PAGAR PAGOU Avulsa 1204 249 1335 Contrato 380 249 1335 Se eu ignorar o tipo da visita, tirando do select inicial e do group by aí dá certo, mas aí não terei a separação que queria, mas por enquanto usarei desta forma, mas se alguém tiver alguma idéia, agradeço -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Denner Bizarria Branco Enviada em: sábado, 4 de fevereiro de 2006 07:23 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Delphi + Quick Report + SQL nos subselects coloca o alias que voce colocou na tabela nas condições... (Select Sum(vis_valor) from visita visita_paga Where visita_paga.vis_pagto_ok = 'SIM' And visita_paga.vis_tipovisita Is Not Null And visita_paga.vis_tipovisita = visita.vis_tipovisita And visita_paga.vis_dt_inicio '01/01/2006') As Pagou José Roberto wrote: Fiz dessa forma mas ainda não tá legal, select vis_tipovisita tipovisita, sum(vis_valor) valortotal, (select sum(vis_valor) from visita visita_pagar where vis_pagto_ok = 'NÃO' and visita.vis_tipovisita = visita_pagar.vis_tipovisita AND vis_tipovisita is not null) as Receber, (select sum(vis_valor) from visita visita_paga where vis_pagto_ok = 'SIM' AND vis_tipovisita is not null and visita.vis_tipovisita = visita_paga.vis_tipovisita and vis_dt_inicio
[delphi-br] Componente para MP3
Ola a todos da lista. Tenho um player para tocar MP3. Tenho licensa e uso o MMTools. Estes dias fui fazer um teste com o TMediaPlayer, mas a qualidade do audio é muito inferior. To satisfeita com o MMTools, mas gostaria de saber se alguem teria alguma dica de outro componente, pois o MMTools nao recebe muitas atualizacoes, e queria saber se tem algo melhor no mercado. Obrigada a todos. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] ECO, StarTeam e Caliber
Olá Bom dia Alguém sabe onde possa achar, ou se alguém tiver pode me enviar, tutoriais, apostilas e outros materiais de ECO, StarTeam e Caliber, de preferência em português O material do blog do Daniel Polistchuck sobre ECO, já tenho e pesquiso, no google até acho algo de ECO mas de StarTeam e Caliber nada que ensine ou de uma noção de como usar. Atenciosamente Paulo Dudu. Taubaté-SP [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] TIRAR FOTO
Amigo, Quando tento instalar esse componente aparece o seguinte erro: [Fatal Error] Twain.pas(1): Program or unit 'Twain.pas' recursively uses itself Sabe como resolver? Uso Delhi 7. Marcelo. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Denner Bizarria Branco Enviada em: sexta-feira, 3 de fevereiro de 2006 16:35 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] TIRAR FOTO Tem um componente TDelphiTwain se não me engano, que é bem interessante... funciona pra webcam e pra scanner e é free... http://delphitwain.sourceforge.net/ bene20032004 wrote: Pessoal, tenho um sistema de controle de curriculum e gostaria de saber se é possível, atraves do programa ,usando um componenete,tirar a foto e gravar em uma determinada pasta. Porque atualmente eu uso o programa da propria webcan, para tirar foto , mas o meu cliente quer tirar a foto do meu programa. É possível ? Agradeço desde ja! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html