Re: RES: [delphi-br] Protocolo SIP
Valew amigo, mas acho que vacilei, não coloquei o significado da sigla SIP (Session Initiation Protocol), ou seja é um proctocolo de inicio de seção, com o mesmo propósito do H.323, é utilizado para estabelecer conexões VoIP. De qualquer forma valew pela intenção. [ ]'s Savio escreveu: Ola eu trabalho com sistemas para planos de saúde e vc vai encontrar abrangentes documentos no site http://www.ans.gov.br/portal/site/perfil_operadoras/sip_regulamentacao.a sp , Ou diretamente http://www.ans.gov.br/portal/upload/legislacao/legislacao_regulamentacoe s/legislacao_regulamentacoes_normativas/anexos_rn96.pdf -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de -=SchiavoR=- Enviada em: quarta-feira, 7 de dezembro de 2005 16:30 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Protocolo SIP Ola amigos, Alguém trabalha, ja trabalhou ou possui qualquer material/conhecimento sobre a utilização do protocolo SIP??? Se alguem tiver algo podemos trocar umas idéias, preciso desenvolver uma aplicação aqui e estou um pouco perdido. Att. Rodrigo Schiavo -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.rd.yahoo.com/SIG=12fr6231f/M=384888.7585449.8468440.1588051/D =brclubs/S=2137111264:HM/Y=BR/EXP=1133987438/A=3154524/R=0/SIG=12igfl26t /*http:/www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E8 7847EEEBE _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE http://br.rd.yahoo.com/SIG=12fgm175b/M=384888.7585449.8468440.1588051/D=brclubs/S=2137111264:HM/Y=BR/EXP=1133990091/A=3154525/R=0/SIG=12igfl26t/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE *Links do Yahoo! Grupos* * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.1.362 / Virus Database: 267.13.12/192 - Release Date: 5/12/2005 -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] SQL: Consulta em ordem alfabetica
Pelo jeito a solução é voltar pro basicão, retornar todos os registros e localizar oq foi digitado, mas isso torna inútil usar sql. [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] SQL: Consulta em ordem alfabetica
Principalmente com select * - Original Message - From: Gabriel Filho [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 7:44 AM Subject: Re: [delphi-br] SQL: Consulta em ordem alfabetica Pelo jeito a solução é voltar pro basicão, retornar todos os registros e localizar oq foi digitado, mas isso torna inútil usar sql. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Componente OCR
Você conhece algum componente OCR bom que tenha lá no sourceforge? Eu fiz um programinha para envio de SMS para celulares da OI, e quero automatizar todo o processo, ao invés do usuário digitar os caracteres da imagem, eu quero que ele leia os caracteres na imagem e envie a mensagem, entendeu? Se puder me ajudar eu te agradeço, []s. Willian Leal Em 07/12/05, Walter Alves Chagas Junior [EMAIL PROTECTED] escreveu: Infelizmente o produto é pago, o que inviabiliza muitos de usarem-no. Quem quiser e estiver precisando mesmo vai ter que recorrer a algum similar no sourceforge. Atualmente tem quase tudo lá (similares dos componentes comerciais) com algumas limitações, é claro, mas nada que faça o produto open source ser um meia-boca em relação ao outro. E ainda tem a vantagem dos fontes estarem juntos lá []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de willian leal Enviada em: quarta-feira, 7 de dezembro de 2005 13:45 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Componente OCR Olá Erivaldo tudo bem? Entre nesse site: http://www.mcm-design.dk/index.php, aí você vai encontrar o Imaging TWAIN toolkits, eles são um conjunto de componentes para o Delphi, e tem componentes para trabalhar com imagem, e com OCR. Posso saber pra que você precisa de OCR? Espero ter te ajudado. Willian Leal Em 07/12/05, Erivaldo de Almeida [EMAIL PROTECTED] escreveu: Galera , Bom dia ... alguem tem algum componente ou rotina ... para trabalhar com imagens , identificar caracteres .. Erivaldo [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE http://br.rd.yahoo.com/SIG=12f3oosv1/M=384888.7585449.8468440.1588051/D=brc lubs/S=2137111264:HM/Y=BR/EXP=1133961392/A=3154525/R=0/SIG=12igfl26t/*http:/ /www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE -- *Links do Yahoo! Grupos* - Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ - Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] [EMAIL PROTECTED] om.br?subject=Unsubscribe http://om.br/?subject=Unsubscribe - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. -- Willian Leal Desenvolvedor de Softwares MSN: [EMAIL PROTECTED] Cel:(32) 8821 - 9182 Tel:(32) 3711 - 5012 Muriaé - MG [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE http://br.rd.yahoo.com/SIG=12fm5cf5c/M=384888.7585449.8468440.1588051/D=brclubs/S=2137111264:HM/Y=BR/EXP=1133986276/A=3154525/R=0/SIG=12igfl26t/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE -- *Links do Yahoo! Grupos* - Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ - Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED][EMAIL PROTECTED] - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. -- Willian Leal Desenvolvedor de Softwares MSN: [EMAIL PROTECTED] Cel:(32) 8821 - 9182 Tel:(32) 3711 - 5012 Muriaé - MG [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Re: FileExists
fileexists tem segredo não: if FileExists( 'F:\App\Login.bat' ) then ShowMessage( 'Arquivo de Login encontrado' ) else ShowMessage( 'Não é possível achar o aquivo' ); O problema pode ser a unidade, ja tive casos onde a unidade tava ok, mas nao conseguia nem achar nem carregar o arquivo.. hj eu sempre uso o caminho da rede no lugar de unidades mapeadas ex: FileOpen( '\\servidor\app\login.ini' ); nunca mais tive problemas desse tipo. [Welson] Já tentou usar o caminho real ?? Por exemplo, ao inves de usar 'X:\', 'Z:\' ou '\\dados\blabla', passe o caminho real, ou seja, 'IP_ou_nome_da_maquina:d:\dados\blabla' Veja se funciona. Um forte abraço e boa sorte aí. (^_^) = Nunca ande pelo caminho traçado, pois ele conduz somente até onde os outros já foram. Alexander Graham Bell = Welson de Avelar Soares Filho Juiz de Fora - Minas Gerais = - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] ADO Acces com senha
Amigo, BOM DIA, vc tem q especificar a senha no Connection String. eu seto isso na hora que vou rodar, pegando de um arquivo.txt criptografado que, claro, tem um configurador: Ela sem criptografar fica assim: Provider=Microsoft.Jet.OLEDB.4.0; User ID=Admin; Data Source=ARQUIVO.MDB; Mode=ReadWrite; Extended Properties=; Jet OLEDB:System database=; Jet OLEDB:Registry Path=; Jet OLEDB:Database Password=senha_do_arquivo_ACCESS; Jet OLEDB:Engine Type=5; Espero que ajude OK... Abração... Gerson Thomaz Santos - Original Message - From: pcinfowave To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 07, 2005 10:17 PM Subject: [delphi-br] ADO Acces com senha Ola.. Gostaria de me conectar com um BD Access protegido por senha. Alguem pode dar um help, pois ja consegui conectar sem senha, mas com senha nao consigo. De ja agradeço []´s Paulo -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Rotina incremento
Bom dia a todos! Fiz a seguinte rotina no delphi : for i := 0 to MemoAndamento.Lines.Count - 1 do begin Linha := MemoAndamento.Lines[i]; DataAux := Trim(copy(Linha, 1, 10)); HoraAux := Trim(copy(Linha,13,6)); HoraComp := Trim(copy(MemoAndamento.Lines[i+1],13,6)); if HoraAux = HoraComp then begin HoraAux := ''; HoraAux := (copy(Linha,13,6)+':'+'0'+inttostr(i)); end; Data := StrToDateTime(DataAux +''+ HoraAux); end; Quando o a variável i = 60, o programa mostra uma mensagem de erro dizendo que ' 06/12/2005 17:060 ' não é uma data válida. Então vou ter que verificar quando o i = 60 devo incrementar os minutos e se os minutos = 60 devo incrmentar a hora Fiz uma rotina com este raciocínio, mas não está funcioando... Alguém tem alguma rotina para fazer isso... Muito obrigada pela atenção... Patricia Santana - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Numero de Copias - Usando QuickReport
Eduardo, como vai? Obrigado pela dica, mas após o comando rel_Etiq.PRINT; eu não consigo estabelecer um contador. Mesmo dentro dos eventos do rel_etiq (Quickreport) nem na procedure anteriormente citada. Desculpe, mas Não consegui captar. Abraços. José de Moura --- Em delphi-br@yahoogrupos.com.br, Eduardo Silva ® [EMAIL PROTECTED] escreveu Vc quer o total que ele já imprimiu ou o total que ele esta imprimindo naquele momento? Se for o primeiro caso, coloque um campo na tabela integer e crie um somat´roio pra ele a cada etiqueta impressa Se for no segundo, faça um contador no ato da impressão -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi- [EMAIL PROTECTED] nome de jmourajr2000 Enviada em: terça-feira, 6 de dezembro de 2005 14:59 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Numero de Copias - Usando QuickReport Caros amigos, boa tarde! Por favor, Preciso incluir em um aplicativo desenvolvido, a seguinte situação: Utilizo para imprimir etiquetas(usando o QuickReport) a seguinte instrução: var MODELO : String; begin MODELO := dmPecas.tblPecas.FieldByName('MODELO').AsString; If not assigned(rel_Etiq) then rel_Etiq := Trel_Bar.create(Application); rel_Etiq.Query1.Close; rel_Etiq.Query1.ParamByName('MODEL').AsString := MODELO; rel_Etiq.Query1.Open; rel_Etiq.PrinterSettings.Copies := StrToInt (NumEtiqs.Text); rel_Etiq.Print; end; Sendo que no componente NumEtiqs eu determino a quantidade de etiquetas a serem impressas(Até ai tudo OK). Mas agora o Cliente necessita que eu inclua a quantidade de etiquetas impressas(esta etiqueta é somente 1(uma) por pagina) em Real-Time, ou seja, a cada copia impressa deverá ser sinalizado o numero de etiquetas impressas. Já quebrei a cabeça e ainda não obtive resultados. Alguem poderia me ajudar. Agradeço muito de ante-mão. Abraços a todos. José de Moura -- 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!. __ NOD32 1.1313 (20051206) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [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: RES: [delphi-br] Numero de Copias - Usando QuickReport
Vamos ver se entendi. Anota meu msn ai pra vc entrar em contato comigo, vai ser mais fácil [EMAIL PROTECTED] -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de jmourajr2000 Enviada em: quinta-feira, 8 de dezembro de 2005 08:26 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Numero de Copias - Usando QuickReport Eduardo, como vai? Obrigado pela dica, mas após o comando rel_Etiq.PRINT; eu não consigo estabelecer um contador. Mesmo dentro dos eventos do rel_etiq (Quickreport) nem na procedure anteriormente citada. Desculpe, mas Não consegui captar. Abraços. José de Moura --- Em delphi-br@yahoogrupos.com.br, Eduardo Silva ® [EMAIL PROTECTED] escreveu Vc quer o total que ele já imprimiu ou o total que ele esta imprimindo naquele momento? Se for o primeiro caso, coloque um campo na tabela integer e crie um somat´roio pra ele a cada etiqueta impressa Se for no segundo, faça um contador no ato da impressão -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi- [EMAIL PROTECTED] nome de jmourajr2000 Enviada em: terça-feira, 6 de dezembro de 2005 14:59 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Numero de Copias - Usando QuickReport Caros amigos, boa tarde! Por favor, Preciso incluir em um aplicativo desenvolvido, a seguinte situação: Utilizo para imprimir etiquetas(usando o QuickReport) a seguinte instrução: var MODELO : String; begin MODELO := dmPecas.tblPecas.FieldByName('MODELO').AsString; If not assigned(rel_Etiq) then rel_Etiq := Trel_Bar.create(Application); rel_Etiq.Query1.Close; rel_Etiq.Query1.ParamByName('MODEL').AsString := MODELO; rel_Etiq.Query1.Open; rel_Etiq.PrinterSettings.Copies := StrToInt (NumEtiqs.Text); rel_Etiq.Print; end; Sendo que no componente NumEtiqs eu determino a quantidade de etiquetas a serem impressas(Até ai tudo OK). Mas agora o Cliente necessita que eu inclua a quantidade de etiquetas impressas(esta etiqueta é somente 1(uma) por pagina) em Real-Time, ou seja, a cada copia impressa deverá ser sinalizado o numero de etiquetas impressas. Já quebrei a cabeça e ainda não obtive resultados. Alguem poderia me ajudar. Agradeço muito de ante-mão. Abraços a todos. José de Moura -- 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!. __ NOD32 1.1313 (20051206) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [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!. __ NOD32 1.1315 (20051207) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [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] Rotina incremento
Se voce usa Delphi 6 ou superior, de uma olhada nas funcoes da unit DateUtils (IncMinute, IncHour, etc).; Leandro - Original Message - From: Patricia Santana [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 8:25 AM Subject: [delphi-br] Rotina incremento Bom dia a todos! Fiz a seguinte rotina no delphi : for i := 0 to MemoAndamento.Lines.Count - 1 do begin Linha := MemoAndamento.Lines[i]; DataAux := Trim(copy(Linha, 1, 10)); HoraAux := Trim(copy(Linha,13,6)); HoraComp := Trim(copy(MemoAndamento.Lines[i+1],13,6)); if HoraAux = HoraComp then begin HoraAux := ''; HoraAux := (copy(Linha,13,6)+':'+'0'+inttostr(i)); end; Data := StrToDateTime(DataAux +''+ HoraAux); end; Quando o a variável i = 60, o programa mostra uma mensagem de erro dizendo que ' 06/12/2005 17:060 ' não é uma data válida. Então vou ter que verificar quando o i = 60 devo incrementar os minutos e se os minutos = 60 devo incrmentar a hora Fiz uma rotina com este raciocínio, mas não está funcioando... Alguém tem alguma rotina para fazer isso... Muito obrigada pela atenção... Patricia Santana - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Duvida SQL urgentíssimo por favor
Tenho uma dúvida e não consigo resolver de forma alguma com o firebird, Estou fazendo um programa financeiro com o delphi e firebird Há uma parte de conciliação bancária, onde pega os registros de uma tabela Que contém, o extrato bancário e concilia através de uma chave com uma Tabela de contas a pagar do sistema. Eu consegui fazer a consulta via access, que UPDATE COM INNER, mas no firebird da erro isso.. como posso resolver...? A consulta é mais ou menos a seguinte... UPDATE (((EXTRATOBANCARIO INNER JOIN COMPROMISSOS ON (EXTRATOBANCARIO.TIPO = COMPROMISSOS.DEBITOCREDITO) AND (EXTRATOBANCARIO.DATA = COMPROMISSOS.COM_DATAPAGAMENTO) AND (EXTRATOBANCARIO.VALOR = COMPROMISSOS.COM_VALORPGTO) AND (EXTRATOBANCARIO.CODIGOBANCO = COMPROMISSOS.BANCO_CODIGO) AND (EXTRATOBANCARIO.CODIGO = COMPROMISSOS.NDOCUMENTOCONCILIACAO)) INNER JOIN CENTROCUSTO ON COMPROMISSOS.CENTRO_CODIGO = CENTROCUSTO.CENTRO_CODIGO) INNER JOIN PLANOCONTAS_TERCIARIO ON COMPROMISSOS.TER_CODIGO = PLANOCONTAS_TERCIARIO.TER_CODIGO) INNER JOIN CADASTROFORNECEDORES ON COMPROMISSOS.FOR_CODIGO = CADASTROFORNECEDORES.FOR_CODIGO SET EXTRATOBANCARIO.CONCILIADO = 'S', EXTRATOBANCARIO.COM_CODIGO = compromissos.com_codigo, EXTRATOBANCARIO.COD_DIV_3 = compromissos.ter_codigo, EXTRATOBANCARIO.FOR_CODIGO = cadastrofornecedores.for_codigo, EXTRATOBANCARIO.CENTRO_CODIGO = centrocusto.centro_codigo, EXTRATOBANCARIO.HISTORICO = compromissos.com_observacoes, COMPROMISSOS.COM_CONCILIACAO = 'S', EXTRATOBANCARIO.NOMEFORNECEDOR = CADASTROFORNECEDORES.FOR_RAZAOSOCIAL, EXTRATOBANCARIO.NOMECENTROCUSTO = centrocusto.centro_nome WHERE (((EXTRATOBANCARIO.CONCILIADO)='N')); Ele usa alguns campos (Tipo, Data, Valor, Banco e Código do Documento) como Chave para fazer a alteração em alguns campos... Fico muuuito agradecido se alguém puder ajudar, muito obrigado Anderson -- 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] Pegar valor do dólar ptax e atualizar automaticamente no sistema
Pessoal, Alguém já conseguiu pegar valor do dólar ptax e atualizar automaticamente no sistema? Atenciosamente, Levi Ribeiro de Freitas Programador de Computadores mailto:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] SQL: Consulta em ordem alfabetica
Pessoal agradeço pelos comentarios a minha duvida. O Gabriel Filho, comentou em mostrar todos registros e posicionar no que foi digitado. Como fazer isto ? E somente para esclarecimento, eu usei o SELECT * aqui na pergunta para ficar mais facil o texto. Pois no programa, o SELECT esta assim: ... SQL.Text := 'select P.Codigo, P.Descr as ProdDescr, P.UM, ' + 'P.VlrVenda1, P.Grupo, P.Fabric, P.Ativo, T.Codigo, ' + 'T.Descr as FabricDescr from Produtos P'; SQL.Add ('LEFT OUTER JOIN Tabelas T on (T.Codigo = P.Fabric) and ' + '(T.Tipo = :Tipo)'); ... -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: SQL: Consulta em ordem alfabetica
Agradeço aos comentarios que fizeram. Mas alguem poderia me mostrar como fazer para que seja mostrado os produtos que o usuario escolheu e tambem permitir que o usuario tenha acesso a produtos que estao antes e apos dos produtos selecionados. o script original esta assim: with IBQProdutos do begin if Active then Close; SQL.Text := 'select P.Codigo, P.Descr as ProdDescr, ' + 'P.UM, P.VlrVenda1, P.Grupo, P.Fabric, ' + 'P.Ativo, T.Codigo, T.Descr as FabricDescr ' + 'from Produtos P'; SQL.Add('LEFT OUTER JOIN Tabelas T on (T.Codigo = P.Fabric) '+ ' and (T.Tipo = :Tipo)'); if edit1.text '' then SQL.add('WHERE (P.Descr like :Descr) and ' + '(P.Ativo = :Ativo)') else SQL.add('WHERE P.Ativo = :Ativo'); SQL.Add ('Order By P.Descr'); with params do begin ParamByName('Ativo').AsString := vsAtivo; ParamByName('Tipo').AsString := 'FAB'; if edit1.text '' then ParamByName('Descr').AsString := edit1.text + '%'; end; Open; end; Explicacoes: vsativo, variavel tipo string, que contem a letra S de sim, ou seja, Produto Ativo. TIPO = FAB, e´ porque em TABELAS contem cadastro de grupos, Fabricantes e Sub-Grupos. Consegue-se separar um dos outros, atraves do campo TIPO, ou seja, se Tipo = FAB e´ fabricante, se Tipo = GRP e´ grupo E o EDIT1.text e´ onde o usuario digita o nome parcial dos produtos que deseja consultar. E se EDIT1.text for diferente de significa que o usuario informou algum parametro (nome parcial) pois por padrao o edit1.text contem a informacao que o Sistema interpreta como ver todos os produtos. (fim) -- 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] Rotina incremento
Leandro, estou utilizando a versão 5.0 Tem esta função? obrigada! Leandro [EMAIL PROTECTED] escreveu: Se voce usa Delphi 6 ou superior, de uma olhada nas funcoes da unit DateUtils (IncMinute, IncHour, etc).; Leandro - Original Message - From: Patricia Santana To: Sent: Thursday, December 08, 2005 8:25 AM Subject: [delphi-br] Rotina incremento Bom dia a todos! Fiz a seguinte rotina no delphi : for i := 0 to MemoAndamento.Lines.Count - 1 do begin Linha := MemoAndamento.Lines[i]; DataAux := Trim(copy(Linha, 1, 10)); HoraAux := Trim(copy(Linha,13,6)); HoraComp := Trim(copy(MemoAndamento.Lines[i+1],13,6)); if HoraAux = HoraComp then begin HoraAux := ''; HoraAux := (copy(Linha,13,6)+':'+'0'+inttostr(i)); end; Data := StrToDateTime(DataAux +''+ HoraAux); end; Quando o a variável i = 60, o programa mostra uma mensagem de erro dizendo que ' 06/12/2005 17:060 ' não é uma data válida. Então vou ter que verificar quando o i = 60 devo incrementar os minutos e se os minutos = 60 devo incrmentar a hora Fiz uma rotina com este raciocínio, mas não está funcioando... Alguém tem alguma rotina para fazer isso... Muito obrigada pela atenção... Patricia Santana - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] SQL: Consulta em ordem alfabetica
Não sei que componentes vc esta usando, mas na teoria é a mesma coisa q vc fazia com o Table, vc só tem que descobrir no nome da propriedade de busca do componente q esta usando. Eu trabalho muito com os ADOs, e no TADOQuery tem a propriedade locate que pode ser usada para posicionar em um determinado registro da consulta atual; [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: SQL: Consulta em ordem alfabetica
Obrigado Gabriel pelos comentarios. O habito do ibQuery e´ tao grande que eu ja havia esquecido do ibTable. Estou fazendo uma consulta, usnado o DBGRID e IBTABLE da palheta INTERBASE no Delphi. Como fazer para que seja mostrado no Grid os produtos que o Usuario digitou no EDIT1 ? No Paradox eu fazia assim: ... Produtos.IndexName := 'Descricao'; Produtos.FindNearest ([edit1.text]); E no ibTable, como fazer ? (eu preciso mostrar hoje a tarde para o Cliente). -- 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] Consulta em ordem decrescente
Olá pessoal, bom dia. Me deparei com um problema de última hora aqui e resolvi pedir a ajuda de vcs.. Estou fazendo uma lista de classificação de alunos no vestibular...essa lista tem que ser ordenada em ordem decrescente por média...mas se o cara tirou nota menor que 10 (dez) na prova de redação, independente da média dele ele tem que ir pro final da lista pois está reprovado Segue o meu sql abaixo: with Module.Mestre do Begin Close; SQL.Clear; SQL.Add('select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA, MEDIA'); SQL.Add('from candidato'); SQL.Add('where opcao1 =:Curso'); SQL.Add('and anosemestre=:anosemestre'); SQL.Add('and treineiro=''Não'''); SQL.Add('order by Media DESC,NOTAREDACAO'); ParamByName('Curso').AsString:=DBCurso.Text; ParamByName('anosemestre').AsString:=FVestiba.Anovigente.Text; Open; TIBOFloatField(module.Mestre.FieldByName('MEDIA')).DisplayFormat := '0.00'; end; Então, ele traz a NOTAREDACAO, SOMA e MEDIA, ordena-se por média...mas um aluno que tirou zero em uma redação apareçe com media maior...preciso que ele vá para o final da lista... Se alguém puder ajudar...agradeço. []'s Topolniak. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: [OFF TOPIC] Questionário
Ola Murilo, procure a empresa www.arte-logica.com.br eles tem um produto pronto que ja faz isso - eu ja vi funcionando e eh muito bom. Boa Sorte, Josir. -- Estou precisando desenvolver um questionário para todos os gerentes de cada unidade da empresa, onde eles vão me passar as necessidades técnicas (hardware, software, mão de obra, infraestrutura) de que estão necessitando para utilizar o sistema de forma eficiente, e em meio as respostas, vou fazer um balanço entre o volume de trabalho de cada unidade, com o desempenho e com estas necessidades para tomar decisões sobre os investimentos físicos e remanejamento de pessoal. Alguém já fez um algum tipo de trabalho parecido e tem algum doc que eu posso utilizar como base? Grato Murillo Proença -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] DBCheckBox
Galera eu uso o Delphi 3 5 e 6, neles não existe o evento OnChange do componente DBCheckBox, somente o OnClick, que é disparado quando o conteúdo do campo muda. O ideal é que ele fosse como o DbEdit, com 2 eventos o click e o change. Gostaria de saber se nas versões atuais do Delphi, permanece da mesma forma. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: SQL: Consulta em ordem alfabetica
pq não usa um Query mesmo e faz com like ? WHERE UPPER( TABELA.CAMPO ) LIKE 'A%' para retornar os registros contrários, ou seja os que NÃO começam com 'A', faça o seguinte... WHERE UPPER( TABELA.CAMPO ) NOT LIKE 'A%' Vitor. - Original Message - From: fernandoaldrighi To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 12:00 PM Subject: [delphi-br] Re: SQL: Consulta em ordem alfabetica Obrigado Gabriel pelos comentarios. O habito do ibQuery e´ tao grande que eu ja havia esquecido do ibTable. Estou fazendo uma consulta, usnado o DBGRID e IBTABLE da palheta INTERBASE no Delphi. Como fazer para que seja mostrado no Grid os produtos que o Usuario digitou no EDIT1 ? No Paradox eu fazia assim: ... Produtos.IndexName := 'Descricao'; Produtos.FindNearest ([edit1.text]); E no ibTable, como fazer ? (eu preciso mostrar hoje a tarde para o Cliente). -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Descobrir o numero de casas decimais!!!
Ola!! Estou com um probleminha aqui, preciso descobrir o numero de casas decimais de um valor, existe uma maneira de fazer isso? Se alguem puder me ajudar eu agradeço! Obrigado! Fabio. -- 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] QrLabel Vertical
Pessoal, alguem saberia me dizer como imprimir um texto no QrLabel em 90º (Vertical)? Teria algum componente? valeu! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: SQL: Consulta em ordem alfabetica
Vitor (obrigado pela intencao de ajudar) mas acredito que pela tua dica, eu obrigaria o Usuario retornar para o EDIT. O que preciso é que quando o Usuario chegar no ultimo produto da consulta, apareca os produtos que estao abaixo (em ordem alfabetica) que nao apareceram primeiramente por serem diferentes do que o Usuario colocou no EDIT. Entendeu ? Exemplo: Usuario informa: Agua com gas e´mostrado todos produtos que comecam com 'AGUA COM GAS' Usuario vai ate o ultimo produto que que seja AGUA COM GAS, e ao querer descer mais (usando a seta para baixo do teclado), deve aparecer os proximos produtos (exemplo: AGUA SEM GAS) Como fazer, via query ? -- 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] Descobrir o numero de casas decimais!!!
Transfome o esse valor de float para string, e depois use a função StrCopy() para copiar tudo apartir da , ate o final para uma variavel depois é sou usar o length(). nossa que chato, espero que alguem tenha uma idéia melhor, isso da até canceira espero ter ajudado Obs.: funções baseadas no delphi7. [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] Consulta em ordem decrescente
Não seria depois do Where SQL.Add('AND NOTAREDACAO = 10'); -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Topolniak Enviada em: quinta-feira, 8 de dezembro de 2005 10:29 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Consulta em ordem decrescente Olá pessoal, bom dia. Me deparei com um problema de última hora aqui e resolvi pedir a ajuda de vcs.. Estou fazendo uma lista de classificação de alunos no vestibular...essa lista tem que ser ordenada em ordem decrescente por média...mas se o cara tirou nota menor que 10 (dez) na prova de redação, independente da média dele ele tem que ir pro final da lista pois está reprovado Segue o meu sql abaixo: with Module.Mestre do Begin Close; SQL.Clear; SQL.Add('select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA, MEDIA'); SQL.Add('from candidato'); SQL.Add('where opcao1 =:Curso'); SQL.Add('and anosemestre=:anosemestre'); SQL.Add('and treineiro=''Não'''); SQL.Add('order by Media DESC,NOTAREDACAO'); ParamByName('Curso').AsString:=DBCurso.Text; ParamByName('anosemestre').AsString:=FVestiba.Anovigente.Text; Open; TIBOFloatField(module.Mestre.FieldByName('MEDIA')).DisplayFormat := '0.00'; end; Então, ele traz a NOTAREDACAO, SOMA e MEDIA, ordena-se por média...mas um aluno que tirou zero em uma redação apareçe com media maior...preciso que ele vá para o final da lista... Se alguém puder ajudar...agradeço. []'s Topolniak. -- 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!. __ NOD32 1.1315 (20051207) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: SQL: Consulta em ordem alfabetica
velho tu tem que trazer todos os registros do banco e posicionar no que ele quer, depois ele navega a vontade. Por exemplo, tu faz: Select campo, campo...campo from order By campo no enento change do edit, tu dá um query1.locate, e tá morta a cobra. Essa não é a filosofia de sistemas C/S, mas é dificil que os usuários acostumados a essas facilidades deixem ela de lado. Mas num caso desses não tem como ser diferente. Eu tenho um cliente que tem mais de 100 mil produtos, classificados por grupos de pesquisa, mas na grande maioria da vezes o cliente dele não sabe onde se encaixa, daí tem que ser pelo nome. Imagina uma pesquisa numa livraria, a maiora das pessoas sabe parte do nome do livro, não conhece editora, autor, categoria etc... O nome do livro é não sei o que de Delphi, pode ser usando Delphi, aprendendo Delphi, nesse caso o Like encaixa como uma luva. - Original Message - From: fernandoaldrighi [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 2:34 PM Subject: [delphi-br] Re: SQL: Consulta em ordem alfabetica Vitor (obrigado pela intencao de ajudar) mas acredito que pela tua dica, eu obrigaria o Usuario retornar para o EDIT. O que preciso é que quando o Usuario chegar no ultimo produto da consulta, apareca os produtos que estao abaixo (em ordem alfabetica) que nao apareceram primeiramente por serem diferentes do que o Usuario colocou no EDIT. Entendeu ? Exemplo: Usuario informa: Agua com gas e´mostrado todos produtos que comecam com 'AGUA COM GAS' Usuario vai ate o ultimo produto que que seja AGUA COM GAS, e ao querer descer mais (usando a seta para baixo do teclado), deve aparecer os proximos produtos (exemplo: AGUA SEM GAS) Como fazer, via query ? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Preencher Tags em documento word
Blz pessoal Seguinte: qual a 'receita de bolo' para fazer o seguinte: - criar um arquivo em word a partir de um modelo formatado; - nas tags ou outro tipo de marcação nomeada existentes nesse modelo, inserir informações; Grato pela informação. ___ Yahoo! doce lar. Faça do Yahoo! sua homepage. http://br.yahoo.com/homepageset.html -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Consulta em ordem decrescente
Se eu por esta condição as notas menores que 10 não virão...eu preciso mostrá-las, preciso que elas estejam na listamas no final dessa lista? sacou? obrigado pela tentativa. Ordena pelo campo media (decrescente) mas se o campo notaredacao for menor que 10esse cara vai pro final da lista. []'s Topolnia. - Original Message - From: Eduardo Silva ® [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 12:58 PM Subject: RES: [delphi-br] Consulta em ordem decrescente Não seria depois do Where SQL.Add('AND NOTAREDACAO = 10'); -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Topolniak Enviada em: quinta-feira, 8 de dezembro de 2005 10:29 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Consulta em ordem decrescente Olá pessoal, bom dia. Me deparei com um problema de última hora aqui e resolvi pedir a ajuda de vcs.. Estou fazendo uma lista de classificação de alunos no vestibular...essa lista tem que ser ordenada em ordem decrescente por média...mas se o cara tirou nota menor que 10 (dez) na prova de redação, independente da média dele ele tem que ir pro final da lista pois está reprovado Segue o meu sql abaixo: with Module.Mestre do Begin Close; SQL.Clear; SQL.Add('select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA, MEDIA'); SQL.Add('from candidato'); SQL.Add('where opcao1 =:Curso'); SQL.Add('and anosemestre=:anosemestre'); SQL.Add('and treineiro=''Não'''); SQL.Add('order by Media DESC,NOTAREDACAO'); ParamByName('Curso').AsString:=DBCurso.Text; ParamByName('anosemestre').AsString:=FVestiba.Anovigente.Text; Open; TIBOFloatField(module.Mestre.FieldByName('MEDIA')).DisplayFormat := '0.00'; end; Então, ele traz a NOTAREDACAO, SOMA e MEDIA, ordena-se por média...mas um aluno que tirou zero em uma redação apareçe com media maior...preciso que ele vá para o final da lista... Se alguém puder ajudar...agradeço. []'s Topolniak. -- 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!. __ NOD32 1.1315 (20051207) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [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
RES: [delphi-br] Consulta em ordem decrescente
faça a select normalmente, e na hora de exibir o relatório vc faz: if NOTAREDACAO 10 then reprovado -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Topolniak Enviada em: quinta-feira, 8 de dezembro de 2005 13:11 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Consulta em ordem decrescente Se eu por esta condição as notas menores que 10 não virão...eu preciso mostrá-las, preciso que elas estejam na listamas no final dessa lista? sacou? obrigado pela tentativa. Ordena pelo campo media (decrescente) mas se o campo notaredacao for menor que 10esse cara vai pro final da lista. []'s Topolnia. - Original Message - From: Eduardo Silva ® [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 12:58 PM Subject: RES: [delphi-br] Consulta em ordem decrescente Não seria depois do Where SQL.Add('AND NOTAREDACAO = 10'); -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Topolniak Enviada em: quinta-feira, 8 de dezembro de 2005 10:29 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Consulta em ordem decrescente Olá pessoal, bom dia. Me deparei com um problema de última hora aqui e resolvi pedir a ajuda de vcs.. Estou fazendo uma lista de classificação de alunos no vestibular...essa lista tem que ser ordenada em ordem decrescente por média...mas se o cara tirou nota menor que 10 (dez) na prova de redação, independente da média dele ele tem que ir pro final da lista pois está reprovado Segue o meu sql abaixo: with Module.Mestre do Begin Close; SQL.Clear; SQL.Add('select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA, MEDIA'); SQL.Add('from candidato'); SQL.Add('where opcao1 =:Curso'); SQL.Add('and anosemestre=:anosemestre'); SQL.Add('and treineiro=''Não'''); SQL.Add('order by Media DESC,NOTAREDACAO'); ParamByName('Curso').AsString:=DBCurso.Text; ParamByName('anosemestre').AsString:=FVestiba.Anovigente.Text; Open; TIBOFloatField(module.Mestre.FieldByName('MEDIA')).DisplayFormat := '0.00'; end; Então, ele traz a NOTAREDACAO, SOMA e MEDIA, ordena-se por média...mas um aluno que tirou zero em uma redação apareçe com media maior...preciso que ele vá para o final da lista... Se alguém puder ajudar...agradeço. []'s Topolniak. -- 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!. __ NOD32 1.1315 (20051207) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [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 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!. __ NOD32 1.1315 (20051207) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [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] Consulta em ordem decrescente
Olhe, qualquer coisa me desculpe... mas tente da seguinte forma... Crie uma coluna a mais no seu select e ordene por ela... assim: SELECT BLA, BLA, BLA... MEDIA + NOTA_REDACAO AS CAMPO_ORDEM FROM BLA BLA BLS ORDER BY 4 DESC Vitor. - Original Message - From: Topolniak To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 11:29 AM Subject: [delphi-br] Consulta em ordem decrescente Olá pessoal, bom dia. Me deparei com um problema de última hora aqui e resolvi pedir a ajuda de vcs.. Estou fazendo uma lista de classificação de alunos no vestibular...essa lista tem que ser ordenada em ordem decrescente por média...mas se o cara tirou nota menor que 10 (dez) na prova de redação, independente da média dele ele tem que ir pro final da lista pois está reprovado Segue o meu sql abaixo: with Module.Mestre do Begin Close; SQL.Clear; SQL.Add('select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA, MEDIA'); SQL.Add('from candidato'); SQL.Add('where opcao1 =:Curso'); SQL.Add('and anosemestre=:anosemestre'); SQL.Add('and treineiro=''Não'''); SQL.Add('order by Media DESC,NOTAREDACAO'); ParamByName('Curso').AsString:=DBCurso.Text; ParamByName('anosemestre').AsString:=FVestiba.Anovigente.Text; Open; TIBOFloatField(module.Mestre.FieldByName('MEDIA')).DisplayFormat := '0.00'; end; Então, ele traz a NOTAREDACAO, SOMA e MEDIA, ordena-se por média...mas um aluno que tirou zero em uma redação apareçe com media maior...preciso que ele vá para o final da lista... Se alguém puder ajudar...agradeço. []'s Topolniak. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: SQL: Consulta em ordem alfabetica
Ao Campus, muito obrigado pela explicacao. Mas como estou com gigante pressao do cliente nisto. Seria muito eu te pedir auxilio no codigo ? Fiz assim: isto esta no EDIT {= =} procedure TProdutosConsulta3.Edit1Change(Sender: TObject); begin if ibqprodutos.Active = true then ibqprodutos.locate ('ProdDescr',edit1.text,[]); end; e aqui a procedure que faz o SQL {= =} procedure TProdutosConsulta3.MostrarDadosGrid; begin if rgVisualizar.itemindex = 1 then vsAtivo := 'N'; with IBQProdutos do begin if Active then Close; SQL.Text := 'select P.Codigo, P.Descr as ProdDescr, P.UM, 'P.VlrVenda1, P.Grupo, P.Fabric, P.Ativo, ' + 'T.Codigo, T.Descr as FabricDescr from Produtos P'; SQL.Add ('LEFT OUTER JOIN Tabelas T on (T.Codigo = P.Fabric)' + ' and (T.Tipo = :Tipo)'); SQL.add('WHERE P.Ativo = :Ativo'); SQL.Add ('Order By P.Descr'); with params do begin ParamByName('Ativo').AsString := vsAtivo; ParamByName('Tipo').AsString := 'FAB'; end; Open; end; end; -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Consulta em ordem decrescente
mude apenas o order by SQL.Add('order by NOTAREDACAO DESC,Media DESC'); [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] Consulta em ordem decrescente
ops, desculpe a resposta, é que eu esqueci q vc quer a média maior primeiro, mas se vc tiver usando SQLSERVER 2000 eu sei como te ajudar usa isso: select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA, MEDIA, RED_MENOR_10 = (convert(int,case when NOTAREDACAO10 THEN 0 ELSE 1 END)) from candidato where opcao1 =:Curso and anosemestre=:anosemestre and treineiro='Não' order by RED_MENOR_10, Media DESC,NOTAREDACAO 2005/12/8, Gabriel Filho [EMAIL PROTECTED]: mude apenas o order by SQL.Add('order by NOTAREDACAO DESC,Media DESC'); [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Re: SQL: Consulta em ordem alfabetica
Ah sim... Da maneira como quer... acredito que com Locate... Abra a Query utilizando os parâmetros normais, não do Edit... Depois de aberta... Locate( 'CAMPO', VALOR, [ loPartialKey ] ). Isso vai posicionar o ponteiro no primeiro registro q corresponder a pesquisa... sem cortar os outros registros, assim, o usuário pode pesquisar acima e abaixo da query... Vitor. - Original Message - From: fernandoaldrighi To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 2:34 PM Subject: [delphi-br] Re: SQL: Consulta em ordem alfabetica Vitor (obrigado pela intencao de ajudar) mas acredito que pela tua dica, eu obrigaria o Usuario retornar para o EDIT. O que preciso é que quando o Usuario chegar no ultimo produto da consulta, apareca os produtos que estao abaixo (em ordem alfabetica) que nao apareceram primeiramente por serem diferentes do que o Usuario colocou no EDIT. Entendeu ? Exemplo: Usuario informa: Agua com gas e´mostrado todos produtos que comecam com 'AGUA COM GAS' Usuario vai ate o ultimo produto que que seja AGUA COM GAS, e ao querer descer mais (usando a seta para baixo do teclado), deve aparecer os proximos produtos (exemplo: AGUA SEM GAS) Como fazer, via query ? -- 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] Consulta em ordem decrescente
Já me deparei com um caso desses. crie um campo e atribua 1 para quem teve nota na redação acima ou igual a 10, e 0 para quem ficou abaixo disso, depois coloque o campos na ordem antes da média. - Original Message - From: Eduardo Silva ® [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 1:58 PM Subject: RES: [delphi-br] Consulta em ordem decrescente Não seria depois do Where SQL.Add('AND NOTAREDACAO = 10'); -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Topolniak Enviada em: quinta-feira, 8 de dezembro de 2005 10:29 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Consulta em ordem decrescente Olá pessoal, bom dia. Me deparei com um problema de última hora aqui e resolvi pedir a ajuda de vcs.. Estou fazendo uma lista de classificação de alunos no vestibular...essa lista tem que ser ordenada em ordem decrescente por média...mas se o cara tirou nota menor que 10 (dez) na prova de redação, independente da média dele ele tem que ir pro final da lista pois está reprovado Segue o meu sql abaixo: with Module.Mestre do Begin Close; SQL.Clear; SQL.Add('select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA, MEDIA'); SQL.Add('from candidato'); SQL.Add('where opcao1 =:Curso'); SQL.Add('and anosemestre=:anosemestre'); SQL.Add('and treineiro=''Não'''); SQL.Add('order by Media DESC,NOTAREDACAO'); ParamByName('Curso').AsString:=DBCurso.Text; ParamByName('anosemestre').AsString:=FVestiba.Anovigente.Text; Open; TIBOFloatField(module.Mestre.FieldByName('MEDIA')).DisplayFormat := '0.00'; end; Então, ele traz a NOTAREDACAO, SOMA e MEDIA, ordena-se por média...mas um aluno que tirou zero em uma redação apareçe com media maior...preciso que ele vá para o final da lista... Se alguém puder ajudar...agradeço. []'s Topolniak. -- 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!. __ NOD32 1.1315 (20051207) Information __ This message was checked by NOD32 antivirus system. http://www.nod32.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Uso de dbExpress.
Olá pessoal, Estou tentando rodar minha aplicação que usa dbExpress em uma máquina que não tem o Delphi, ou seja, que não tem as DLL: DBEXPINT.DLL, MIDAS.DLL, QTINTF.DLL e os arquivos.ini: dbxconnections.ini e dbxdrivers.ini. Levo esses arquivos acima sitados junto com o meu projeto.exe. Era para rodar!!! mas... a minha aplicação só lê o dbxdrivers.ini que está no diretório do Delphi da minha máquina e não o q vai com a aplicação para a outra máquina. Tem como eu informar via programação q nem informo para ler o arquivo dbxconnections.ini Ex.: DataModulo.SQLConnection.LoadParamsFromIniFile ('dbxconnections.ini'); Desde já, obrigado. Cristiano. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Re: SQL: Consulta em ordem alfabetica
Obrigado a todos. A dica do Campus, ajudou muito e o Vitor concluiu. Consegui fazer funcionar. -- 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] QrLabel Vertical
Se vc colar esse texto no Form o label vai pular as linhas. object Label3: TLabel Left = 304 Top = 96 Width = 6 Height = 65 Caption = 'L'#13'a'#13'b'#13'e'#13'l' end Não sei se lhe ajuda, tem esse site que tem um componente muito bom que ultilizei uma vez para imprimir Label Vertical não me lembro se pode colocar no Form deve dar tb... http://www.inf.ufsc.br/~prass/ É isso, valeu. Thiago [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [off Topic] Apostilas ISO - IEEE - CMM
Olá pessoal, Apesar do assunto não ter relação direta com Delphi, tem relação com programação. Alguém tem apostilas para ISO, IEEE e CMM ?? Grato. Rafael Franco Carvalho Analista / Programador de Sistemas Thermas Di Roma Hotel Clube www.diroma.com.br [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ: 43967202 MSN: [EMAIL PROTECTED] Caldas Novas - Goiás Brasil O único verdadeiro fracasso é deixar de tentar Max Heindel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] AJUDA
Olá pessoal !! Estou precisando de uma ajudinha. Tenho uma tabela de contas e preciso colocar num grid todos os lançamentos (déb./Créd.) e em uma coluna ter o saldo diário (créd-deb) Exemplo: data descr.valor tipo saldo 07/12/05 lanc1 10,00 Cred 07/12/05 lanc2 15,00 Cred 07/12/05 lanc3 20,00 Deb 5,00 08/12/05 lancx 50,00 Cred 55,00 09/12/05 lancy 20,00 Deb 09/12/05 lancn 10,00 Cred 65,00 Espero que eu tenha consiguido mostrar o meu problema. Desde já agradeço, Abraços, Ricardo Cabral - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] AJUDA
Usa um campo calculado. - Original Message - From: Ricardo Cabral [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 3:32 PM Subject: [delphi-br] AJUDA Olá pessoal !! Estou precisando de uma ajudinha. Tenho uma tabela de contas e preciso colocar num grid todos os lançamentos (déb./Créd.) e em uma coluna ter o saldo diário (créd-deb) Exemplo: data descr.valor tipo saldo 07/12/05 lanc1 10,00 Cred 07/12/05 lanc2 15,00 Cred 07/12/05 lanc3 20,00 Deb 5,00 08/12/05 lancx 50,00 Cred 55,00 09/12/05 lancy 20,00 Deb 09/12/05 lancn 10,00 Cred 65,00 Espero que eu tenha consiguido mostrar o meu problema. Desde já agradeço, Abraços, Ricardo Cabral - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] AJUDA
Como eu faria isso em temp de execução? Esqueci de falar: uso o D7 com firebird 1.5 Campus [EMAIL PROTECTED] escreveu: Usa um campo calculado. - Original Message - From: Ricardo Cabral [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 08, 2005 3:32 PM Subject: [delphi-br] AJUDA Olá pessoal !! Estou precisando de uma ajudinha. Tenho uma tabela de contas e preciso colocar num grid todos os lançamentos (déb./Créd.) e em uma coluna ter o saldo diário (créd-deb) Exemplo: data descr.valor tipo saldo 07/12/05 lanc1 10,00 Cred 07/12/05 lanc2 15,00 Cred 07/12/05 lanc3 20,00 Deb 5,00 08/12/05 lancx 50,00 Cred 55,00 09/12/05 lancy 20,00 Deb 09/12/05 lancn 10,00 Cred 65,00 Espero que eu tenha consiguido mostrar o meu problema. Desde já agradeço, Abraços, Ricardo Cabral - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por:PUBLICIDADE - Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. Abraços, Ricardo Cabral - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Onde Começar, Delphi 7 ou 2005?
Obrigado pessoal, continuem opnando, e se tiverem nome de livros de Delphi 2005 ou 2006 indica algo bom por favor. Em 06/12/05, Braytiner [EMAIL PROTECTED] escreveu: Espere para dar uma olhada no Delphi 2006 Braytiner - Original Message - From: Bruno Maestro [EMAIL PROTECTED] To: Lista Delphi delphi-br@yahoogrupos.com.br Sent: Monday, December 05, 2005 5:13 PM Subject: [delphi-br] Onde Começar, Delphi 7 ou 2005? Pessoal, preciso de uma ajuda. Já tenho uma noção de Delphi 7, quero fazer um aplicativo comercial para minha empresa e gostaria de saber se aprofundo no Delphi 7, comprar livros e tal ou devo entrar no Delphi 2005. [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 *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE http://br.rd.yahoo.com/SIG=12f0d01jk/M=384888.7585449.8468440.1588051/D=brclubs/S=2137111264:HM/Y=BR/EXP=1133907451/A=3154524/R=0/SIG=12igfl26t/*http://www.momentumquiz.com.br/index.php?md5ref=372BBEE98E9544bd8B2F9E87847EEEBE -- *Links do Yahoo! Grupos* - Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ - Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED][EMAIL PROTECTED] - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] AJUDA
Olá pessoal !! Estou precisando de uma ajudinha. Tenho uma tabela de contas e preciso colocar num grid todos os lançamentos (déb./Créd.) e em uma coluna ter o saldo diário (créd-deb) Exemplo: data descr.valor tipo saldo 07/12/05 lanc1 10,00 Cred 07/12/05 lanc2 15,00 Cred 07/12/05 lanc3 20,00 Deb 5,00 08/12/05 lancx 50,00 Cred 55,00 09/12/05 lancy 20,00 Deb 09/12/05 lancn 10,00 Cred 65,00 Espero que eu tenha consiguido mostrar o meu problema. Desde já agradeço, Abraços, Ricardo Cabral - Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html