Re: [delphi-br] TTimer (Interval) - Opinião de voc ês...
Olá! Eu, particularmente, não gosto do TTimer. Prefiro, para todo e qualquer tipo de processamento paralelo o uso de Thread. O TTimer não é uma thread. O TTimer na verdade recebe uma mensagem do Windows. http://eugostododelphi.blogspot.com/search?q=TTImer [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Rede Lenta
Bom dia Luciano, Sei que vc receberá várias sugestões, mas seguem as minhas: 1º) Se seu banco é firebird, eu sugiro um servidor dedicado pra ele, de preferência um linux, onde o FB tem apresentado uma performance diferenciada. Mas eu particularmente o utilizo em um servidor windows 2003 server sem nenhum problema. 2º) Acredito que seu problema de lentidão esteja mais relacionado a esse executável trafegando, além dos dados, esses 25 mb pela rede. Mas como acredito que o aplicativo seja de terceiros, não acredito que eles aceitem com muita boa vontade a idéia de uma versão cliente servidor ou três camadas. Tenho motivos para acreditar que seguindo a primeira sugestão sua performance deve melhorar, mas não ao nível ideal. 3º) Em todo caso ainda sugiro a nível de servidor: Sistema operacional windows 2003 server, mais memória e, vc não falou mas vai assim mesmo: um disco rígido rápido. Não sei se as mudanças na estrutura de rede possam te dar muito ganho de performance, mas se não pode mudar o conceito do aplicativo, já é alguma coisa. Espero ter te ajudado. l_o_angelini escreveu: Boa Tarde a todos Estou com a seguinte caso, tem um rede local com um servidor, nele roda o FireBird 2.1, esta instalado o sistema de contabilidade publica, nessa rede tem 12 maquinas que acessa, o sistema funciona dessa forma, é criado um atalho nas maquinas cliente do executavel que esta no servidor, esse executavel tem aproximadamente 25 mb, a rede tem dois hub(a rede fica num predio, um hub embaixo e outro em cima), sendo os hub e as placas 10/100, de uns tempos pra ca a rede esta ficando lenta quanto executa o atalho, gostaria de saber se trocasse os hub´s e as placa para 10/100/1000 resolveria esse problema ou a mudança não faria tanta diferença, ia me esquecendo a configuração do Servidor: Intel Core 2 Duo E6400 2.13 ghz, MB Asus P5W DH Deluxe, 2 mb memoria DDR2 667 mhz, Windows XP SP3 -- []’s. Evandro Siqueira Programador de Sistemas L’essentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel -- 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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Res: [delphi-br] Rede Lenta
Bom dia a todos! Já trabalhei com FB num sistema de rastreamento de veículos onde o banco recebia informações a cada milesimos de segundos... Então, além dessas dicas que o Evandro deu, sugiro também que o banco sofra manutenção pelo menos uma vez por semana... quando se faz o backup (mesmo esse sendo extremamente lento de executar) ele dá uma melhorada no desempenho do banco. De: Evandro Siqueira vans...@gmail.com Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 3 de Julho de 2009 7:20:08 Assunto: Re: [delphi-br] Rede Lenta Bom dia Luciano, Sei que vc receberá várias sugestões, mas seguem as minhas: 1º) Se seu banco é firebird, eu sugiro um servidor dedicado pra ele, de preferência um linux, onde o FB tem apresentado uma performance diferenciada. Mas eu particularmente o utilizo em um servidor windows 2003 server sem nenhum problema. 2º) Acredito que seu problema de lentidão esteja mais relacionado a esse executável trafegando, além dos dados, esses 25 mb pela rede. Mas como acredito que o aplicativo seja de terceiros, não acredito que eles aceitem com muita boa vontade a idéia de uma versão cliente servidor ou três camadas. Tenho motivos para acreditar que seguindo a primeira sugestão sua performance deve melhorar, mas não ao nível ideal. 3º) Em todo caso ainda sugiro a nível de servidor: Sistema operacional windows 2003 server, mais memória e, vc não falou mas vai assim mesmo: um disco rígido rápido. Não sei se as mudanças na estrutura de rede possam te dar muito ganho de performance, mas se não pode mudar o conceito do aplicativo, já é alguma coisa. Espero ter te ajudado. l_o_angelini escreveu: Boa Tarde a todos Estou com a seguinte caso, tem um rede local com um servidor, nele roda o FireBird 2.1, esta instalado o sistema de contabilidade publica, nessa rede tem 12 maquinas que acessa, o sistema funciona dessa forma, é criado um atalho nas maquinas cliente do executavel que esta no servidor, esse executavel tem aproximadamente 25 mb, a rede tem dois hub(a rede fica num predio, um hub embaixo e outro em cima), sendo os hub e as placas 10/100, de uns tempos pra ca a rede esta ficando lenta quanto executa o atalho, gostaria de saber se trocasse os hub´s e as placa para 10/100/1000 resolveria esse problema ou a mudança não faria tanta diferença, ia me esquecendo a configuração do Servidor: Intel Core 2 Duo E6400 2.13 ghz, MB Asus P5W DH Deluxe, 2 mb memoria DDR2 667 mhz, Windows XP SP3 -- []’s. Evandro Siqueira Programador de Sistemas L’essentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Passar parametro para aplicação
Bom dia a todos, alguem pode me dizer como faço para passar um parâmetro para uma aplicação em Delphi7? Estou fazendo um programa para enviar um email, este programa será executado a partir de um arquivo de lot (.bat) e quero passar o valor que esta em uma variável de ambiente, deu pra vc entenderem?? Tipo assim: aplicação.exe %1 Já deu uma vasculhada no Google, mais só achei passagem de parâmetros dentro de aplicações. Obrigado
Re: [delphi-br] Passar parametro para aplicação
Basta voce chamar o programa passando o parametro, assim: c:\programa_em_delphi7.exe parametro.txt 2009/7/3 Vinicius vinic...@cnen.gov.br Bom dia a todos, alguem pode me dizer como faço para passar um parâmetro para uma aplicação em Delphi7? Estou fazendo um programa para enviar um email, este programa será executado a partir de um arquivo de lot (.bat) e quero passar o valor que esta em uma variável de ambiente, deu pra vc entenderem?? Tipo assim: aplicação.exe %1 Já deu uma vasculhada no Google, mais só achei passagem de parâmetros dentro de aplicações. Obrigado [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Rede Lenta
Bom dia Concordo com tudo o que o Evandro disse. Não trabalho mais com Firebird, mas há um tempo atrás quando ainda trabalhava, realmente vimos que em servidores Linux dedicados sua performance era bem superior. Porém sempre trabalhei também com servidores Win2000 e Win2003, sem problemas, até o momento que surgiram os DualCore, Core2Duo e servidores multiprocessados nos nossos clientes. Depois de bastante pesquisa na época encontramos documentações a respeito do problema, onde se dizia que o Firebird tinha mesmo alguns problemas de performance em ambientes multiprocessados ou multi core. Após o caso da nossa empresa, vi a mesma coisa acontecer com outros colegas. E como você citou que o servidor é um Core2Duo, não custa pesquisar sobre o tunning do banco pra ver se tem algo a ver com este assunto. O pessoal da lista que trabalha com Firebird hoje pode falar melhor sobre o assunto, já que estão mais atualizados que eu neste caso. Estou apenas passando uma experiência pessoal. Outra coisa, é a estrutura da rede mesmo. Você disse que tem dois hubs. Primeiro que existe uma grande diferença entre HUB e SWITCH. Se puder escolha sempre o segundo. Outra coisa é que a marca nesse caso dá muita diferença. Por exemplo, um switch 3COM vai custar o dobro de qualquer outro, mas está anos-luz a frente em performance. E também, não sei qual a estrutura de rede usada pra ligar os dois hubs com o servidor, se estão em série ou não, mas você pode optar por switchs que tenham pelo menos uma porta Gibabyte e usar esta porta para o uplink. Dessa forma as máquina ficam a 100 e os switchs entre eles a 1000. Principalmente se você puder colocar um switch pequeno de 1000 só para ligar os outros switchs que tiver na rede. Assim não cascateia um no outro e toda a rede de switchs fica a 1000. Coloque uma placa 1000 no servidor também. E as máquinas vão em cada switch que tiver na rede a 100. Tem-se que levar em consideração a questão da inicialização do sistema, pois esses 25mb do executável vão correr na rede toda a vez que executar o sistema. Como fazem lá? Ficam abrindo e fechando o sistema constantemente? Ou abrem e deixam o dia todo? Mas o mais importante é ver a partir de quando começou a lentidão... houve algum fato especial? Troca de máquina, atualização de sistema, mudança de SO, versão de BD??? Abraço. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Evandro Siqueira Enviada em: sexta-feira, 3 de julho de 2009 07:20 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Rede Lenta Bom dia Luciano, Sei que vc receberá várias sugestões, mas seguem as minhas: 1º) Se seu banco é firebird, eu sugiro um servidor dedicado pra ele, de preferência um linux, onde o FB tem apresentado uma performance diferenciada. Mas eu particularmente o utilizo em um servidor windows 2003 server sem nenhum problema. 2º) Acredito que seu problema de lentidão esteja mais relacionado a esse executável trafegando, além dos dados, esses 25 mb pela rede. Mas como acredito que o aplicativo seja de terceiros, não acredito que eles aceitem com muita boa vontade a idéia de uma versão cliente servidor ou três camadas. Tenho motivos para acreditar que seguindo a primeira sugestão sua performance deve melhorar, mas não ao nível ideal. 3º) Em todo caso ainda sugiro a nível de servidor: Sistema operacional windows 2003 server, mais memória e, vc não falou mas vai assim mesmo: um disco rígido rápido. Não sei se as mudanças na estrutura de rede possam te dar muito ganho de performance, mas se não pode mudar o conceito do aplicativo, já é alguma coisa. Espero ter te ajudado. l_o_angelini escreveu: Boa Tarde a todos Estou com a seguinte caso, tem um rede local com um servidor, nele roda o FireBird 2.1, esta instalado o sistema de contabilidade publica, nessa rede tem 12 maquinas que acessa, o sistema funciona dessa forma, é criado um atalho nas maquinas cliente do executavel que esta no servidor, esse executavel tem aproximadamente 25 mb, a rede tem dois hub(a rede fica num predio, um hub embaixo e outro em cima), sendo os hub e as placas 10/100, de uns tempos pra ca a rede esta ficando lenta quanto executa o atalho, gostaria de saber se trocasse os hub´s e as placa para 10/100/1000 resolveria esse problema ou a mudança não faria tanta diferença, ia me esquecendo a configuração do Servidor: Intel Core 2 Duo E6400 2.13 ghz, MB Asus P5W DH Deluxe, 2 mb memoria DDR2 667 mhz, Windows XP SP3 -- []s. Evandro Siqueira Programador de Sistemas Lessentiel Lingerie (79) 3254-5511 Ramal 218 skype: evandro.lessentiel -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Re: [delphi-br] Passar parametro para aplicação
tente apertar f1 no delphi busque por Command line utilities º.·´¯`·. º.·´¯`·. º.·´¯`·. Omar L. M. Rosa º.·´¯`·. º.·´¯`·. º.·´¯`·. o...@conesul.inf.br - Original Message - From: Vinicius To: delphi-br@yahoogrupos.com.br Sent: Friday, July 03, 2009 8:47 AM Subject: [delphi-br] Passar parametro para aplicação Bom dia a todos, alguem pode me dizer como faço para passar um parâmetro para uma aplicação em Delphi7? Estou fazendo um programa para enviar um email, este programa será executado a partir de um arquivo de lot (.bat) e quero passar o valor que esta em uma variável de ambiente, deu pra vc entenderem?? Tipo assim: aplicação.exe %1 Já deu uma vasculhada no Google, mais só achei passagem de parâmetros dentro de aplicações. Obrigado [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] TTimer (Interval) - Opinião de vocês...
Mandou bem, Zé Mário! É isso aí! Sds. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de José Mário Silva Guedes Enviada em: sexta-feira, 3 de julho de 2009 05:19 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] TTimer (Interval) - Opinião de vocês... Olá! Eu, particularmente, não gosto do TTimer. Prefiro, para todo e qualquer tipo de processamento paralelo o uso de Thread. O TTimer não é uma thread. O TTimer na verdade recebe uma mensagem do Windows. http://eugostododelphi.blogspot.com/search?q=TTImer [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Informe total de registros no label - Paradox
Label.Caption:=IntToStr((SuaTabela.RecordCount) Espero que seja isso. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de nillgolv Enviada em: quinta-feira, 2 de julho de 2009 20:21 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Informe total de registros no label - Paradox Preciso deixar um Label no form principal com informação do total de registros de uma tabela em paradox. Que sempre atualize após editar alguns registros. Grato. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] TTimer (Interval) - Opinião de voc ês...
*Olá companheiro, Desculpe enviar diretamente em PVT. Não consigo enviar para a lista, ou está com problemas hoje ou meu gerenciador de email não consegue enviar para a lista, mas para qualquer outro email eu consigo. Isso aconteceu hoje cedo. Sobre o TTiomer, você disse preferir usar uma Thread. O amigo poderia me dizer como eu faria para ele ficar contando e após 24 horas me retornar que se passou um dia que o programa está em execução? Grato. P.S. - Pode enviar a resposta para a lista, até porque fica registrado lá para outras pessoas.* * ** * *--* * * EmbarcaDelphi, ao iniciar a thread, você poderia armazenar em uma variavel o momento do inicio do programa e no Execute da Thread usar a função HoursBetween, algo mais ou menos assim: //... dtStarted := Now; while not (Self.Terminated) do begin if (HoursBetween(Now,dtStarted) = 24) then begin //Alguma coisa end; end; [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Licença Delphi 7
Bom dia amigos! Tenho uma cópia do Delphi 7 pirata, porém desejo licenciar essa minha versão, uma vez que tenho desenvolvido projetos nesta. Vocês sabem me dizer se eu consigo isso? Ou eu só conseguirei comprar uma versão atual do Delphi? Marcos
Res: [delphi-br] Passar parametro para aplicação
Voce pode utilizar o ParamCount e ParamStr para obter os parametros passados pelo arquivo bat. Atenc; Elazar Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Licença Delphi 7
Voce pode comprar diretamente sua licença no telefone 11-2165-8015 e falar com a Daniele, ou via email dl...@borland.commailto:dl...@borland.com Abs BL From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On Behalf Of Marcos Vinicius Sent: sexta-feira, 3 de julho de 2009 10:54 To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Licença Delphi 7 Bom dia amigos! Tenho uma cópia do Delphi 7 pirata, porém desejo licenciar essa minha versão, uma vez que tenho desenvolvido projetos nesta. Vocês sabem me dizer se eu consigo isso? Ou eu só conseguirei comprar uma versão atual do Delphi? Marcos [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Licença Delphi 7
Obrigado pela ajuda amigo! Atenciosamente, Marcos De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Bruno Lichot Enviada em: sexta-feira, 3 de julho de 2009 10:57 Para: delphi-br@yahoogrupos.com.br Assunto: RE: [delphi-br] Licença Delphi 7 Voce pode comprar diretamente sua licença no telefone 11-2165-8015 e falar com a Daniele, ou via email dl...@borland.com mailto:dlima%40borland.com mailto:dl...@borland.com mailto:dlima%40borland.com Abs BL From: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ] On Behalf Of Marcos Vinicius Sent: sexta-feira, 3 de julho de 2009 10:54 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Subject: [delphi-br] Licença Delphi 7 Bom dia amigos! Tenho uma cópia do Delphi 7 pirata, porém desejo licenciar essa minha versão, uma vez que tenho desenvolvido projetos nesta. Vocês sabem me dizer se eu consigo isso? Ou eu só conseguirei comprar uma versão atual do Delphi? Marcos [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Data e Hora de Arquivos
Boa tarde pessoal... Estou todo enrolado no trabalho com datas e horas, conversão, etc... Utilizei EncodeData,EncodeTime,FormatDateTime e não consigo criar uma situação como o caso abaixo. Tenho uma função que altera a data e a hora de um arquivo (funcionando). vData := (Now + 30); // 30 dias após a data atual vHora := EncodeTime(00, 00, 0, 0); // A hora DEVE ficar 00:00:00 Como faço para alocar numa variável do tipo TDateTime as duas situações acima? Como disse no início, já tentei com diversos tipos e quando testava com um ShowMessage(DateToStr(variavel)); não funcionava, a desgraçada da hora mostrava SEMPRE a hora atual, é o inferno isso! Quero que fique a data que está na variável vData e a hora que está na variável vHora. Ambos numa só variável do tipo TDateTime. Grato
RE: [delphi-br] Data e Hora de Arquivos
Use Date em vez de Now: procedure TForm1.Button1Click(Sender: TObject); var myTime, myDate: TDateTime; begin myDate:= Date + 30; myTime:= EncodeTime(0, 0, 0, 0); showmessage(DateTimeToStr(myDate) + ' ' + TimeToStr(myTime)); end; Ou poderia utilizar FormatDateTime? Att Steve -Original Message- From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]on Behalf Of embarcadelphi Sent: 03 July 2009 17:02 To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Data e Hora de Arquivos Boa tarde pessoal... Estou todo enrolado no trabalho com datas e horas, conversão, etc... Utilizei EncodeData,EncodeTime,FormatDateTime e não consigo criar uma situação como o caso abaixo. Tenho uma função que altera a data e a hora de um arquivo (funcionando). vData := (Now + 30); // 30 dias após a data atual vHora := EncodeTime(00, 00, 0, 0); // A hora DEVE ficar 00:00:00 Como faço para alocar numa variável do tipo TDateTime as duas situações acima? Como disse no início, já tentei com diversos tipos e quando testava com um ShowMessage(DateToStr(variavel)); não funcionava, a desgraçada da hora mostrava SEMPRE a hora atual, é o inferno isso! Quero que fique a data que está na variável vData e a hora que está na variável vHora. Ambos numa só variável do tipo TDateTime. Grato *** This e-mail and any files transmitted with it are confidential. If you are not the intended recipient, any reading, printing, storage, disclosure, copying or any other action taken in respect of this e-mail is prohibited and may be unlawful. If you are not the intended recipient, please notify the sender immediately by using the reply function and then permanently delete what you have received. Content of emails received by this Trust will be subject to disclosure under the Freedom of Information Act 2000, subject to the specified exemptions, including the Data Protection Act 1998 and Caldicott Guardian principles. This footnote also confirms that, unless otherwise stated, this email message has been swept by Sophos Anti-virus for the presence of computer viruses. ***
Re: [delphi-br] Data e Hora de Arquivos
Já passei por situação parecida e solucionei dando um DecodeDate em vDaya, dando um EncodeDateTime depois, entendeu? [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [OFF] Curiosidades da lista Delphi-BR
Olá pessoal, esse off é só para o pessoal saber sobre o histórico da lista Delphi-BR. Parece que não tenho o que fazer, rsrsrs. Fiquei curioso e fui pesquisar no site do Yahoo. Pode servir até para colocar em Blogs de curiosidades, agora resta saber de qual lista a Delphi-BR foi clonada, rsrsrs. Leia até o fim para saber sobre isso. A lista Delphi-BR iniciou em Abril/1999 com 922 mensagens, o record do mês foi de 3208 mensagens, ocorreu em Outubro/2003. Neste momento que escrevo, existem um total de 202.173 mensagens. Desde janeiro de 2009 temos um total de 5026 mensagens. Está abaixo da média, comparado pelos anos anteriores (temos de postar mais dúvidas e respostas, rsrsrs). A primeira mensagem da lista foi escrita por sehnem cujo assunto foi: codigo de tecla em delphi/api O texto da mensagem: qual a Wk_ ou vk_ correspondente a tecla com o simbolo do windows dos teclados mais modernos. parabens ao clonador de listas, pela iniciativa, e por me incluir. - Imagino que esta é a maior lista de Delphi existente no idioma português-Br, ainda bem que estou cadastrado nela. Endereços de e-mail do grupo: Link relacionado: http://delphi-br.org/ Enviar mensagem:delphi-br@yahoogrupos.com.br Entrar no grupo:delphi-br-subscr...@yahoogrupos.com.br Sair do grupo: delphi-br-unsubscr...@yahoogrupos.com.br Proprietário da lista: delphi-br-ow...@yahoogrupos.com.br blz
RE: [delphi-br] [OFF] Curiosidades da lista Delphi-BR
Comparando os seus totais com os da Delphi-en voce pode ver quanto o Delphi eh suportado em Brasil (em comparacao com Inglaterra) ! -Original Message- From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]on Behalf Of embarcadelphi Sent: 03 July 2009 17:43 To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] [OFF] Curiosidades da lista Delphi-BR Imagino que esta é a maior lista de Delphi existente no idioma português-Br, ainda bem que estou cadastrado nela. blz *** This e-mail and any files transmitted with it are confidential. If you are not the intended recipient, any reading, printing, storage, disclosure, copying or any other action taken in respect of this e-mail is prohibited and may be unlawful. If you are not the intended recipient, please notify the sender immediately by using the reply function and then permanently delete what you have received. Content of emails received by this Trust will be subject to disclosure under the Freedom of Information Act 2000, subject to the specified exemptions, including the Data Protection Act 1998 and Caldicott Guardian principles. This footnote also confirms that, unless otherwise stated, this email message has been swept by Sophos Anti-virus for the presence of computer viruses. ***
[delphi-br] Alerta do MSN no Delphi
boa tarde, tenho uma aplicação que precisa alertar ao usuário quantos relatórios estão pendentes, entao eu pensei nos alertas do MSN , procurei na web e achei isso: http://www.codigofonte.net/dicas/delphi/197_simulando-os-alertas-do-msn-no-delphi rodou beleza .. porem quando eu aperto novamente o botao, surge esse erro: Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. alguem sabe o que poderia ser ??? ps.: usando Delphi 7 []s ___ Att, Felipe Milagres Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com
Re: [delphi-br] Alerta do MSN no Delphi
Ja viu este componente? http://cc.embarcadero.com/Item.aspx?id=23603 2009/7/3 Felipe Milagres felipe_a_milag...@yahoo.com.br: boa tarde, tenho uma aplicação que precisa alertar ao usuário quantos relatórios estão pendentes, entao eu pensei nos alertas do MSN , procurei na web e achei isso: http://www.codigofonte.net/dicas/delphi/197_simulando-os-alertas-do-msn-no-delphi rodou beleza .. porem quando eu aperto novamente o botao, surge esse erro: Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. alguem sabe o que poderia ser ??? ps.: usando Delphi 7 []s __ Att, Felipe Milagres __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com
[delphi-br] Re: Alerta do MSN no Delphi
--- Em delphi-br@yahoogrupos.com.br, Felipe Milagres felipe_a_milag...@... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto.free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz
[delphi-br] Re: Data e Hora de Arquivos
Steve, No ShowMessage funciona, mas o ShowMessage foi só para exemplo, o que eu quero mesmo é alocar numa variável TDateTime. Grato --- Em delphi-br@yahoogrupos.com.br, Wilson, Stephen stephen.wil...@... escreveu Use Date em vez de Now: procedure TForm1.Button1Click(Sender: TObject); var myTime, myDate: TDateTime; begin myDate:= Date + 30; myTime:= EncodeTime(0, 0, 0, 0); showmessage(DateTimeToStr(myDate) + ' ' + TimeToStr(myTime)); end; Ou poderia utilizar FormatDateTime? Att Steve -Original Message- From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br]on Behalf Of embarcadelphi Sent: 03 July 2009 17:02 To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Data e Hora de Arquivos Boa tarde pessoal... Estou todo enrolado no trabalho com datas e horas, conversão, etc... Utilizei EncodeData,EncodeTime,FormatDateTime e não consigo criar uma situação como o caso abaixo. Tenho uma função que altera a data e a hora de um arquivo (funcionando). vData := (Now + 30); // 30 dias após a data atual vHora := EncodeTime(00, 00, 0, 0); // A hora DEVE ficar 00:00:00 Como faço para alocar numa variável do tipo TDateTime as duas situações acima? Como disse no início, já tentei com diversos tipos e quando testava com um ShowMessage(DateToStr(variavel)); não funcionava, a desgraçada da hora mostrava SEMPRE a hora atual, é o inferno isso! Quero que fique a data que está na variável vData e a hora que está na variável vHora. Ambos numa só variável do tipo TDateTime. Grato *** This e-mail and any files transmitted with it are confidential. If you are not the intended recipient, any reading, printing, storage, disclosure, copying or any other action taken in respect of this e-mail is prohibited and may be unlawful. If you are not the intended recipient, please notify the sender immediately by using the reply function and then permanently delete what you have received. Content of emails received by this Trust will be subject to disclosure under the Freedom of Information Act 2000, subject to the specified exemptions, including the Data Protection Act 1998 and Caldicott Guardian principles. This footnote also confirms that, unless otherwise stated, this email message has been swept by Sophos Anti-virus for the presence of computer viruses. ***
Re: [delphi-br] Re: Alerta do MSN no Delphi
Porque não usa o componente que te passei ao inves de reinventar a roda? Tem dezenas de componentes desses free, so tu dar uma googada, vai te poupar muito trabalho. 2009/7/3 embarcadelphi embarcadel...@yahoo.com.br: --- Em delphi-br@yahoogrupos.com.br, Felipe Milagres felipe_a_milag...@... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto.free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com
Re: [delphi-br] Re: Alerta do MSN no Delphi
o codigo eu tirei dakele link, segue ele abaixo: procedure TForm1.Button1Click(Sender: TObject);var I: Integer; fAlertaMsn: TForm; BarraIniciar: HWND; {Barra Iniciar} tmAltura: Integer; tmRect: TRect; xTop : Integer; xIniTop : Integer;begin //localiza o Handle da janela iniciar BarraIniciar := FindWindow('Shell_TrayWnd', nil); //Pega o retângulo que envolve a barra e sua altura GetWindowRect(BarraIniciar, tmRect); tmAltura := tmRect.Bottom - tmRect.Top; fAlertaMsn := TfAlertaMsn.Create(Self); with fAlertaMsn do begin Left := Screen.Width - ClientWidth; if tmRect.Top = -2 then tmAltura := 30; //Pega o top final xTop := Screen.Height - ClientHeight - tmAltura; //Pega o top inicial xIniTop := Screen.Height + ClientHeight + tmAltura; Top := xIniTop; for I := xIniTop downto xTop do begin Top := Top - 1; Show; Update; Application.ProcessMessages; Sleep(10); end; Sleep(3000); Close; FreeAndNil(fAlertaMsn); end;end; ___ Att, Felipe Milagres --- Em sex, 3/7/09, embarcadelphi embarcadel...@yahoo.com.br escreveu: De: embarcadelphi embarcadel...@yahoo.com.br Assunto: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:08 --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto .free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Res: Re: Data e Hora de Arquivos
Não entendi bem o que você disse, mas ajudou muito para usar o EncodeDateTime (Data e Hora juntos, não conhecia), tentei fazer algo rápido para ver se solucionou, o código ficou grande demais, acho que deve ter outra maneira menor. Compilou, mas ao executar deu um belo erro por causa do último parâmetro do EncodeDateTime que são os milésimos de segundos que o TDateTime não aceita, não sei como isolar este parâmetro. Eu tava fazendo assim: procedure TForm1.Button1Click(Sender: TObject); var Data : TDateTime; DataHora : TDateTime; begin Data := (Date + 30); DataHora := StrToDateTime(FormatDateTime('dd/mm/ hh:mm:ss', EncodeDateTime(StrToInt(Copy(FormatDateTime('dd/mm/',Data),1,2)), StrToInt(Copy(FormatDateTime('dd/mm/',Data),4,2)), StrToInt(Copy(FormatDateTime('dd/mm/',Data),7,4)), 0,0,0,0))); ShowMessage(DateTimeToStr(DataHora)); end; Alguém pode ajudar aí? rsrs (nunca precisei de trabalhar com datas e horas), que loucura! - --- Em delphi-br@yahoogrupos.com.br, José Mário Silva Guedes jmariogue...@... escreveu Já passei por situação parecida e solucionei dando um DecodeDate em vDaya, dando um EncodeDateTime depois, entendeu? [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Alerta do MSN no Delphi
Olha aí o erro no finalzinho: FreeAndNil(fAlertaMsn); Remova, coloque ele no OnClose da form Agora vai funcionar. Não adianta baixar outros componentes, se não tentar descobrir o porque está dando erro vai ser um programador de copiar e colar. blz. --- Em delphi-br@yahoogrupos.com.br, Felipe Milagres felipe_a_milag...@... escreveu o codigo eu tirei dakele link, segue ele abaixo: procedure TForm1.Button1Click(Sender: TObject);var I: Integer; fAlertaMsn: TForm; BarraIniciar: HWND; {Barra Iniciar} tmAltura: Integer; tmRect: TRect; xTop : Integer; xIniTop : Integer;begin //localiza o Handle da janela iniciar BarraIniciar := FindWindow('Shell_TrayWnd', nil); //Pega o retângulo que envolve a barra e sua altura GetWindowRect(BarraIniciar, tmRect); tmAltura := tmRect.Bottom - tmRect.Top; fAlertaMsn := TfAlertaMsn.Create(Self); with fAlertaMsn do begin Left := Screen.Width - ClientWidth; if tmRect.Top = -2 then tmAltura := 30; //Pega o top final xTop := Screen.Height - ClientHeight - tmAltura; //Pega o top inicial xIniTop := Screen.Height + ClientHeight + tmAltura; Top := xIniTop; for I := xIniTop downto xTop do begin Top := Top - 1; Show; Update; Application.ProcessMessages; Sleep(10); end; Sleep(3000); Close; FreeAndNil(fAlertaMsn); end;end; ___ Att, Felipe Milagres --- Em sex, 3/7/09, embarcadelphi embarcadel...@... escreveu: De: embarcadelphi embarcadel...@... Assunto: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:08 --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto .free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Alerta do MSN no Delphi
eu pesquisaria o q?? componente popup delphi pode ate ser que eu use esse componente.. acontece q como o codigo ja estava pronto .. achei q seria mais rapido ... ps.: no site q vc me passou, quando eu clico para fazer o download, ele redireciona para um nao confiavel (palavra do google chrome) ps2.: esse componente serve no delphi 4 ?? valeu a ajuda ... ___ Att, Felipe Milagres --- Em sex, 3/7/09, Paulo Coutinho pa...@prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com Assunto: Re: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:20 Porque não usa o componente que te passei ao inves de reinventar a roda? Tem dezenas de componentes desses free, so tu dar uma googada, vai te poupar muito trabalho. 2009/7/3 embarcadelphi embarcadelphi@ yahoo.com. br: --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto .free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Alerta do MSN no Delphi
Existe na biblioteca de componentes Jedi esse msn popup chamado TJvDesktopAlert http://www.delphi-jedi.org/ 2009/7/3 Felipe Milagres felipe_a_milag...@yahoo.com.br eu pesquisaria o q?? componente popup delphi pode ate ser que eu use esse componente.. acontece q como o codigo ja estava pronto .. achei q seria mais rapido ... ps.: no site q vc me passou, quando eu clico para fazer o download, ele redireciona para um nao confiavel (palavra do google chrome) ps2.: esse componente serve no delphi 4 ?? valeu a ajuda ... __ Att, Felipe Milagres --- Em sex, 3/7/09, Paulo Coutinho pa...@prsolucoes.compaulo%40prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.com Assunto: Re: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:20 Porque não usa o componente que te passei ao inves de reinventar a roda? Tem dezenas de componentes desses free, so tu dar uma googada, vai te poupar muito trabalho. 2009/7/3 embarcadelphi embarcadelphi@ yahoo.com. br: --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto .free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Thales Eduardo Barros de Oliveira Desenvolvedor Delphi / Firebird / Java Emails: tebosoftw...@gmail.com (GoogleTalk) thales_...@hotmail.com (MSN) Blog: http://tebosoftware.blogspot.com/ Tente ser uma pessoa de valor, não de sucesso Albert Einstein [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Alerta do MSN no Delphi [resolvido]
embarcadelphi , putz ... valeu mesmo a ajuda ... (valeu tb a todos que deram força) ps.: pq com essa modificação , o trem funcionou ???, o FreeAndNil faz o q ??? []s .. ___ Att, Felipe Milagres --- Em sex, 3/7/09, embarcadelphi embarcadel...@yahoo.com.br escreveu: De: embarcadelphi embarcadel...@yahoo.com.br Assunto: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:32 Olha aí o erro no finalzinho: FreeAndNil( fAlertaMsn) ; Remova, coloque ele no OnClose da form Agora vai funcionar. Não adianta baixar outros componentes, se não tentar descobrir o porque está dando erro vai ser um programador de copiar e colar. blz. --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu o codigo eu tirei dakele link, segue ele abaixo: procedure TForm1.Button1Click (Sender: TObject);var I: Integer; fAlertaMsn: TForm; BarraIniciar: HWND; {Barra Iniciar} tmAltura: Integer; tmRect: TRect; xTop : Integer; xIniTop : Integer;begin //localiza o Handle da janela iniciar BarraIniciar := FindWindow(' Shell_TrayWnd' , nil); //Pega o retângulo que envolve a barra e sua altura GetWindowRect (BarraIniciar, tmRect); tmAltura := tmRect.Bottom - tmRect.Top; fAlertaM sn := TfAlertaMsn. Create(Self) ; with fAlertaMsn do begin Left := Screen.Width - ClientWidth; if tmRect.Top = -2 then tmAltura := 30; //Pega o top final xTop := Screen.Height - ClientHeight - tmAltura; //Pega o top inicial xIniTop := Screen.Height + ClientHeight + tmAltura; Top := xIniTop; for I := xIniTop downto xTop do begin Top := Top - 1; Show; Update; Application. ProcessMessages; Sleep(10); end; Sleep(3000); Close; FreeAndNil(fAlertaM sn); end;end; _ _ _ _ _ _ Att, Felipe Milagres --- Em sex, 3/7/09, embarcadelphi embarcadelphi@ ... escreveu: De: embarcadelphi embarcadelphi@ ... Assunto: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi...@yahoogrup os.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:08 --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto .free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz _ _ _ _ _ _ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Novo arquivo carregado em delphi-br
Olá, Esta mensagem é uma notificação para informá-lo que um novo arquivo foi adicionado no grupo delphi-br. Arquivo : /Componentes com fontes/msn_popup.zip Carregado por : paulo.prsolucoes pa...@prsolucoes.com Descrição : Componente para exibir alerta igual MSN - Free com Fontes Você pode acessar o arquivo pela URL: http://br.groups.yahoo.com/group/delphi-br/files/Componentes%20com%20fontes/msn_popup.zip Para saber mais sobre compartilhamento de arquivos no grupo, leia: http://help.yahoo.com/help/br/groups/files Atenciosamente, paulo.prsolucoes pa...@prsolucoes.com
Re: [delphi-br] Re: Alerta do MSN no Delphi
Postei o fonte de um componente para fazer esses alertas, funciona no Delphi 4 também. Se ainda não foi aceito o arquivo, baixe aqui: http://www.prsolucoes.com/downloads/msn_popup.zip É free e com fontes. 2009/7/3 Thales (Shubacca) - Tebo Software tebosoftw...@gmail.com: Existe na biblioteca de componentes Jedi esse msn popup chamado TJvDesktopAlert http://www.delphi-jedi.org/ 2009/7/3 Felipe Milagres felipe_a_milag...@yahoo.com.br eu pesquisaria o q?? componente popup delphi pode ate ser que eu use esse componente.. acontece q como o codigo ja estava pronto .. achei q seria mais rapido ... ps.: no site q vc me passou, quando eu clico para fazer o download, ele redireciona para um nao confiavel (palavra do google chrome) ps2.: esse componente serve no delphi 4 ?? valeu a ajuda ... __ Att, Felipe Milagres --- Em sex, 3/7/09, Paulo Coutinho pa...@prsolucoes.compaulo%40prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.com Assunto: Re: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:20 Porque não usa o componente que te passei ao inves de reinventar a roda? Tem dezenas de componentes desses free, so tu dar uma googada, vai te poupar muito trabalho. 2009/7/3 embarcadelphi embarcadelphi@ yahoo.com. br: --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto .free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Thales Eduardo Barros de Oliveira Desenvolvedor Delphi / Firebird / Java Emails: tebosoftw...@gmail.com (GoogleTalk) thales_...@hotmail.com (MSN) Blog: http://tebosoftware.blogspot.com/ Tente ser uma pessoa de valor, não de sucesso Albert Einstein [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com
[delphi-br] Pluguin do Flash
Como saber se o Pluguin do Flash está instalado na máquina via programação usando o Delphi?
Re: [delphi-br] Res: Re: Data e Hora de Arquivos
Amigo, assim fica complicado :) Use o DecodeDate para quebrar a data atual... Dai você usa os resultados no EncodeDateTime... [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Lentidão no ClientDataSet x RXMemoryData - ACR EDITEM..
Pessoal, façam o teste o RX dá pau no CLIENTDATASET ??? 1. Apenas coloquem um ClientDataSet na tela, um campo a do tipo INTEGER e coloquem o código abaixo, execute: a. Notem que o tempo que irá levar é de 1 Segundo; 2. Agora, abram o ClientDataSet e adicionem um campo b do tipo STRING de tamanho 500, execute: a. Notem que agora o tempo é de aproximadamente 5 Segundos; b. Se colocarem outro campo STRING c por exemplo o tempo passa a ser 9 Segundos, e por ai vai... 3. AGORA, façam o mesmo teste usando o RXMemoryData dos componentes RXLibrary, no segundo caso, se emularmos os mesmos testes, vocês irão notar que o tempo fica em torno de 2 Segundos mesmo criando o segundo campo do tipo String de 500, uma diferença muito grande; **Uso qual componente agora * procedure TForm1.bbt1Click(Sender: TObject); var i: Integer; vTempo: TDateTime; begin cds1.CreateDataSet; cds1.DisableControls; vTempo := Now; for i := 0 to 3 do begin cds1.Append; cds1.FieldByName('a').AsInteger := i; cds1.Post; end; Caption := TimeToStr(Now - vTempo); cds1.EnableControls; end; [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Alerta do MSN no Delphi [resolvido]
Leia os dois links abaixo para entender melhor a diferença do Free e do FreeAndNil http://www.ericksasse.com.br/free-vs-freeandnil-vs-release/ e http://www.forumweb.com.br/foruns/index.php?showtopic=43172 Felipe Milagres escreveu: embarcadelphi , putz ... valeu mesmo a ajuda ... (valeu tb a todos que deram força) ps.: pq com essa modificação , o trem funcionou ???, o FreeAndNil faz o q ??? []s .. __ Att, Felipe Milagres .
Re: [delphi-br] Res: Re: Data e Hora de Arquivos
nao seria isso q ele ta querendo: Label1.Caption := FormatDateTime('dd/mm/ hh:nn:ss',StrToDateTime(DateToStr(Date+30)+' 00:00:00')); 2009/7/3 José Mário Silva Guedes jmariogue...@gmail.com Amigo, assim fica complicado :) Use o DecodeDate para quebrar a data atual... Dai você usa os resultados no EncodeDateTime... [As partes desta mensagem que não continham texto foram removidas] -- Leandro, MuTukA [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Res: Re: Data e Hora de Arquivos [Resolvido]
rsrsrs, como disse, fiz rápido para ver os resultados, mas não consegui. Com mais calma eu solucionei. Ficou assim: procedure TForm1.Button1Click(Sender: TObject); var Data : TDateTime; DataHora : TDateTime; D,M,A, hh,mm,ss, ms: Word; begin Data := (Date + 30); DecodeDate(Data,A,M,D); DecodeTime(StrToTime('00:00:00'),hh,mm,ss,ms); DataHora := EncodeDateTime(A,M,D,hh,mm,ss,ms); ShowMessage(FormatDateTime('dd/mm/ hh:mm:ss',DataHora)); end; Tem como melhorar mais ainda? Grato a todos José Mário Silva Guedes escreveu: Amigo, assim fica complicado :) Use o DecodeDate para quebrar a data atual... Dai você usa os resultados no EncodeDateTime... .
[delphi-br] Res: Re: Data e Hora de Arquivos
O problema foi resolvido (coloquei noutra mensagem). Não, não era isso q você indicou. O showMessage era só para mostrar se há erros, mas eu queri mesmo era depositar numa variável do tipo TDateTime o valor da data + 30 dias, sendo que o horário deveria ficar só com zeros. Para mostrar, do jeito q vc colocou funciona. obs: você formatou os minutos errado :) --- Em delphi-br@yahoogrupos.com.br, Leandro mutu...@... escreveu nao seria isso q ele ta querendo: Label1.Caption := FormatDateTime('dd/mm/ hh:nn:ss',StrToDateTime(DateToStr(Date+30)+' 00:00:00'));
Re: [delphi-br] TTimer (Interval) - Opinião de voc ês...
me tira uma duvida: esse codigo da thred nao ficara em loop infinito ate entrar na clausula e finaliza-lo? acredito eu q oq ele ta querendo eh verificar se a aplicacao esta aberta a mais de um dia.. ou seja o cara n fecha para verificar a licença do sistema.. e desse modo acredito q estaria gastando processador a toa.. neste caso acho q um ttimer n seria problema, claro q ele nunca conta certo mas erros neste caso n teriam consequencias, outra dica nao aconselho vc colocar no timer 24h caso seja para essa finalidade, acoselho verificar de hora em hora, por exemplo eu salvo no ini de configuracao dos icones da area de trabalho do meu sistema a variavel datetime de inicio do sistema convertida para decimal FloatToStr(Now) e depois a retorno e a converto para datatime novamente 2009/7/3 José Mário Silva Guedes jmariogue...@gmail.com *Olá companheiro, Desculpe enviar diretamente em PVT. Não consigo enviar para a lista, ou está com problemas hoje ou meu gerenciador de email não consegue enviar para a lista, mas para qualquer outro email eu consigo. Isso aconteceu hoje cedo. Sobre o TTiomer, você disse preferir usar uma Thread. O amigo poderia me dizer como eu faria para ele ficar contando e após 24 horas me retornar que se passou um dia que o programa está em execução? Grato. P.S. - Pode enviar a resposta para a lista, até porque fica registrado lá para outras pessoas.* * ** * *--* * * EmbarcaDelphi, ao iniciar a thread, você poderia armazenar em uma variavel o momento do inicio do programa e no Execute da Thread usar a função HoursBetween, algo mais ou menos assim: //... dtStarted := Now; while not (Self.Terminated) do begin if (HoursBetween(Now,dtStarted) = 24) then begin //Alguma coisa end; end; [As partes desta mensagem que não continham texto foram removidas] -- Leandro, MuTukA [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Alerta do MSN no Delphi
uso o tmsnpopoup 5.1 configura cor, degrade, icones.. e tem funcao de vc clicar e executar algo.. vc pode abrir varios alertas e ele empilha.. soh tem q controlar nao passar da quantidade q cabe na tela e parar os alertas e soh quando liberar todos continuar a mostrar os q faltam.. 2009/7/3 Paulo Coutinho pa...@prsolucoes.com Postei o fonte de um componente para fazer esses alertas, funciona no Delphi 4 também. Se ainda não foi aceito o arquivo, baixe aqui: http://www.prsolucoes.com/downloads/msn_popup.zip É free e com fontes. 2009/7/3 Thales (Shubacca) - Tebo Software tebosoftw...@gmail.comtebosoftware%40gmail.com : Existe na biblioteca de componentes Jedi esse msn popup chamado TJvDesktopAlert http://www.delphi-jedi.org/ 2009/7/3 Felipe Milagres felipe_a_milag...@yahoo.com.brfelipe_a_milagres%40yahoo.com.br eu pesquisaria o q?? componente popup delphi pode ate ser que eu use esse componente.. acontece q como o codigo ja estava pronto .. achei q seria mais rapido ... ps.: no site q vc me passou, quando eu clico para fazer o download, ele redireciona para um nao confiavel (palavra do google chrome) ps2.: esse componente serve no delphi 4 ?? valeu a ajuda ... __ Att, Felipe Milagres --- Em sex, 3/7/09, Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.compaulo%40prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com paulo%40prsolucoes.compaulo% 40prsolucoes.com Assunto: Re: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br% 40yahoogrupos.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:20 Porque não usa o componente que te passei ao inves de reinventar a roda? Tem dezenas de componentes desses free, so tu dar uma googada, vai te poupar muito trabalho. 2009/7/3 embarcadelphi embarcadelphi@ yahoo.com. br: --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto .free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Thales Eduardo Barros de Oliveira Desenvolvedor Delphi / Firebird / Java Emails: tebosoftw...@gmail.com tebosoftware%40gmail.com (GoogleTalk) thales_...@hotmail.com thales_oli%40hotmail.com (MSN) Blog: http://tebosoftware.blogspot.com/ Tente ser uma pessoa de valor, não de sucesso Albert Einstein [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes.com/blog Site: www.prsolucoes.com Msn: pa...@prsolucoes.com paulo%40prsolucoes.com -- Leandro, MuTukA [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Alerta do MSN no Delphi
bacana isso ai !!! hehe valeu a ajuda .. ___ Att, Felipe Milagres --- Em sex, 3/7/09, Paulo Coutinho pa...@prsolucoes.com escreveu: De: Paulo Coutinho pa...@prsolucoes.com Assunto: Re: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 3 de Julho de 2009, 15:59 Postei o fonte de um componente para fazer esses alertas, funciona no Delphi 4 também. Se ainda não foi aceito o arquivo, baixe aqui: http://www.prsoluco es.com/downloads /msn_popup. zip É free e com fontes. 2009/7/3 Thales (Shubacca) - Tebo Software tebosoftware@ gmail.com: Existe na biblioteca de componentes Jedi esse msn popup chamado TJvDesktopAlert http://www.delphi- jedi.org/ 2009/7/3 Felipe Milagres felipe_a_milagres@ yahoo.com. br eu pesquisaria o q?? componente popup delphi pode ate ser que eu use esse componente.. acontece q como o codigo ja estava pronto .. achei q seria mais rapido ... ps.: no site q vc me passou, quando eu clico para fazer o download, ele redireciona para um nao confiavel (palavra do google chrome) ps2.: esse componente serve no delphi 4 ?? valeu a ajuda ... _ _ _ _ _ _ Att, Felipe Milagres --- Em sex, 3/7/09, Paulo Coutinho pa...@prsolucoes. compaulo%40prsolucoes .com escreveu: De: Paulo Coutinho pa...@prsolucoes. com paulo%40prsolucoes .com Assunto: Re: [delphi-br] Re: Alerta do MSN no Delphi Para: delphi...@yahoogrup os.com.br delphi-br%40yahoog rupos.com. br Data: Sexta-feira, 3 de Julho de 2009, 15:20 Porque não usa o componente que te passei ao inves de reinventar a roda? Tem dezenas de componentes desses free, so tu dar uma googada, vai te poupar muito trabalho. 2009/7/3 embarcadelphi embarcadelphi@ yahoo.com. br: --- Em delphi...@yahoogrup os.com.br, Felipe Milagres felipe_a_milagres@ ... escreveu Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 00411DA5 in module 'Project1.exe. Write of address 003B'. Process stopped como (o meu ingles é ruin e) essa mensagem nao deu para MIM nenhuma pista de qual é o erro .. Quem sabe inglês também não vai saber traduzir, este erro só traduz quem é programador e está com o código fonte nas mãos, digo, aberto no Delphi. Isso aí é endereçamento de memória. talvez algum objeto foi deletado da memória (nomedoobjeto .free), depois você foi tentar refazer a mesma rotina que foi feito antes (no primeiro click), só que agora este objeto não existe mais. Só vendo o código para saber mais... Se puder colocar o código desse botão que você clica e dá este erro, fica mais fácil para saber. blz -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com _ _ _ _ _ _ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com [As partes desta mensagem que não continham texto foram removidas] -- Thales Eduardo Barros de Oliveira Desenvolvedor Delphi / Firebird / Java Emails: tebosoftware@ gmail.com (GoogleTalk) thales_...@hotmail. com (MSN) Blog: http://tebosoftware .blogspot. com/ Tente ser uma pessoa de valor, não de sucesso Albert Einstein [As partes desta mensagem que não continham texto foram removidas] -- Atenciosamente, Paulo Coutinho. Blog: www.prsolucoes. com/blog Site: www.prsolucoes. com Msn: pa...@prsolucoes. com Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [OFF] Curiosidades da lista Delphi-BR
Em 3/7/2009 13:43, embarcadelphi escreveu: A lista Delphi-BR iniciou em Abril/1999 com 922 mensagens, o record do mês foi de 3208 mensagens, ocorreu em Outubro/2003. Neste momento que escrevo, existem um total de 202.173 mensagens. Desde janeiro de 2009 temos um total de 5026 mensagens. Está abaixo da média, comparado pelos anos anteriores (temos de postar mais dúvidas e respostas, rsrsrs). Após muitos: ... procure no Google,; ... F1 aí rapá! dentre dezenas/centenas/escanxatenas( rs... ) de outros fatores (mudança de linguagem de programação; cair fora do brasil e esquecer até mesmo o pt-br; não ter tempo nem pra coçar o suvaco -- muitos estão com esse problema crônico --, morrer ( kkk... ) e por aí vai), que se o cara for parar pra procurar o que esta acontecendo com cada um, como dizia a minha avó: ... cuidado pra não virar o juízo meu fi!. :-) . Bom, ando meio sem tempo ( kkk... ), mas deixo aí mais 1 email circulando do servers Yahoo. parabens ao clonador de listas, pela iniciativa ... EmbarcaDelphi meu velho, a afirmação me deixou meio sem brecha pra contestar, mas vamos lá: acontece de alguém criar um troço aqui e outro(s) jurar de pé junto que iniciou lá fora -- nos EUA, como é de costume. ps. Cê tá com um tempinho extra aí heim?! Caso saiba um pouco (se muito melhor ainda ;-) ) de inglês e queira contribuir com a tradução de algo que vai continuar {circulando/sendo útil} por um bom tempo, visite o site do PressObjects: [http://br.pressobjects.org/]; eu mesmo sem saber Object Pascal avançado estou contribuindo no projeto no que posso; dê uma curiada no baús (histórico na web) sobre o projeto. -- []'s, Silvio Clécio --- Linux User: #481900 Gmail, GTalk: silviop...@gmail.com E-mail, Y! Messenger: silviop...@yahoo.com.br BlogSite: http://silvioprog.blogspot.com/ BlogSpot: http://silvioclecio.blogspot.com/ VirtualDriver: http://silvioprog.4shared.com/ °oO| Seja livre, use Linux! |Oo°
[delphi-br] [OFF] Curiosidades da lista Delphi-BR
O email mais antigo da lista que guardo no meu OutLook é de terça-feira,14 de setembro de 1999 08:56. Você não precisava ter feito isso. Estou me sentindo um vovô por aqui. (rsrs) [ ]'s Dirceu Portéla Especialista em Desenvolvimento de Software www.topfaces.com.br 51 3339-7719 - Original Message - From: delphi-br@yahoogrupos.com.br Sent: Friday, July 03, 2009 3:08 PM [OFF] Curiosidades da lista Delphi-BR Enviado por: embarcadelphi Sex, 3 de Jul de 2009 1:44 pm Olá pessoal, esse off é só para o pessoal saber sobre o histórico da lista Delphi-BR. Parece que não tenho o que fazer, rsrsrs. Fiquei curioso e fui pesquisar no site do Yahoo. Pode servir até para colocar em Blogs de curiosidades, agora resta saber de qual lista a Delphi-BR foi clonada, rsrsrs. Leia até o fim para saber sobre isso. A lista Delphi-BR iniciou em Abril/1999 com 922 mensagens, o record do mês foi de 3208 mensagens, ocorreu em Outubro/2003. Neste momento que escrevo, existem um total de 202.173 mensagens. Desde janeiro de 2009 temos um total de 5026 mensagens. Está abaixo da média, comparado pelos anos anteriores (temos de postar mais dúvidas e respostas, rsrsrs). A primeira mensagem da lista foi escrita por sehnem cujo assunto foi: codigo de tecla em delphi/api O texto da mensagem: qual a Wk_ ou vk_ correspondente a tecla com o simbolo do windows dos teclados mais modernos. parabens ao clonador de listas, pela iniciativa, e por me incluir.