[delphi-br] Componente que faça algo parecido com o google calendar.
Pessoal estou desenvolvendo uma agenda e gostaria de fazer algo parecido com o google calendar, aqueles efeitos de arrastar os evento para outro horário ou data, aumentar o tempo de cada evento somente arrastando suas bordas etc... Alguém conhece algum componente que faça algo parecido ou tem alguma dica de como fazer. Obrigado. At. Ricardo Lima [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [Meio Off] Algorítimo de menor caminho.
Olá amigos, preciso desenvolver um protótipo para minha faculdade utilizando Algorítimo Genético e Simmulated Amnealing, para o problema do menor caminho. Ou seja, dado uma matriz de cidades e suas distâncias, fazer o cálculo entre dois ponto (fornecidos pelo usuário), utilizando os dois tipo de algorítimos. Alguém faz idéia de onde posso pegar algum exemplo deste tipo de algorítimo? Desde já agradeço. -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Usar ou não usar DBWare s? Eis a questão!
mrbar2000 wrote: O Infra está sendo desenvolvido por mim, com alguma ajuda de alguns amigos. E pretende ser o melhor framework para desenvolvimento OO, o mais completo. Pelo menos é a minha pretensão: https://opensvn.csie.org/traccgi/infra/wiki http://www.oodesign.com.br/forum/index.php?showforum=51 O Jazz foi construido por cesar romero e o Press por joão morais, todos brasilerios e todos os 3 projetos são open source! jazz.liws.com.br www.pressobjects.org/ptbr -- João Morais
[delphi-br] Re: Usar ou não usar DBWares? Eis a questão!
Rubem, Já trabalhei muito com esta filosofia (tudo feito na mão), era até um defensor ferrenho disto aqui nos grupos. Depois que aprendi a trabalhar com ClientDataset e DBWare, CABOU! Não volto pra programação massante de jeito nenhum. Perde-se muito tempo pra fazer uma coisa que o Delphi já te dá 80% pronta. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 MSN: [EMAIL PROTECTED] --- Em delphi-br@yahoogrupos.com.br, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu Faço minhas as palavras do Welson Avelar. Desde que comecei no Delphi 2, sempre usei componentes Data-Aware. Muita gente já comentou comigo dizendo: 'Data-Aware é uma droga! Acaba fazendo coisas que a gente não quer que aconteça, dispara eventos que a gente não quer que dispare, etc., etc., etc. Pois eu sempre usei, e não tem quem me faça não deixar de usar. O ganho de produtividade é inegável, indiscutível. Uma vez, fui dar manutenção em um sistema comercial (retaguarda) e fiquei p%$ da vida quando eu vi o que o programador tinha feito: todas as telas com grid de vendas e financeiro (contas a pagar/receber) com TStringGrid. Um absurdo de lento, além de requerer código a mais para efetar o refresh do componente. Tem gente que faz uso de um evento para uma coisa, quando na verdade deveria estar usando um outro evento. Uma excelente fonte de informação sobre os eventos dos datasets é o próprio help do Delphi. Só para citar, algumas coisas que eu sempre faço quando uso controles data-aware: . Sempre que for interagir muito com o seu dataset, faço uso dos métodos EnableControls(), DisableControls() e ControlsDisabled(); . Não uso AfterInsert pra alimentar dados iniciais a um registro, e sim OnNewRecord; . Durante a edição de um registro, pra validar/monitorar valores alterados em campos eu uso o evento OnSetText do TField do campo, e não no OnDataChange do DataSource ou no OnValidate; . Se quiser formatar um campo, ou mostrar ele de modo diferente em um TDBGrid, eu uso o evento OnGetText do TField do campo. Como eu sei disso tudo? Ora, tão simples quando elementar, lendo o help do Delphi. Data-aware é o canal, indiscutivelmente! Sds. From: Welson Avelar [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Usar ou não usar DBWares? Eis a questão! Date: Fri, 24 Nov 2006 09:30:19 -0300 (ART) --- Joao Morais escreveu: Fellipe Henrique wrote: Olá amigos, Estive eu aqui pensando com meus botões, depois de ter lido uma informação em um livro de interface humano-computador. Qual é o melhor para se utilizar? Componentes DBWares (DBEdit, DBComboBox e etc...) ou componentes normais (Edit, ComboBox e etc..) para banco de dados? Pensando no lado do banco de dados, e nao da produção, pois é mais rápido usar um DBEdit, do que ter que fazer à mão... A menos que você utilize um framework para isso. Estou trabalhando em um framework MVP, aonde você cria formulários com simples TEdit, TComboBox, TStringGrid e sem uma única linha de código. Você diz ao framework o que é cada um dos componentes, e o framework popula os componentes para você. Dá uma conferida em www.pressobjects.org/ptbr -- João Morais [--x--] [Welson] Eu recomendo apenas que use o DBGrid pro caso de precisar informar uma quantidade da dados grande. Qual mudamos do D4 para o D7, mudamos também de ListBox pra DBGrid, entre outras diversas alterações. Então, meu velho, o ganho de tempo foi absurdo. Em formulários que mostram muita informação, até o cliente elogiou e adorou, é mole !? ^^ []s. = 'O que me preocupa não é o grito dos maus. É o silêncio dos bons.' Martin Luther King. = Welson de Avelar Soares Filho Analista/Programador Delphi Gemini Sistemas www.geminisistemas.com.br Juiz de Fora - Minas Gerais = ___ O Yahoo! está de cara nova. Venha conferir! http://br.yahoo.com _ MSN Messenger: converse com os seus amigos online. http://messenger.msn.com.br
[delphi-br] Re: Qual a melhor suíte de componentes para trabalhar com Oracle?
Aqui onde trabalho Utilizamos o DOA(Direct Oracle Access) Acredito que seja uma boa opção. do contrario me avisem. Até na minha opnião é um otimo componente. --- Em delphi-br@yahoogrupos.com.br, Luiz Escobar [EMAIL PROTECTED] escreveu É verdade, não posso falar pelo ODAC mas pelo MyDAC (p/mysql) não tem igual, os caras são muitos competentes no que fazem, e pré- supondo que o ODAC seja tão bom quando o MyDAC, cara vc não vai gastar 400,00 vai é economizar muito tempo e raiva e esbanjar felicidade.. hehehehhe... Luiz Escobar - Segue mensagem original! - De: Josir Gomes [EMAIL PROTECTED] Data: Sat, 25 Nov 2006 10:40:13 -0200 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] RE: Qual a melhor suíte de componentes para trabalhar com Oracle? Olá Marcio, sem dúvida nenhuma, o biblioteca ODAC é a melhor opção. É muito estavel e muito rápida. Já trabalho com ela a 5 anos. Não precisa nem de Oracle Client para o seu programa rodar. São R$400,00 bem gastos! E vc não precisa ter o Delphi Enterprise - basta comprar o Professional. www.crlab.com Boa Sorte, Josir --- Enviado por: Marcio Cruz [EMAIL PROTECTED] marciofcruz Sáb, 25 de Nov de 2006 8:39 am Bom dia, amigos.. Uma dúvida.. Eu trabalho a 7 anos utilizando Delphi 5 com Oracle, através de conexão BDE... Agora surgiu a oportunidade de desenvolver sistemas particulares, fora da empresa onde sou CLT e, gostaria de trabalhar com Oracle Express Edition e Delphi mas, qual será a melhor suíte de componentes para tal? Me parece que a própria Oracle disponibiliza sua suíte mas, sinceramente, gostaria de opinião de vocês..
[delphi-br] Re: [Meio Off] Algorítimo de menor caminho.
Procure na WEB a respeito de Algorítmo do Caixeiro Viajante, que é o que você está realemente procurando. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 MSN: [EMAIL PROTECTED] --- Em delphi-br@yahoogrupos.com.br, Fellipe Henrique [EMAIL PROTECTED] escreveu Olá amigos, preciso desenvolver um protótipo para minha faculdade utilizando Algorítimo Genético e Simmulated Amnealing, para o problema do menor caminho. Ou seja, dado uma matriz de cidades e suas distâncias, fazer o cálculo entre dois ponto (fornecidos pelo usuário), utilizando os dois tipo de algorítimos. Alguém faz idéia de onde posso pegar algum exemplo deste tipo de algorítimo? Desde já agradeço. -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Exemplo de Multicam adas Com BSS, IntraWeb e DataSnap - Cód igo Fonte e Slide
de forma nenhuma.. vc so precisa se cadastrar no bdn q já tera direito aos downloads.. os exempos já estão com mais de 600 downloads.. ta indo na boa se precisar de alguma ajuda especifica para conseguir, pode me chamar no msn [EMAIL PROTECTED] ou por este email mesmo espero poder ajudar Abração Bruno Lichot Vitor Augusto escreveu: Caro Bruno , Estes exemplos é para algum grupo restrito , pois tento me cadastrar para fazer o dowload enão consigo... Um abraço Vitor Bruno Lichot [EMAIL PROTECTED] escreveu: Salve Galera!!! Atualizei mais um link no Code Central agora com o exemplo e o slide de apresentação de Desenvolvimento Multicamadas com interfaces web usando Borland Socket Server(BSS), IntraWeb, BDS 2006 e InterBase Eis o link: http://cc.borland.com/item.aspx?id=24225 Abração -- -- []´s Bruno Lichot
Re: [delphi-br] [Meio Off] Algorítimo de men or caminho.
--- Fellipe Henrique escreveu: Olá amigos, preciso desenvolver um protótipo para minha faculdade utilizando Algorítimo Genético e Simmulated Amnealing, para o problema do menor caminho. Ou seja, dado uma matriz de cidades e suas distâncias, fazer o cálculo entre dois ponto (fornecidos pelo usuário), utilizando os dois tipo de algorítimos. Alguém faz idéia de onde posso pegar algum exemplo deste tipo de algorítimo? Desde já agradeço. [--x--] [Welson] Isso é estudado em Grafos: problema do caixeiro viajante. Dando uma zapeada pelo Google, encontrei esse link que pode vir a te ajudar. http://pt.wikipedia.org/wiki/Problema_do_caixeiro_viajante E esse é o link de pesquisa do Google (reduzido com o TinyURL) http://tinyurl.com/ydwlt8 Enjoy. =D = 'O que me preocupa não é o grito dos maus. É o silêncio dos bons.' Martin Luther King. = Welson de Avelar Soares Filho Analista/Programador Delphi Gemini Sistemas www.geminisistemas.com.br Juiz de Fora - Minas Gerais = ___ O Yahoo! está de cara nova. Venha conferir! http://br.yahoo.com
Re: [delphi-br] Re: [Meio Off] Algorítimo de menor caminho.
Olá Walter, inicialmente o professor tinha pedido o do caixeiro viajante... mas depois mudou para este, ou seja, pensei então que os dois problemas são diferentes... Ou seja, O caixeiro viajante nao usa Algoritimo Genetico? Se for blz, metade do problema está resolvido, agora falta o tal de Simulated Amnialing []s Em 27/11/06, Walter Chagas (Yahoo) [EMAIL PROTECTED] escreveu: Procure na WEB a respeito de Algorítmo do Caixeiro Viajante, que é o que você está realemente procurando. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] wchagasj%40yahoo.com.br http://www.geocities.com/SiliconValley/Bay/1058 MSN: [EMAIL PROTECTED] whitesockets%40hotmail.com --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, Fellipe Henrique [EMAIL PROTECTED] escreveu Olá amigos, preciso desenvolver um protótipo para minha faculdade utilizando Algorítimo Genético e Simmulated Amnealing, para o problema do menor caminho. Ou seja, dado uma matriz de cidades e suas distâncias, fazer o cálculo entre dois ponto (fornecidos pelo usuário), utilizando os dois tipo de algorítimos. Alguém faz idéia de onde posso pegar algum exemplo deste tipo de algorítimo? Desde já agradeço. -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Usar ou não usar DBWares? Eis a questão!
--- Rubem Nascimento da Rocha escreveu: Faço minhas as palavras do Welson Avelar. Desde que comecei no Delphi 2, sempre usei componentes Data-Aware. Muita gente já comentou comigo dizendo: 'Data-Aware é uma droga! Acaba fazendo coisas que a gente não quer que aconteça, dispara eventos que a gente não quer que dispare, etc., etc., etc. Pois eu sempre usei, e não tem quem me faça não deixar de usar. O ganho de produtividade é inegável, indiscutível. Uma vez, fui dar manutenção em um sistema comercial (retaguarda) e fiquei p%$ da vida quando eu vi o que o programador tinha feito: todas as telas com grid de vendas e financeiro (contas a pagar/receber) com TStringGrid. Um absurdo de lento, além de requerer código a mais para efetar o refresh do componente. Tem gente que faz uso de um evento para uma coisa, quando na verdade deveria estar usando um outro evento. Uma excelente fonte de informação sobre os eventos dos datasets é o próprio help do Delphi. Só para citar, algumas coisas que eu sempre faço quando uso controles data-aware: . Sempre que for interagir muito com o seu dataset, faço uso dos métodos EnableControls(), DisableControls() e ControlsDisabled(); . Não uso AfterInsert pra alimentar dados iniciais a um registro, e sim OnNewRecord; . Durante a edição de um registro, pra validar/monitorar valores alterados em campos eu uso o evento OnSetText do TField do campo, e não no OnDataChange do DataSource ou no OnValidate; . Se quiser formatar um campo, ou mostrar ele de modo diferente em um TDBGrid, eu uso o evento OnGetText do TField do campo. Como eu sei disso tudo? Ora, tão simples quando elementar, lendo o help do Delphi. Data-aware é o canal, indiscutivelmente! Sds. [--x--] [Welson] Então... no início de qualquer mudança pode parecer difícil, beirar o impossível se adaptar a uma nova forma de programar. Mas com muita força de vontade chega lá. Eu sei como foi dureza mudar a minha forma de pensar quando passei a usar o CDS. Não sou expert no uso dele, levo muita coça ainda, mas continuo mesmo assim. O importante é não desanimar. []s. = 'O que me preocupa não é o grito dos maus. É o silêncio dos bons.' Martin Luther King. = Welson de Avelar Soares Filho Analista/Programador Delphi Gemini Sistemas www.geminisistemas.com.br Juiz de Fora - Minas Gerais = ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/
Re: [delphi-br] chamar um form sem perder o foco do form criador
Tipo um Hint? - Original Message - From: Gabriel Filho To: delphi-br@yahoogrupos.com.br Sent: Monday, November 27, 2006 9:14 AM Subject: [delphi-br] chamar um form sem perder o foco do form criador Bom dia, Gostaria de saber se exite uma maneira de dar um show em um form sem perder o foco do form que o chamou Desde já agradeço! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] chamar um form sem perder o foco do form criador
Isso! mais ou menos isso Em 27/11/06, Henrique Netzka (Vetor Sistemas) [EMAIL PROTECTED] escreveu: Tipo um Hint? - Original Message - From: Gabriel Filho To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, November 27, 2006 9:14 AM Subject: [delphi-br] chamar um form sem perder o foco do form criador Bom dia, Gostaria de saber se exite uma maneira de dar um show em um form sem perder o foco do form que o chamou Desde já agradeço! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [Meio Off] Algorítimo de menor c aminho.
Olá, Olá amigos, preciso desenvolver um protótipo para minha faculdade utilizando Algorítimo Genético e Simmulated Amnealing, para o problema do menor caminho. Pelo que sei, este é o algoritmo de Dijkstra. Tem centenas de referência na Internet... Saudações, Eduardo Paci Galvão Bacharel em Engenharia Elétrica - UFMG Analista de Sistemas www.egalvao.com.br
[delphi-br] MÁSCARA NO DBEDIT
Bom dia Colegas Gostaria de uma dica, como formato o dbedit para uma máscara de telefone, tipo, quando entro nele e vou digitar o número para ele formatar pra telefone com código ddd Muito Obrigado ___ Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] MÁSCARA NO DBEDIT
Indique a máscara de edição na propriedade EditMask do objeto TField do campo que vc quer editar. Maiores informações, consulte o help do Delphi. Sds. From: maycon danny [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] MÁSCARA NO DBEDIT Date: Mon, 27 Nov 2006 03:44:25 -0800 (PST) Bom dia Colegas Gostaria de uma dica, como formato o dbedit para uma máscara de telefone, tipo, quando entro nele e vou digitar o número para ele formatar pra telefone com código ddd Muito Obrigado ___ Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com [As partes desta mensagem que não continham texto foram removidas] _ MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com
Re: [delphi-br] chamar um form sem perder o foco do form criador
Então... dê uma olhada no Windows SDK Help (que tem lá no menu Help do Delphi). Procure por CreateWindowEx. tem um monte de parâmetros lá que podem ser úteis pra definir melhor as janelas... o que você procura se chama WS_EX_NOACTIVATE. Para defini-lo, você sobrescreverá a procedure CreateParams no seu form, e definirá da seguinte forma: Params.ExStyle := Params.ExStyle or WS_EX_NOACTIVATE; Talvez você queira combiná-lo com outras características, como WS_EX_TOPMOST ou WS_EX_TOOLWINDOW. Também, você pode redefinir o pai da janela para o Desktop (caso queira um comportamento igual ao de uma janela hint), fazendo: Params.WndParent := GetDesktopWindow; Desta forma, você terá a janela acima de todas as outras (inclusive outros aplicativos). Este tipo de janela pode ser usado, por exemplo, pra criar uma janela igual à do MSN (que não recebe foco e aparece em cima de todo mundo). Espero ter sido útil... Henrique Netzka - Original Message - From: Gabriel Filho To: delphi-br@yahoogrupos.com.br Sent: Monday, November 27, 2006 9:42 AM Subject: Re: [delphi-br] chamar um form sem perder o foco do form criador Isso! mais ou menos isso Em 27/11/06, Henrique Netzka (Vetor Sistemas) [EMAIL PROTECTED] escreveu: Tipo um Hint? - Original Message - From: Gabriel Filho To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, November 27, 2006 9:14 AM Subject: [delphi-br] chamar um form sem perder o foco do form criador Bom dia, Gostaria de saber se exite uma maneira de dar um show em um form sem perder o foco do form que o chamou Desde já agradeço! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [Meio Off] Algorítimo de menor caminho.
Olá Eduardo, realmente é de Dijkstra, e tem o de Lloyd, que me parece ser mais fácil, tentei achar para Delphi e não consegui, achei somente pra Java e C++.. mas como não sei disso, ficou meio dificil! :-) []s Em 27/11/06, Eduardo Paci Galvão [EMAIL PROTECTED] escreveu: Olá, Olá amigos, preciso desenvolver um protótipo para minha faculdade utilizando Algorítimo Genético e Simmulated Amnealing, para o problema do menor caminho. Pelo que sei, este é o algoritmo de Dijkstra. Tem centenas de referência na Internet... Saudações, Eduardo Paci Galvão Bacharel em Engenharia Elétrica - UFMG Analista de Sistemas www.egalvao.com.br -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Itabyte®-Erro ao gravar registro no Delphi 2006 .net ! !!!
Itabyte®-Erro ao gravar registro no Delphi 2006 .net Pessoal to tentando gravar um registro na tabela de produtos com Firebird 1.5 usando SP , qdo clico no botão gravar meu servidor de internet ta retornando a mensagem descrito logo abaixo , ja fiz de tudo mais nao obtive sucesso alguem ja passou por isso ou ja viu esse erro ??? Server Error in '/ItabyteShop' Application. Object reference not set to an instance of an object. Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code. Exception Details: System.NullReferenceException: Object reference not set to an instance of an object. Source Error: An unhandled exception was generated during the execution of the current web request. Information regarding the origin and location of the exception can be identified using the exception stack trace below. Stack Trace: [NullReferenceException: Object reference not set to an instance of an object.] System.Web.UI.HtmlControls.HtmlInputFile.get_PostedFile() +6 cadastroprodutos.TWebForm1.SalvaRegistro() cadastroprodutos.TWebForm1.btnsalvar_Click(Object sender, EventArgs e) System.Web.UI.WebControls.Button.OnClick(EventArgs e) +108 System.Web.UI.WebControls.Button.System.Web.UI.IPostBackEventHandler.RaisePostBackEvent(String eventArgument) +57 System.Web.UI.Page.RaisePostBackEvent(IPostBackEventHandler sourceControl, String eventArgument) +18 System.Web.UI.Page.RaisePostBackEvent(NameValueCollection postData) +33 System.Web.UI.Page.ProcessRequestMain() +1292 JESUS TE AMA !!! Itabyte Tecnologia®-www.itabyte.com MarcioCC® Analista/Programador - Delphi MSN : [EMAIL PROTECTED] SKYPE : itabytetec Fone : 15-3524-1946 [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] Problemas com Data Module.
Olá pessoal! Estou com um probleminha muito estranho! Utilizo a versão 7.0 (Build 4.453) do Delphi e não tinha o problema abaixo sitado com a versão 6. Tenho duas tabelas: COBRANCA e ITEM_COBRANCA e utilizo os componentes SQLDataSet, DataSetProvider e ClientDataSet para o acesso das mesmas. As query utilizadas nos SQLDataSet são: Para a tabela COBRANCA -- SELECT T1.ID_COBRANCA, T1.VL_MES_REFERENCIA, T1.VL_ANO_REFERENCIA, T1.DT_CADASTRO, T1.DT_VENCIMENTO, T1.VL_DESCONTO, T1.VL_ACRESCIMO, T1.DS_FECHADA, T1.ID_CLIENTE, T3.NM_CLIENTE, SUM(T2.VL_CONTA) AS VL_TOTAL, SUM(T2.VL_CONTA) + (T1.VL_ACRESCIMO - T1.VL_DESCONTO) AS VL_TOTAL_PAGAR FROM COBRANCA T1 INNER JOIN ITEM_COBRANCA T2 ON (T1.ID_COBRANCA = T2.ID_COBRANCA) INNER JOIN CLIENTE T3 ON (T1.ID_CLIENTE = T3.ID_CLIENTE) GROUP BY T1.ID_COBRANCA, T1.VL_MES_REFERENCIA, T1.VL_ANO_REFERENCIA, T1.DT_CADASTRO, T1.DT_VENCIMENTO, T1.VL_DESCONTO, T1.VL_ACRESCIMO, T1.DS_FECHADA, T1.ID_CLIENTE, T3.NM_CLIENTE ORDER BY T1.VL_MES_REFERENCIA, T1.VL_ANO_REFERENCIA, T1.DT_VENCIMENTO, T1.ID_COBRANCA Para a tabela ITEM_COBRANCA --- SELECT * FROM ITEM_COBRANCA WHERE ID_COBRANCA =:ID_COBRANCA ORDER BY NR_ITEM Na cláusula WHERE, recebo ID_COBRANCA como parâmetro que é o campo ID_COBRANCA (T1.ID_COBRANCA) da tabela COBRANCA (COBRANCA T1). Para isso, linkei a minha tabela ITEM_COBRANCA através da Propriedade DataSource do componente SQLDataSet que acessa ela (ITEM_COBRANCA), com o nome do DataSource que acessa a tabela COBRANCA, ou seja, meu SQLDataSet da tabela ITEM_COBRANCA consegue enchergar e receber como parâmetro, todos os campos obtidos através do SELECT na tabela COBRANCA. Os DataSource ficam no próprio formulário de Cobrança com os DataSet (DS_COBRANCA e DS_ItemCobranca) acessando os ClientDataSet em um DataMudule, pois os Componentes SQLDataSet, DataSetProvider e ClientDataSet estão lá. Os Itens de uma determinada Cobrança, são exibidos sem nenhum problema até o formulário ser fechado, quando abro novamente, os Itens referentes a mesma, não são mais exibidos corretamente, parece que o link foi perdido. Isso só acontece se os componentes estiverem dentro de um Data Module mas se estiverem no próprio formulário de Cobrança, isso não acontece. Alguém pode me dá uma ajudinha??? Desde já, obrigado. Abraço, Cristiano.
[delphi-br] Atalho para aplicação como TrayIcon
Boa tarde a todos! Alguém da lista já desenvolveu uma aplicação TrayIcon a qual possuia uma tecla de atalho para ser ativada? Ou seja, após minimizar a aplicação como TrayIcon, em qualquer lugar que estiver o usuário consegue apartir de teclas de atalho restaurar a aplicação. Ambiente: WXP Pro + Delphi 7 + Programação própria para colocar a aplicação no TrayIcon (Notify + Action + WMSysCommand + PopupMenu). Desde já agradeço, [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Dúvida com o QRCompositeReport =20?=
Olha, Eu não tenho certeza se vai funcionar, mas tente colocar o ForceNewPage = true para a primeira banda dos relatórios 2 e 3!!! Isabel - Grupo Discussão [EMAIL PROTECTED] escreveu: Boa noite à todos, Uso o QRCompositeReport para montar 3 relatórios sobre o mesmo objeto QuickReport, em vez de 3 relatórios separados. Há como fazer quebra de página a cada relatório acrescentado, neste caso? Desde já agradeço, Isabel Santos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos Valfrid-Ly Silva Couto [EMAIL PROTECTED] [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ 15114646 - Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Access violation com ntdll.dll
Bom dia pessoal, quando estou rodando minha aplicação, aparece essa mensagem, alguém saberia me informar porque? Access violation at adress 7C913144 in module ntdll.dll. write of adress 00404E89. obrigado a todos. Thiago - Desenvolvimento Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ http://www.moked.com.br/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Qual a melhor suíte de componentes para trabalhar com Oracle?
eu Utilizo ADO via conexão ODBC!!! 2006/11/27, Gabriel Herdt [EMAIL PROTECTED]: Aqui onde trabalho Utilizamos o DOA(Direct Oracle Access) Acredito que seja uma boa opção. do contrario me avisem. Até na minha opnião é um otimo componente. --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, Luiz Escobar [EMAIL PROTECTED] escreveu É verdade, não posso falar pelo ODAC mas pelo MyDAC (p/mysql) não tem igual, os caras são muitos competentes no que fazem, e pré- supondo que o ODAC seja tão bom quando o MyDAC, cara vc não vai gastar 400,00 vai é economizar muito tempo e raiva e esbanjar felicidade.. hehehehhe... Luiz Escobar - Segue mensagem original! - De: Josir Gomes [EMAIL PROTECTED] Data: Sat, 25 Nov 2006 10:40:13 -0200 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] RE: Qual a melhor suíte de componentes para trabalhar com Oracle? Olá Marcio, sem dúvida nenhuma, o biblioteca ODAC é a melhor opção. É muito estavel e muito rápida. Já trabalho com ela a 5 anos. Não precisa nem de Oracle Client para o seu programa rodar. São R$400,00 bem gastos! E vc não precisa ter o Delphi Enterprise - basta comprar o Professional. www.crlab.com Boa Sorte, Josir --- Enviado por: Marcio Cruz [EMAIL PROTECTED] marciofcruz Sáb, 25 de Nov de 2006 8:39 am Bom dia, amigos.. Uma dúvida.. Eu trabalho a 7 anos utilizando Delphi 5 com Oracle, através de conexão BDE... Agora surgiu a oportunidade de desenvolver sistemas particulares, fora da empresa onde sou CLT e, gostaria de trabalhar com Oracle Express Edition e Delphi mas, qual será a melhor suíte de componentes para tal? Me parece que a própria Oracle disponibiliza sua suíte mas, sinceramente, gostaria de opinião de vocês.. -- Att., Alvaro Esteves Alves Analista de Sistemas 55 11 8214-7819 [EMAIL PROTECTED] The information contained in this message and in the attached files are restricted, and its confidentiality protected by law. In case you are not the addressee, be aware that the reading, spreading and copy of this message is unauthorized. Please, delete this message and notify the sender. The improper use of this information will be treated according the company's internal rules and legal laws. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] chamar um form sem perder o foco do form criador
Se for um Show e não um ShowModal, é só trazer o foco de volta para o form atual na próxima linha de código, porém seu outro form vai ficar escondido atrás do chamador. O que exatamente você pretende fazer?! As vezes algum outro tipo de controle é mais viável! Gabriel Filho [EMAIL PROTECTED] escreveu: Isso! mais ou menos isso Em 27/11/06, Henrique Netzka (Vetor Sistemas) escreveu: Tipo um Hint? - Original Message - From: Gabriel Filho To: delphi-br@yahoogrupos.com.br Sent: Monday, November 27, 2006 9:14 AM Subject: [delphi-br] chamar um form sem perder o foco do form criador Bom dia, Gostaria de saber se exite uma maneira de dar um show em um form sem perder o foco do form que o chamou Desde já agradeço! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos Valfrid-Ly Silva Couto [EMAIL PROTECTED] [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ 15114646 - Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] chamar um form sem perder o foco do form criador
Bom fiz assim no on create do form hint FormAtu:= Screen.ActiveForm; try if FormAtu.FormStyle = fsMDIChild then (FormAtu.Owner as TForm).Show else FormAtu.Show; except (Owner as TForm).Show; end; FormAtu:=nil; e funfou vlw pessoal Em 27/11/06, Valfrid-Ly Silva Couto [EMAIL PROTECTED] escreveu: Se for um Show e não um ShowModal, é só trazer o foco de volta para o form atual na próxima linha de código, porém seu outro form vai ficar escondido atrás do chamador. O que exatamente você pretende fazer?! As vezes algum outro tipo de controle é mais viável! Gabriel Filho [EMAIL PROTECTED] gabriel.dimas%40gmail.com escreveu: Isso! mais ou menos isso Em 27/11/06, Henrique Netzka (Vetor Sistemas) escreveu: Tipo um Hint? - Original Message - From: Gabriel Filho To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, November 27, 2006 9:14 AM Subject: [delphi-br] chamar um form sem perder o foco do form criador Bom dia, Gostaria de saber se exite uma maneira de dar um show em um form sem perder o foco do form que o chamou Desde já agradeço! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos Valfrid-Ly Silva Couto [EMAIL PROTECTED] valfrid%40uol.com.br [EMAIL PROTECTED] valfrid%40intermega.com.br [EMAIL PROTECTED] valfrid_ly%40hotmail.com ICQ 15114646 - Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Problema Grave com Timeout - Urgente
Pessoal, Estou com uma bucha aqui pra resolver e preciso muito da ajuda do grupo... vamos lá.. No cliente onde trabalho, faço manutenção num sistema feito em D7 com Sql Server 2000. De uns dias pra cá, o sistema começou a dar timeout com bastante frequência e quando acontecia isso o DBA verificava via scripts que existia um processo bloqueando outro no sql server. Bom, quais foram meus passos para tentar descobrir qual é o problema até agora: 1 - revisei as principais rotinas que sempre travam e também as maiores e mais demoradas... num achei nenhum problema, mesmo porque essas rotinas sempre funcionaram muito bem. O Sistema já está em produção a mais ou menos 1 ano. 2 - estou revisando alguns códigos de acordo com alguns toques que recebi de uma pessoa de uma outra empresa que integra o sistema deles com o nosso, e que manja muito de sql server. Bom ele pediu para eu revisar os momentos em que abro transações no servidor.. Bom, tirei todas as aberturas de transação quando ao chamar procedures que fazem somente selects... e mantive somente nos momentos em que preciso alterar mais de uma tabela para garantir a integridade dos dados... Bom, nesse lugares que mantive as abertura de transações, o código fica assim: If adoSistema.InTransaction Then adoSistema.RollBackTrans ; adoSistema.BeginTrans; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_01' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 01 //Executa a SP Self.spGeral.ExecProc ; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_02' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 02 //Executa a SP Self.spGeral.ExecProc ; //Grava os Dados no bd adoSistema.CommitTrans ; Até aí vocês viram algum erro Bom, outra coisa, eu estive olhando algumas propriedades do TADOConection e gostaria de saber como vocês configuram para comparar com as minhas aqui... E nos casos de selects onde eu porderia usar tabelas temporárias.. existe alguma propriedade que faça com que meu componente adoQuery traga os dados sem bloquear a tabela??? Pois tenho casos onde a query fica aberta durante processos demorados e acho que isso está gerando travamento no banco... A minha maior dúvida é o que fazer para evitar esses travamentos no banco... Se puderem me ajudar ficarei muito grato... Marcelo.
[delphi-br] Incluir Tabelas e Trigger em DB Firebird utilizando ZeosLib
Boa tarde! Estou tentando fazer uma atualização num Banco de Dados Firebird, utilizando o componente ZSQLProcessor do ZeosLib. Criei um Script no DBExpert, para as tabelas e triggers que necessito. As tabelas, chaves primárias e chaves estrangeiras estão sendo criadas sem problema, porém, no momento de criar o primeiro Trigger, está apresentando erro, informando um ocorreu um fim de comando inesperado. Considerando que o script está correto, pois o mesmo funciona corretamente no DBExpert, creio que o erro está no componente que estou usando para rodar o mesmo no Banco de Dados. Alguém tem alguma sugestão de como proceder para incluir Tabelas e Triggers utilizando o componente ZeosLib? Obrigado. Ulisses [As partes desta mensagem que não continham texto foram removidas]
Res: Res: [delphi-br] Instalação do Jedi 3.2 0 - Delphi 2006
Boa tarde. O DCC32.Exe é o compilador do Delphi. Procure por este arquivo na pasta BIN dentro do diretório onde vc instalou o Delphi. Quando vc executa o install.bat ele precisa chamar o compilador em linha de comando pra poder fazer a instalação. Até+ Ricardo. - Mensagem original De: [EMAIL PROTECTED] [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 24 de Novembro de 2006 16:31:08 Assunto: Re: Res: [delphi-br] Instalação do Jedi 3.20 - Delphi 2006 Que utilitario?? ? Estou executando o intall.bat e ele me informa que não existe o arquivo dcc32.exe. Valeu. Marcelo On Fri, 24 Nov 2006 10:16:40 -0800 (PST), Ricardo Cesar Cardoso ricardo_listadelphi @yahoo.com. br wrote: Use o utilitário de instalação que acompanha o JEDI mas lembre-se que vc deve instalar a JCL primeiro e depois instalar a JVCL. Instalei ontem aqui esta versão (3.20) no Delphi 2005 e não tive problemas. Abraço, Ricardo. - Mensagem original De: [EMAIL PROTECTED] com.br [EMAIL PROTECTED] com.br Para: [EMAIL PROTECTED] os.com.br Enviadas: Sexta-feira, 24 de Novembro de 2006 15:40:57 Assunto: [delphi-br] Instalação do Jedi 3.20 - Delphi 2006 Senhores, Alguém conseguiu instalar o Jedi 3.20 no delphi 2006 Obrigado a todos.. Marcelo _ _ _ _ ___ Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso. yahoo.com [As partes desta mensagem que não continham texto foram removidas] !-- #ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;} #ygrp-mlmsg table {font-size:inherit;font:100%;} #ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height:1.22em;} #ygrp-text{ font-family:Georgia; } #ygrp-text p{ margin:0 0 1em 0; } #ygrp-tpmsgs{ font-family:Arial; clear:both; } #ygrp-vitnav{ padding-top:10px; font-family:Verdana; font-size:77%; margin:0; } #ygrp-vitnav a{ padding:0 1px; } #ygrp-actbar{ clear:both; margin:25px 0; white-space:nowrap; color:#666; text-align:right; } #ygrp-actbar .left{ float:left; white-space:nowrap; } .bld{font-weight:bold;} #ygrp-grft{ font-family:Verdana; font-size:77%; padding:15px 0; } #ygrp-ft{ font-family:verdana; font-size:77%; border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom:10px; } #ygrp-vital{ background-color:#e0ecee; margin-bottom:20px; padding:2px 0 8px 8px; } #ygrp-vital #vithd{ font-size:77%; font-family:Verdana; font-weight:bold; color:#333; text-transform:uppercase; } #ygrp-vital ul{ padding:0; margin:2px 0; } #ygrp-vital ul li{ list-style-type:none; clear:both; border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight:bold; color:#ff7900; float:right; width:2em; text-align:right; padding-right:.5em; } #ygrp-vital ul li .cat{ font-weight:bold; } #ygrp-vital a { text-decoration:none; } #ygrp-vital a:hover{ text-decoration:underline; } #ygrp-sponsor #hd{ color:#999; font-size:77%; } #ygrp-sponsor #ov{ padding:6px 13px; background-color:#e0ecee; margin-bottom:20px; } #ygrp-sponsor #ov ul{ padding:0 0 0 8px; margin:0; } #ygrp-sponsor #ov li{ list-style-type:square; padding:6px 0; font-size:77%; } #ygrp-sponsor #ov li a{ text-decoration:none; font-size:130%; } #ygrp-sponsor #nc { background-color:#eee; margin-bottom:20px; padding:0 8px; } #ygrp-sponsor .ad{ padding:8px 0; } #ygrp-sponsor .ad #hd1{ font-family:Arial; font-weight:bold; color:#628c2a; font-size:100%; line-height:122%; } #ygrp-sponsor .ad a{ text-decoration:none; } #ygrp-sponsor .ad a:hover{ text-decoration:underline; } #ygrp-sponsor .ad p{ margin:0; } o {font-size:0;} .MsoNormal { margin:0 0 0 0; } #ygrp-text tt{ font-size:120%; } blockquote{margin:0 0 0 4px;} .replbq {margin:4;} -- ___ Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas ! http://br.answers.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Off Topic - Delphi 4 Licenca de Uso - Utilizacao comercial.
Colegas Eu comprei uma revista que vem com o delphi 4, a um ano, quero saber se posso programar comercialmente utilizando esta LICENCA Obrigado pela atenção. Sou novo na Lista, estou a disposicao dos colegas para quaisquer esclarecimentos/ajudas. Luciano Delphi 4 / BDE / Postgres [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Erro ao acessar Fire Bird
Ué, mas eu estou passando o ProviderName para o fcdsCliente. Como ficaria a procedure então? Obrigado. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fellipe Henrique Enviada em: domingo, 26 de novembro de 2006 15:47 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Erro ao acessar Fire Bird Isto quer dizer que algum CDS falta o DSP... vi pelo seu código: FcdsCliente.ProviderName := 'FdspCliente'; FdsCliente.DataSet Ou você esqueceu de por no seu email, ou realmente voce esqueceu no seu codigo de passar o ProviderName para o FdsCliente. []s Em 26/11/06, technomoked [EMAIL PROTECTED] mailto:humberto%40moked.com.br escreveu: Bem, estou tentando acessar o banco de dados somente criando os objetos via código. porém estou tendo alguma dificuldade, pois apesar de parecer estar tudo correto, da o seguinte erro: Missing data provider or data package Segue abaixo a minha procedure: procedure TCliente.ConectarBD; begin //Conectando ao banco de dados. FsdsCliente := TSQLDataSet.Create(FsdsCliente); FcdsCliente := TClientDataSet.Create(FcdsCliente); FdspCliente := TDataSetProvider.Create(FdspCliente); FdsCliente := TDataSource.Create(FdsCliente); FsdsCliente.Datasource := FdsCliente; FsdsCliente.SQLConnection := dm.scsisgel; FsdsCliente.CommandText := 'SELECT * FROM Cliente ' + 'WHERE fl_ativo = 1'; FdspCliente.DataSet := FsdsCliente; FcdsCliente.ProviderName := 'FdspCliente'; FdsCliente.DataSet := FcdsCliente; FsdsCliente.Active := True; FcdsCliente.Active := True; FcdsCliente.Close; FcdsCliente.Open; FcdsCliente.First; // end; Alguém ai pode me ajudar? Thks. -- _ Fellipe Henrique [EMAIL PROTECTED] mailto:fellipeh%40gmail.com Borland Developer Studio 2006 Certified Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Atalho para aplicação como TrayIcon
Boa tarde a todos! Alguém da lista já desenvolveu uma aplicação TrayIcon a qual possuia uma tecla de atalho para ser ativada? Ou seja, após minimizar a aplicação como TrayIcon, em qualquer lugar que estiver o usuário consegue apartir de teclas de atalho restaurar a aplicação. Ambiente: WXP Pro + Delphi 7 + Programação própria para colocar a aplicação no TrayIcon (Notify + Action + WMSysCommand + PopupMenu). Desde já agradeço, Wagner [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Forms MDI
Exemplo: Abri o Cadastro de Notas Fiscais de Entrada faltou um produto que nao esta cadastrado faltou cadastrar o fornecedor Abri o Cadastro de Produtos coloquei em inclusao Abri o Cadastro de Fornecedores coloquei em inclusao Fecho a aplicacao sem Confirmar, o cadastro de produtos e o cadastro de fornecedores, e nota fiscal esta no meio. duvidas: 1) coloco tudo isso dentro de uma transaction e quando fecho o form pai dou um rollback se a conexao estiver ativa ? 2) abro uma transaction para cada cadastro e fecho individual, conforme as tabelas são fechadas ? Antonio Pires -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.5.430 / Virus Database: 268.14.16/552 - Release Date: 26/11/2006 11:30
[delphi-br] Imprimir arquivo
Pessol, como faco para enviar um arquivo de minha maquina direto para impressora?
Re: [delphi-br] Imprimir arquivo
AssignFile(Arq, 'LPT1') é uma forma :) - Original Message - From: dionatanhenrique To: delphi-br@yahoogrupos.com.br Sent: Monday, November 27, 2006 1:47 PM Subject: [delphi-br] Imprimir arquivo Pessol, como faco para enviar um arquivo de minha maquina direto para impressora? [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Componente que faça algo parecid o com o google calendar.
Até onde eu sei na JEDI tem uma paleta só pra trabalhar com isso. Só não me lembro exatamente o nome da paleta. Grato, Ricardo. - Mensagem original De: Ricardo Lima [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Domingo, 26 de Novembro de 2006 22:05:38 Assunto: [delphi-br] Componente que faça algo parecido com o google calendar. Pessoal estou desenvolvendo uma agenda e gostaria de fazer algo parecido com o google calendar, aqueles efeitos de arrastar os evento para outro horário ou data, aumentar o tempo de cada evento somente arrastando suas bordas etc... Alguém conhece algum componente que faça algo parecido ou tem alguma dica de como fazer. Obrigado. At. Ricardo Lima [As partes desta mensagem que não continham texto foram removidas] !-- #ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;} #ygrp-mlmsg table {font-size:inherit;font:100%;} #ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height:1.22em;} #ygrp-text{ font-family:Georgia; } #ygrp-text p{ margin:0 0 1em 0; } #ygrp-tpmsgs{ font-family:Arial; clear:both; } #ygrp-vitnav{ padding-top:10px; font-family:Verdana; font-size:77%; margin:0; } #ygrp-vitnav a{ padding:0 1px; } #ygrp-actbar{ clear:both; margin:25px 0; white-space:nowrap; color:#666; text-align:right; } #ygrp-actbar .left{ float:left; white-space:nowrap; } .bld{font-weight:bold;} #ygrp-grft{ font-family:Verdana; font-size:77%; padding:15px 0; } #ygrp-ft{ font-family:verdana; font-size:77%; border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom:10px; } #ygrp-vital{ background-color:#e0ecee; margin-bottom:20px; padding:2px 0 8px 8px; } #ygrp-vital #vithd{ font-size:77%; font-family:Verdana; font-weight:bold; color:#333; text-transform:uppercase; } #ygrp-vital ul{ padding:0; margin:2px 0; } #ygrp-vital ul li{ list-style-type:none; clear:both; border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight:bold; color:#ff7900; float:right; width:2em; text-align:right; padding-right:.5em; } #ygrp-vital ul li .cat{ font-weight:bold; } #ygrp-vital a { text-decoration:none; } #ygrp-vital a:hover{ text-decoration:underline; } #ygrp-sponsor #hd{ color:#999; font-size:77%; } #ygrp-sponsor #ov{ padding:6px 13px; background-color:#e0ecee; margin-bottom:20px; } #ygrp-sponsor #ov ul{ padding:0 0 0 8px; margin:0; } #ygrp-sponsor #ov li{ list-style-type:square; padding:6px 0; font-size:77%; } #ygrp-sponsor #ov li a{ text-decoration:none; font-size:130%; } #ygrp-sponsor #nc { background-color:#eee; margin-bottom:20px; padding:0 8px; } #ygrp-sponsor .ad{ padding:8px 0; } #ygrp-sponsor .ad #hd1{ font-family:Arial; font-weight:bold; color:#628c2a; font-size:100%; line-height:122%; } #ygrp-sponsor .ad a{ text-decoration:none; } #ygrp-sponsor .ad a:hover{ text-decoration:underline; } #ygrp-sponsor .ad p{ margin:0; } o {font-size:0;} .MsoNormal { margin:0 0 0 0; } #ygrp-text tt{ font-size:120%; } blockquote{margin:0 0 0 4px;} .replbq {margin:4;} -- ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Problema Grave com Timeout - Urgente
A primeira coisa q voce tem q saber é de onde vem a mensagem: do componente ADOConnection ou do Sql Server. Se for do ADO: No componente ADOConnection tem a propriedade ConnectionTime - set para 1000 Nos componente TADOquery e TADOStoredProc tem a propriedade CommandTime - set para 1000 Se for do Sql Server: Você tem q analisar a performance de todos os seus comandos através do Profile. Pode ser comandos mal projetados T+ Mani --- Em delphi-br@yahoogrupos.com.br, Marcelo Alves [EMAIL PROTECTED] escreveu Pessoal, Estou com uma bucha aqui pra resolver e preciso muito da ajuda do grupo... vamos lá.. No cliente onde trabalho, faço manutenção num sistema feito em D7 com Sql Server 2000. De uns dias pra cá, o sistema começou a dar timeout com bastante frequência e quando acontecia isso o DBA verificava via scripts que existia um processo bloqueando outro no sql server. Bom, quais foram meus passos para tentar descobrir qual é o problema até agora: 1 - revisei as principais rotinas que sempre travam e também as maiores e mais demoradas... num achei nenhum problema, mesmo porque essas rotinas sempre funcionaram muito bem. O Sistema já está em produção a mais ou menos 1 ano. 2 - estou revisando alguns códigos de acordo com alguns toques que recebi de uma pessoa de uma outra empresa que integra o sistema deles com o nosso, e que manja muito de sql server. Bom ele pediu para eu revisar os momentos em que abro transações no servidor.. Bom, tirei todas as aberturas de transação quando ao chamar procedures que fazem somente selects... e mantive somente nos momentos em que preciso alterar mais de uma tabela para garantir a integridade dos dados... Bom, nesse lugares que mantive as abertura de transações, o código fica assim: If adoSistema.InTransaction Then adoSistema.RollBackTrans ; adoSistema.BeginTrans; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_01' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 01 //Executa a SP Self.spGeral.ExecProc ; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_02' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 02 //Executa a SP Self.spGeral.ExecProc ; //Grava os Dados no bd adoSistema.CommitTrans ; Até aí vocês viram algum erro Bom, outra coisa, eu estive olhando algumas propriedades do TADOConection e gostaria de saber como vocês configuram para comparar com as minhas aqui... E nos casos de selects onde eu porderia usar tabelas temporárias.. existe alguma propriedade que faça com que meu componente adoQuery traga os dados sem bloquear a tabela??? Pois tenho casos onde a query fica aberta durante processos demorados e acho que isso está gerando travamento no banco... A minha maior dúvida é o que fazer para evitar esses travamentos no banco... Se puderem me ajudar ficarei muito grato... Marcelo.
Re: [delphi-br] Re: Problema Grave com Timeout - Urgente
Uma dica qdo vc usa o transaction no adoconection, a tabela é bloqueada automáticamente, entaum como vc disse que tem operacoes que demoram muito pra ser processadas, analise, para ver se é possivel dividir essa transacao muito grande em duas ou tres menores. Verifique tambem se vc consegue otimizar melhor seu scripts, tipo sub consultas dentro de selects que retornam muito dados. uma boa maneira de fazer isso é utilizando o studio mananger express, nele tem uma ferramente que analiza seu scritp te retornando em % qual do consumo de cada bloq de select count inner joins etc... espero ter ajudado Em 27/11/06, maniacapordelphi [EMAIL PROTECTED] escreveu: A primeira coisa q voce tem q saber é de onde vem a mensagem: do componente ADOConnection ou do Sql Server. Se for do ADO: No componente ADOConnection tem a propriedade ConnectionTime - set para 1000 Nos componente TADOquery e TADOStoredProc tem a propriedade CommandTime - set para 1000 Se for do Sql Server: Você tem q analisar a performance de todos os seus comandos através do Profile. Pode ser comandos mal projetados T+ Mani --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, Marcelo Alves [EMAIL PROTECTED] escreveu Pessoal, Estou com uma bucha aqui pra resolver e preciso muito da ajuda do grupo... vamos lá.. No cliente onde trabalho, faço manutenção num sistema feito em D7 com Sql Server 2000. De uns dias pra cá, o sistema começou a dar timeout com bastante frequência e quando acontecia isso o DBA verificava via scripts que existia um processo bloqueando outro no sql server. Bom, quais foram meus passos para tentar descobrir qual é o problema até agora: 1 - revisei as principais rotinas que sempre travam e também as maiores e mais demoradas... num achei nenhum problema, mesmo porque essas rotinas sempre funcionaram muito bem. O Sistema já está em produção a mais ou menos 1 ano. 2 - estou revisando alguns códigos de acordo com alguns toques que recebi de uma pessoa de uma outra empresa que integra o sistema deles com o nosso, e que manja muito de sql server. Bom ele pediu para eu revisar os momentos em que abro transações no servidor.. Bom, tirei todas as aberturas de transação quando ao chamar procedures que fazem somente selects... e mantive somente nos momentos em que preciso alterar mais de uma tabela para garantir a integridade dos dados... Bom, nesse lugares que mantive as abertura de transações, o código fica assim: If adoSistema.InTransaction Then adoSistema.RollBackTrans ; adoSistema.BeginTrans; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_01' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 01 //Executa a SP Self.spGeral.ExecProc ; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_02' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 02 //Executa a SP Self.spGeral.ExecProc ; //Grava os Dados no bd adoSistema.CommitTrans ; Até aí vocês viram algum erro Bom, outra coisa, eu estive olhando algumas propriedades do TADOConection e gostaria de saber como vocês configuram para comparar com as minhas aqui... E nos casos de selects onde eu porderia usar tabelas temporárias.. existe alguma propriedade que faça com que meu componente adoQuery traga os dados sem bloquear a tabela??? Pois tenho casos onde a query fica aberta durante processos demorados e acho que isso está gerando travamento no banco... A minha maior dúvida é o que fazer para evitar esses travamentos no banco... Se puderem me ajudar ficarei muito grato... Marcelo. [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Off Topic - Delphi 4 Licenca de Uso - Utilizacao comercial.
Se vc tem o número de série basta registrá-lo e programar a vontade. Abraço, Ricardo. - Mensagem original De: [EMAIL PROTECTED] [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Segunda-feira, 27 de Novembro de 2006 11:20:42 Assunto: [delphi-br] Off Topic - Delphi 4 Licenca de Uso - Utilizacao comercial. Colegas Eu comprei uma revista que vem com o delphi 4, a um ano, quero saber se posso programar comercialmente utilizando esta LICENCA??? ? Obrigado pela atenção. Sou novo na Lista, estou a disposicao dos colegas para quaisquer esclarecimentos/ ajudas. Luciano Delphi 4 / BDE / Postgres [As partes desta mensagem que não continham texto foram removidas] !-- #ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;} #ygrp-mlmsg table {font-size:inherit;font:100%;} #ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height:1.22em;} #ygrp-text{ font-family:Georgia; } #ygrp-text p{ margin:0 0 1em 0; } #ygrp-tpmsgs{ font-family:Arial; clear:both; } #ygrp-vitnav{ padding-top:10px; font-family:Verdana; font-size:77%; margin:0; } #ygrp-vitnav a{ padding:0 1px; } #ygrp-actbar{ clear:both; margin:25px 0; white-space:nowrap; color:#666; text-align:right; } #ygrp-actbar .left{ float:left; white-space:nowrap; } .bld{font-weight:bold;} #ygrp-grft{ font-family:Verdana; font-size:77%; padding:15px 0; } #ygrp-ft{ font-family:verdana; font-size:77%; border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom:10px; } #ygrp-vital{ background-color:#e0ecee; margin-bottom:20px; padding:2px 0 8px 8px; } #ygrp-vital #vithd{ font-size:77%; font-family:Verdana; font-weight:bold; color:#333; text-transform:uppercase; } #ygrp-vital ul{ padding:0; margin:2px 0; } #ygrp-vital ul li{ list-style-type:none; clear:both; border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight:bold; color:#ff7900; float:right; width:2em; text-align:right; padding-right:.5em; } #ygrp-vital ul li .cat{ font-weight:bold; } #ygrp-vital a { text-decoration:none; } #ygrp-vital a:hover{ text-decoration:underline; } #ygrp-sponsor #hd{ color:#999; font-size:77%; } #ygrp-sponsor #ov{ padding:6px 13px; background-color:#e0ecee; margin-bottom:20px; } #ygrp-sponsor #ov ul{ padding:0 0 0 8px; margin:0; } #ygrp-sponsor #ov li{ list-style-type:square; padding:6px 0; font-size:77%; } #ygrp-sponsor #ov li a{ text-decoration:none; font-size:130%; } #ygrp-sponsor #nc { background-color:#eee; margin-bottom:20px; padding:0 8px; } #ygrp-sponsor .ad{ padding:8px 0; } #ygrp-sponsor .ad #hd1{ font-family:Arial; font-weight:bold; color:#628c2a; font-size:100%; line-height:122%; } #ygrp-sponsor .ad a{ text-decoration:none; } #ygrp-sponsor .ad a:hover{ text-decoration:underline; } #ygrp-sponsor .ad p{ margin:0; } o {font-size:0;} .MsoNormal { margin:0 0 0 0; } #ygrp-text tt{ font-size:120%; } blockquote{margin:0 0 0 4px;} .replbq {margin:4;} -- ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Sair da lista...
Bom dia pessoal! Estou tendo dificuldades para sair desta lista. Estou enviando a mensagem para sair da lista e recebendo a mensagem para confirmação da saída, respondo-a mas continuo recebendo as mensagens...
Re: [delphi-br] Sair da lista...
Roberto, Já tentou alterar as configurações no teu cadastro do yahoo Grupos? [] Andrei Em 27/11/06, JJW Informática Ltda. - Roberto[EMAIL PROTECTED] escreveu: Bom dia pessoal! Estou tendo dificuldades para sair desta lista. Estou enviando a mensagem para sair da lista e recebendo a mensagem para confirmação da saída, respondo-a mas continuo recebendo as mensagens...
[delphi-br] COM
Estou com um problema em relação à COM e não sei o que fazer. Tenho um COMSERV e uma factory de criação dos objetos. Criei uma classe derivada como abaixo: TMinhaClass = class(TComObject, IInternetProtocol) Faço uso do objeto e qdo tento fechar a aplicação recebo a seguinte mensagem: --- COM Server Warning --- There are still active COM objects in this application. One or more clients may have references to these objects, so manually closing this application may cause those client application(s) to fail. Are you sure you want to close this application? --- Sim Não --- Há algum meio de eu fechar a aplicação sem que essa mensagem seja dada? Ou algum metodo que eu mate todas as intancias de uma factory? orbigado Sérgio T. Uetanabaro Tecnologia * 55 16 2102-8787 - Ribeirão Preto * [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Problema Grave com Timeout - Urgente
Bom, quanto a quebrar em várias transações menores, não tenho como fazer isso uma vez que devo manter a integridade dos dados gravados. Aumentei o connectiontimeout para 1000 conforme sugeriram abaixo... Agora e quanto às outras propriedades??? Não tem mais nada que devo me preocupar para evitar esses travamentos? Obrigado até agora gente. Att, Marcelo --- Em delphi-br@yahoogrupos.com.br, Gabriel Filho [EMAIL PROTECTED] escreveu Uma dica qdo vc usa o transaction no adoconection, a tabela é bloqueada automáticamente, entaum como vc disse que tem operacoes que demoram muito pra ser processadas, analise, para ver se é possivel dividir essa transacao muito grande em duas ou tres menores. Verifique tambem se vc consegue otimizar melhor seu scripts, tipo sub consultas dentro de selects que retornam muito dados. uma boa maneira de fazer isso é utilizando o studio mananger express, nele tem uma ferramente que analiza seu scritp te retornando em % qual do consumo de cada bloq de select count inner joins etc... espero ter ajudado Em 27/11/06, maniacapordelphi [EMAIL PROTECTED] escreveu: A primeira coisa q voce tem q saber é de onde vem a mensagem: do componente ADOConnection ou do Sql Server. Se for do ADO: No componente ADOConnection tem a propriedade ConnectionTime - set para 1000 Nos componente TADOquery e TADOStoredProc tem a propriedade CommandTime - set para 1000 Se for do Sql Server: Você tem q analisar a performance de todos os seus comandos através do Profile. Pode ser comandos mal projetados T+ Mani --- Em delphi-br@yahoogrupos.com.br delphi-br% 40yahoogrupos.com.br, Marcelo Alves delphigrupos@ escreveu Pessoal, Estou com uma bucha aqui pra resolver e preciso muito da ajuda do grupo... vamos lá.. No cliente onde trabalho, faço manutenção num sistema feito em D7 com Sql Server 2000. De uns dias pra cá, o sistema começou a dar timeout com bastante frequência e quando acontecia isso o DBA verificava via scripts que existia um processo bloqueando outro no sql server. Bom, quais foram meus passos para tentar descobrir qual é o problema até agora: 1 - revisei as principais rotinas que sempre travam e também as maiores e mais demoradas... num achei nenhum problema, mesmo porque essas rotinas sempre funcionaram muito bem. O Sistema já está em produção a mais ou menos 1 ano. 2 - estou revisando alguns códigos de acordo com alguns toques que recebi de uma pessoa de uma outra empresa que integra o sistema deles com o nosso, e que manja muito de sql server. Bom ele pediu para eu revisar os momentos em que abro transações no servidor.. Bom, tirei todas as aberturas de transação quando ao chamar procedures que fazem somente selects... e mantive somente nos momentos em que preciso alterar mais de uma tabela para garantir a integridade dos dados... Bom, nesse lugares que mantive as abertura de transações, o código fica assim: If adoSistema.InTransaction Then adoSistema.RollBackTrans ; adoSistema.BeginTrans; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_01' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 01 //Executa a SP Self.spGeral.ExecProc ; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_02' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 02 //Executa a SP Self.spGeral.ExecProc ; //Grava os Dados no bd adoSistema.CommitTrans ; Até aí vocês viram algum erro Bom, outra coisa, eu estive olhando algumas propriedades do TADOConection e gostaria de saber como vocês configuram para comparar com as minhas aqui... E nos casos de selects onde eu porderia usar tabelas temporárias.. existe alguma propriedade que faça com que meu componente adoQuery traga os dados sem bloquear a tabela??? Pois tenho casos onde a query fica aberta durante processos demorados e acho que isso está gerando travamento no banco... A minha maior dúvida é o que fazer para evitar esses travamentos no banco... Se puderem me ajudar ficarei muito grato... Marcelo. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [Meio Off] Algorítimo de menor c aminho.
Procure para Pascal ;) É fácil de achar... Atenciosamente, Leonardo Ribeiro Machado Desenvolvimento e Suporte [EMAIL PROTECTED] Lalur Informática Ltda www.lalur.com.br (51) 3541 - 3334 - Original Message - From: Fellipe Henrique To: delphi-br@yahoogrupos.com.br Sent: Monday, November 27, 2006 9:03 AM Subject: Re: [delphi-br] [Meio Off] Algorítimo de menor caminho. Olá Eduardo, realmente é de Dijkstra, e tem o de Lloyd, que me parece ser mais fácil, tentei achar para Delphi e não consegui, achei somente pra Java e C++.. mas como não sei disso, ficou meio dificil! :-) []s Em 27/11/06, Eduardo Paci Galvão [EMAIL PROTECTED] escreveu: Olá, Olá amigos, preciso desenvolver um protótipo para minha faculdade utilizando Algorítimo Genético e Simmulated Amnealing, para o problema do menor caminho. Pelo que sei, este é o algoritmo de Dijkstra. Tem centenas de referência na Internet... Saudações, Eduardo Paci Galvão Bacharel em Engenharia Elétrica - UFMG Analista de Sistemas www.egalvao.com.br -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.1.409 / Virus Database: 268.14.17/553 - Release Date: 27/11/2006 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Andamento do Site.
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Mensagem de Erro
Estou enfrentando problemas com a mensagem EOutOfResource. Eu pesquisei na internet e descobri que quando o programa tenta alocar memória e não consegue dá essa mensagem. O interessante é que não é constante, as vezes acontece e as vezes não. Como posso descobrir uma vez que só acontece no cliente? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Problema Grave com Timeout - Urgente
Cara, Quanto tive esse problema, recriava o indice clustered da tabela que tava causando o timeout... e fica ok... Não sei se é o seu caso... att, Leandro - Original Message - From: Marcelo Alves To: delphi-br@yahoogrupos.com.br Sent: Monday, November 27, 2006 2:30 PM Subject: [delphi-br] Re: Problema Grave com Timeout - Urgente Bom, quanto a quebrar em várias transações menores, não tenho como fazer isso uma vez que devo manter a integridade dos dados gravados. Aumentei o connectiontimeout para 1000 conforme sugeriram abaixo... Agora e quanto às outras propriedades??? Não tem mais nada que devo me preocupar para evitar esses travamentos? Obrigado até agora gente. Att, Marcelo --- Em delphi-br@yahoogrupos.com.br, Gabriel Filho [EMAIL PROTECTED] escreveu Uma dica qdo vc usa o transaction no adoconection, a tabela é bloqueada automáticamente, entaum como vc disse que tem operacoes que demoram muito pra ser processadas, analise, para ver se é possivel dividir essa transacao muito grande em duas ou tres menores. Verifique tambem se vc consegue otimizar melhor seu scripts, tipo sub consultas dentro de selects que retornam muito dados. uma boa maneira de fazer isso é utilizando o studio mananger express, nele tem uma ferramente que analiza seu scritp te retornando em % qual do consumo de cada bloq de select count inner joins etc... espero ter ajudado Em 27/11/06, maniacapordelphi [EMAIL PROTECTED] escreveu: A primeira coisa q voce tem q saber é de onde vem a mensagem: do componente ADOConnection ou do Sql Server. Se for do ADO: No componente ADOConnection tem a propriedade ConnectionTime - set para 1000 Nos componente TADOquery e TADOStoredProc tem a propriedade CommandTime - set para 1000 Se for do Sql Server: Você tem q analisar a performance de todos os seus comandos através do Profile. Pode ser comandos mal projetados T+ Mani --- Em delphi-br@yahoogrupos.com.br delphi-br% 40yahoogrupos.com.br, Marcelo Alves delphigrupos@ escreveu Pessoal, Estou com uma bucha aqui pra resolver e preciso muito da ajuda do grupo... vamos lá.. No cliente onde trabalho, faço manutenção num sistema feito em D7 com Sql Server 2000. De uns dias pra cá, o sistema começou a dar timeout com bastante frequência e quando acontecia isso o DBA verificava via scripts que existia um processo bloqueando outro no sql server. Bom, quais foram meus passos para tentar descobrir qual é o problema até agora: 1 - revisei as principais rotinas que sempre travam e também as maiores e mais demoradas... num achei nenhum problema, mesmo porque essas rotinas sempre funcionaram muito bem. O Sistema já está em produção a mais ou menos 1 ano. 2 - estou revisando alguns códigos de acordo com alguns toques que recebi de uma pessoa de uma outra empresa que integra o sistema deles com o nosso, e que manja muito de sql server. Bom ele pediu para eu revisar os momentos em que abro transações no servidor.. Bom, tirei todas as aberturas de transação quando ao chamar procedures que fazem somente selects... e mantive somente nos momentos em que preciso alterar mais de uma tabela para garantir a integridade dos dados... Bom, nesse lugares que mantive as abertura de transações, o código fica assim: If adoSistema.InTransaction Then adoSistema.RollBackTrans ; adoSistema.BeginTrans; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_01' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 01 //Executa a SP Self.spGeral.ExecProc ; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_02' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 02 //Executa a SP Self.spGeral.ExecProc ; //Grava os Dados no bd adoSistema.CommitTrans ; Até aí vocês viram algum erro Bom, outra coisa, eu estive olhando algumas propriedades do TADOConection e gostaria de saber como vocês configuram para comparar com as minhas aqui... E nos casos de selects onde eu porderia usar tabelas temporárias.. existe alguma propriedade que faça com que meu componente adoQuery traga os dados sem bloquear a tabela??? Pois tenho casos onde a query fica aberta durante processos demorados e acho que isso está gerando travamento no banco... A minha maior dúvida é o que fazer para evitar esses travamentos no banco... Se puderem me ajudar ficarei muito grato... Marcelo.
Re: [delphi-br] Re: Problema Grave com Timeout - Urgente
só mais uma coisa, definindo o CommandTimeout = 1000; vc esta dizendo q vai aguardar 1000 segundos pela resposta do servidor, se por acaso na hora em q vc for conectar o serividor estiver indisponível, sua aplicação ficará travada aguardando durante 1000 segundos. Tome cuidado. Em 27/11/06, Leandro [EMAIL PROTECTED] escreveu: Cara, Quanto tive esse problema, recriava o indice clustered da tabela que tava causando o timeout... e fica ok... Não sei se é o seu caso... att, Leandro - Original Message - From: Marcelo Alves To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, November 27, 2006 2:30 PM Subject: [delphi-br] Re: Problema Grave com Timeout - Urgente Bom, quanto a quebrar em várias transações menores, não tenho como fazer isso uma vez que devo manter a integridade dos dados gravados. Aumentei o connectiontimeout para 1000 conforme sugeriram abaixo... Agora e quanto às outras propriedades??? Não tem mais nada que devo me preocupar para evitar esses travamentos? Obrigado até agora gente. Att, Marcelo --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, Gabriel Filho [EMAIL PROTECTED] escreveu Uma dica qdo vc usa o transaction no adoconection, a tabela é bloqueada automáticamente, entaum como vc disse que tem operacoes que demoram muito pra ser processadas, analise, para ver se é possivel dividir essa transacao muito grande em duas ou tres menores. Verifique tambem se vc consegue otimizar melhor seu scripts, tipo sub consultas dentro de selects que retornam muito dados. uma boa maneira de fazer isso é utilizando o studio mananger express, nele tem uma ferramente que analiza seu scritp te retornando em % qual do consumo de cada bloq de select count inner joins etc... espero ter ajudado Em 27/11/06, maniacapordelphi [EMAIL PROTECTED] escreveu: A primeira coisa q voce tem q saber é de onde vem a mensagem: do componente ADOConnection ou do Sql Server. Se for do ADO: No componente ADOConnection tem a propriedade ConnectionTime - set para 1000 Nos componente TADOquery e TADOStoredProc tem a propriedade CommandTime - set para 1000 Se for do Sql Server: Você tem q analisar a performance de todos os seus comandos através do Profile. Pode ser comandos mal projetados T+ Mani --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br, Marcelo Alves delphigrupos@ escreveu Pessoal, Estou com uma bucha aqui pra resolver e preciso muito da ajuda do grupo... vamos lá.. No cliente onde trabalho, faço manutenção num sistema feito em D7 com Sql Server 2000. De uns dias pra cá, o sistema começou a dar timeout com bastante frequência e quando acontecia isso o DBA verificava via scripts que existia um processo bloqueando outro no sql server. Bom, quais foram meus passos para tentar descobrir qual é o problema até agora: 1 - revisei as principais rotinas que sempre travam e também as maiores e mais demoradas... num achei nenhum problema, mesmo porque essas rotinas sempre funcionaram muito bem. O Sistema já está em produção a mais ou menos 1 ano. 2 - estou revisando alguns códigos de acordo com alguns toques que recebi de uma pessoa de uma outra empresa que integra o sistema deles com o nosso, e que manja muito de sql server. Bom ele pediu para eu revisar os momentos em que abro transações no servidor.. Bom, tirei todas as aberturas de transação quando ao chamar procedures que fazem somente selects... e mantive somente nos momentos em que preciso alterar mais de uma tabela para garantir a integridade dos dados... Bom, nesse lugares que mantive as abertura de transações, o código fica assim: If adoSistema.InTransaction Then adoSistema.RollBackTrans ; adoSistema.BeginTrans; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_01' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 01 //Executa a SP Self.spGeral.ExecProc ; self.spGeral.Close ; Self.spGeral.ProcedureName := 'NOME_PROCEDURE_02' ; self.spGeral.Parameters.Refresh; //PASSO TODOS OS PARÂMETROS DA PROCEDURE 02 //Executa a SP Self.spGeral.ExecProc ; //Grava os Dados no bd adoSistema.CommitTrans ; Até aí vocês viram algum erro Bom, outra coisa, eu estive olhando algumas propriedades do TADOConection e gostaria de saber como vocês configuram para comparar com as minhas aqui... E nos casos de selects onde eu porderia usar tabelas temporárias.. existe alguma propriedade que faça com que meu componente adoQuery traga os dados sem bloquear a tabela??? Pois tenho casos onde a query fica
[delphi-br] Comparação de Base
Preciso comparar bases de dados Oracle. Afim de descobrir a diferença de campo em tabelas, de tamanhos/tipos de campo. Alguém têm alguma idéia de como posso fazer isso. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Mensagem de Erro
Primeiro, qual o Sistema Operacional que o Cliente usa? Em 27/11/06, Luciano Alves de Oliveira [EMAIL PROTECTED] escreveu: Estou enfrentando problemas com a mensagem EOutOfResource. Eu pesquisei na internet e descobri que quando o programa tenta alocar memória e não consegue dá essa mensagem. O interessante é que não é constante, as vezes acontece e as vezes não. Como posso descobrir uma vez que só acontece no cliente? [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Marcos P. Miranda Souza está convidando você para usar o Yahoo! Messenge r!
desculpas por nao atender ao chamada antes, faça gentiliza de informar natureza do contato e se ainda e possivel nos reunirmos via net Carlos [EMAIL PROTECTED] escreveu: Marcos P. Miranda Souza gostaria de falar com você usando o novo Yahoo! Messenger: Aceite o convite clicando nesse link: http://invite.msg.yahoo.com/invite?op=acceptintl=brsig=UR9_kjauXhUtnSEqKi_yFkvQI0n.fWf23xeCSBgm8N.AypLe5bmLXhv7rLfL_TfJM.plibYi4ka2nDx1CYKfSxPrXxzufLk6sJ3sE56ZkF0F5_tGkZDVWZKffLAz3_QjVeJMjUHBZqWLcR.ZIWkpqo6C3lphmuk4VCRt Com o Yahoo! Messenger você tem: Faça ligações gratuitas para o mundo todo.* Você só precisa de um microfone e caixinhas de som. Se a pessoa não estiver disponível você pode deixar recado na forma de uma mensagem de voz! Compartilhamento fácil de fotos. Basta arrastar e soltar o arquivo de foto na janela de mensagem para que seu amigo possa ver a foto também. Opções de invisibilidade. Você pode controlar quem tem permissão para te ver online ou offline. O que você está esperando? É totalmente grátis. Instale o Yahoo! Messenger e comece a se conectar com seus amigos da forma que preferir, quando quiser. ** Chamadas grátis para outros computadores referem-se apenas às ligações feitas através da Internet e é necessário que você providencie o seu acesso à Internet. [As partes desta mensagem que não continham texto foram removidas] - O Yahoo! está de cara nova. Venha conferir! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Enviar PageDown a um Grid
Olá amigos, eu preciso enviar um comando PageDown a um dbGrid. Bem, eu sei que o Virtual Key Code do pageDown é VK_NEXT e, também sei que o comando para enviar mensagem pela API é o PostMessage.. Então, coloquei PostMessage(dbGrid.Handle, VK_NEXT, 0, 0); E, não está funcionando... Alguém tem uma idéia? Obrigado
RE: [delphi-br] Enviar PageDown a um Grid
Tenta isto aqui: dbGrid.SetFocus; dbGrid.Perform(WM_KEYDOWN, VK_NEXT, 1); dbGrid.Perform(WM_KEYUP, VK_NEXT, 0); Sds. From: Marcio Cruz [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Enviar PageDown a um Grid Date: Mon, 27 Nov 2006 18:39:18 -0200 Olá amigos, eu preciso enviar um comando PageDown a um dbGrid. Bem, eu sei que o Virtual Key Code do pageDown é VK_NEXT e, também sei que o comando para enviar mensagem pela API é o PostMessage.. Então, coloquei PostMessage(dbGrid.Handle, VK_NEXT, 0, 0); E, não está funcionando... Alguém tem uma idéia? Obrigado _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br
RES: [Bulk] [delphi-br] Problemas com IdFTP
Helton Tente ver o modo...Ativo/Passivotive problemas com isto.. Atenc; Elazar -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Helton Enviada em: segunda-feira, 27 de novembro de 2006 10:32 Para: Lista delphi Assunto: [Bulk] [delphi-br] Problemas com IdFTP Pessoal Montei uma pequena aplicação para q seja feita transferencia de dados com um servidor. Durante os testes utilizei o ftp da matrix (ftp.trix.net) e tudo funcionou legal, consegui conectar, enviar e baixar os arquivos. Depois de pronto fui configurar para usar o servidor de meu cliente (locaweb) mas não funcionou, e para surpresa total utilizando um software de ftp funciona perfeitamente. Existe alguma configuração q tenha q ser feita no componente para este servidor? []´s -- Hélton R. Nunes [EMAIL PROTECTED] ___ Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas ! http://br.answers.yahoo.com/
RES: [delphi-br] Main Menu dinamico
Amigo boa tarde; Crie uma procedure do tipo procedure AlgumaCoisa(Sender : TObject); e ajuste o evento onclick do menu quando criar o mesmo. NewItem.OnClick := AlgumaCoisa; -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Wildner B. Ferreira Enviada em: segunda-feira, 27 de novembro de 2006 09:08 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Main Menu dinamico Ola pessoal, Estou precisando de uma ajuda de vocês, pois estou tentando acrescenta um novo item a um Mainmenu em tempo de execução mas estou com uma dificuldade, pois estou conseguindo acrescenta normalmente o menu em tempo de execução , so que não estou sabendo como fazer para estar definindo qual a função que será executada quando o usuário clicar no menu. Segue abaixo o cogigo que estamos utilizando para criar o menu. procedure Menuextra; var NewItem: TMenuItem; begin // Ler o itens que fazerao parte do menu dm_dados.Q_ConExterna.close; dm_dados.q_conExterna.Open; frm_principal.ConexesExternas1.Clear; While Not dm_dados.Q_ConExterna.Eof do begin // Cria o item do Menu e depois inclui o mesmo // NewItem := TMenuItem.Create(Frm_Principal); NewItem.Caption := dm_dados.Q_ConExterna['Descricao']; frm_principal.ConexesExternas1.Add(NewItem); dm_dados.Q_ConExterna.Next; end; end; Conto com ajuda dos experts no assunto. [As partes desta mensagem que não continham texto foram removidas] ___ O Yahoo! está de cara nova. Venha conferir! http://br.yahoo.com
[delphi-br] Off-Topicc - Roteador
Pessoal, ta for a da discussão DA lista, mas preciso saber se alguém conhece algum roteador que de para ligar dois link's ADSL. Possuo duas redes com um link cada um, e estou querendo fazer só uma rede, usando um roteador para ligar as duas ADSL somando a banda, alguém sabe de algum roteador que faça isso no ADSL DA Brasil Telecom? Abraços Charles A. Chiodi HNS Informatica [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Comparação de Base
Esta mensagem do SERVIÇO FEDERAL DE PROCESSAMENTO DE DADOS (SERPRO), empresa pública federal regida pelo disposto na Lei Federal nº 5.615, é enviada exclusivamente a seu destinatário e pode conter informações confidenciais, protegidas por sigilo profissional. Sua utilização desautorizada é ilegal e sujeita o infrator às penas da lei. Se você a recebeu indevidamente, queira, por gentileza, reenviá-la ao emitente, esclarecendo o equívoco. This message from SERVIÇO FEDERAL DE PROCESSAMENTO DE DADOS (SERPRO) -- a government company established under Brazilian law (5.615/70) -- is directed exclusively to its addressee and may contain confidential data, protected under professional secrecy rules. Its unauthorized use is illegal and may subject the transgressor to the law's penalties. If you're not the addressee, please send it back, elucidating the failure. [As partes desta mensagem que não continham texto foram removidas]