[delphi-br] Painel Translucido
Caros amigos, alguém sabe de alguma maneira de criar um painel Translucido, como sendo um efeito de Vidro para não permitir o usuário clicar em alguns itens da tela?? Existe um Componente da Billeniun que é BeffectPanel, porém o mesmo é pago gostaríamos de utilizar os componentes nativos do Delphi pois o cliente não gostaria de ter componentes de terceiros no projeto. Grato à todos Atenciosamente, Gerson Thomaz Santos Gerente de TI [EMAIL PROTECTED] Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar ou divulgar as informações nela contidas ou tomar qualquer ação baseada nessas informações. Se você recebeu esta mensagem por engano, por favor avise imediatamente o remetente, respondendo o e-mail e em seguida apague-a. Agradecemos sua cooperação. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Colunas mudam de Tamanho Sozinhas
Galera da Lista, boa tarde.. Estou com o seguinte problema: Temos um GRID em uma se nossas aplicações que esta ligado à um DataSource, esse à um ADOQuery e o ADOQuery à um ADOConnection. Como essa aplicação tem que verificar o status do que tenho em tela de 10 em 10 segundos, eu dou um refresh. Porém não sei por que quando ocorre o refresh, as colunas da GRID mudam de tamanho sozinhas. As vezes elas ficam com Width 0, as vezes com 2 as vezes com 30, as vezes com 40. Acontece com várias colunas, não tem uma ordem, ou horário ou qualquer outra lógica que tenhamos percebido. Já tentei dar o Refresh vai Query.Refresh, via Query.Close; Query.Open; e sempre a mesma coisa. Em outras aplicações não acontece isso. Alguém já passou por isso?? Tem idéia do que pode estar acontecendo: Delphi: 7 Banco: MS-SQL 2000 Conexão: ADO Abração a todos... Atenciosamente, Gerson Thomaz Santos Analista de Sistema [EMAIL PROTECTED] Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar ou divulgar as informações nela contidas ou tomar qualquer ação baseada nessas informações. Se você recebeu esta mensagem por engano, por favor avise imediatamente o remetente, respondendo o e-mail e em seguida apague-a. Agradecemos sua cooperação. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Capturar Texto
Amigos, ja ouviram falar do MadSHI Except (http://www.madshi.net/madExceptDescription.htm) ??? Esse é um exemplo de Report dele por email: date/time : 2006-08-02, 08:50:32, 875ms computer name : SERVIDOR user name : Adminadmin operating system : Windows XP Service Pack 2 build 2600 system language : Portuguese system up time: 8 hours 34 minutes program up time : 15 seconds processors: 2x Intel(R) Pentium(R) 4 CPU 3.00GHz physical memory : 684/1023 MB (free/total) free disk space : (C:) 31,13 GB display mode : 1024x768, 16 bit process id: $fb4 allocated memory : 15,42 MB executable: SYSTEM_Servidor.exe exec. date/time : 2006-08-01 10:54 madExcept version : 3.0b callstack crc : $2164a695, $2c9d26d5, $09c0a046 exception number : 1 exception class : EAccessViolation exception message : Access violation at address 006D2878 in module 'SYSTEM_Servidor.exe'. Read of address . thread $f64 (TVrTimerThread): 006d2878 +06c SYSTEM_Servidor.exe Unit1 4875 +1 TForm1.tbEVEHAfterOpen 00542d2d +015 SYSTEM_Servidor.exe DB10757 +1 TDataSet.DoAfterOpen 0053fc39 +051 SYSTEM_Servidor.exe DB 8880 +8 TDataSet.OpenCursorComplete 0053fb5f +077 SYSTEM_Servidor.exe DB 8850 +15 TDataSet.SetActive 0053fba3 +0bb SYSTEM_Servidor.exe DB 8857 +22 TDataSet.SetActive 0053f988 +004 SYSTEM_Servidor.exe DB 8803 +0 TDataSet.Open 006cb1c1 +0cd SYSTEM_Servidor.exe Unit1 2656 +6 TForm1.ControlaHistorico 006dff53 +237 SYSTEM_Servidor.exe Unit1 7662 +79 TForm1.Timer1Timer 0051cf24 +034 SYSTEM_Servidor.exe VrThreads 294 +4 TVrTimer.Timer 0051cc60 +008 SYSTEM_Servidor.exe VrThreads 163 +1 TVrTimerThread.CallEvent 0051cc48 +04c SYSTEM_Servidor.exe VrThreads 156 +10 TVrTimerThread.Execute 0044d963 +02b SYSTEM_Servidor.exe madExcept HookedTThreadExecute 00472308 +034 SYSTEM_Servidor.exe Classes ThreadProc 004050b4 +028 SYSTEM_Servidor.exe System ThreadWrapper 0044d845 +00d SYSTEM_Servidor.exe madExcept CallThreadProcSafe 0044d8af +037 SYSTEM_Servidor.exe madExcept ThreadExceptFrame created by main thread ($bcc) at: 0051cb85 +039 SYSTEM_Servidor.exe VrThreads 129 +4 TVrTimerThread.Create Utilizamos em nossos sistemas e sinceramente, é do tipo.. Nossa, como eu vivi até agora sem isso UahuHAUuahUAhauHUAHuahUAHuah Ele tira uma PrintScreen, manda o Log, e de quebra, ainda dah pra saber qual a linha gerou o Erro Enfim, baixem, conhecam, adiquiram (US$ 99,00baratíssimo para o que faz), e nunca mais se arrependam Haaa antes q alguem fale: Não não sou marketeiro ou comercial dos kra, é q o bicho é booomesmo Abração e espero ter ajudado ;) Atenciosamente, Gerson Thomaz Santos Analista de Sistema Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar ou divulgar as informações nela contidas ou tomar qualquer ação baseada nessas informações. Se você recebeu esta mensagem por engano, por favor avise imediatamente o remetente, respondendo o e-mail e em seguida apague-a. Agradecemos sua cooperação. - Original Message - From: Desenvolvimento (Anderson) To: delphi-br@yahoogrupos.com.br Sent: Friday, August 18, 2006 3:23 PM Subject: Re: [delphi-br] Capturar Texto e como saber qual objeto/evento gerou a excessão? - Original Message - From: Marco Aurélio (DELPHI) To: delphi-br@yahoogrupos.com.br Sent: Friday, August 18, 2006 1:31 PM Subject: Re: [delphi-br] Capturar Texto utilize da paleta standard o componente application.events. Este componente captura todo o evento que ocorre na aplicação inclusive as exceções. Atenciosamente Marco Aurélio Gerônimo - Original Message - From: roberto ezequiel To: delphi-br@yahoogrupos.com.br Sent: Friday, August 11, 2006 7:22 PM Subject: [delphi-br] Capturar Texto Olá pessoal... Tenho um sistema e gostaria de capturar o texto do erro que aparece na tela do cliente... Exemplo... quando acontece algum erro, tanto de tela quando de banco, o sistema armazenaria em um bloco de notas (.txt), que seria uma espécie de log de erro, e quando fosse dada a manubtenção poderia se abrir este txt e ler o que houve de erro!!! Se alguém puder me dar uma luz, agradeceria... Obrigado - Yahoo! Search Música para ver e ouvir: You're Beautiful, do James Blunt [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1.1714 (20060818) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes
[delphi-br] GLScene com Jedi
GeleiraCaros amigo Boa Noite. Estou tendo problemas em utilizar o GLscene(http://glscene.sourceforge.net/index.php) com o Jedi. quando vou instalar o GLScene da o seguinte erro: Cannot load package 'GLScene7.' It contains unit 'VFW,'which is also contained in package 'JvMMD7R'. Pelo que parece o GLScene tah tentando usar uma UNIT que o Jedi ja utiliza. O pior, esses Componentes do Jedi (JvMMD7R) tem coisas que eu utilizo. segue abaixo o texto Completo que o MADshi me gera ao tentar instalar. Alguem ja passou por isso ou sabe como fazer para os dois funcionarem sem Brigas ??? Atenciosamente, Gerson Thomaz Santos O melhor de Deus ainda está por vir... date/time : 2006-07-25, 00:58:04, 546ms computer name : GERSON_NOTE user name : Gerson admin operating system : Windows XP Service Pack 2 build 2600 system language : English system up time: 3 hours 16 minutes program up time : 26 minutes 7 seconds processors: 2x Mobile Intel(R) Pentium(R) 4 CPU 3.06GHz physical memory : 67/639 MB (free/total) free disk space : (C:) 938,45 MB display mode : 1280x800, 32 bit process id: $cf4 allocated memory : 182,48 MB executable: delphi32.exe current module: madExcept_.bpl exec. date/time : 2002-08-09 14:00 version : 7.0.4.453 madExcept version : 3.0a callstack crc : $40017cd8, $0ff11479, $3f508e39 exception number : 4 exception class : EPackageError exception message : Cannot load package 'GLScene7.' It contains unit 'VFW,'which is also contained in package 'JvMMD7R'. main thread ($1514): 40017cd8 +180 rtl70.bpl 40017d6b +023 rtl70.bpl SysutilsInitializePackage 5983776b +01b madExcept_.bpl madExcept InterceptInitializePackage 40017ebb +07f rtl70.bpl SysutilsLoadPackage 004db54e +002 coreide70.bpl Pakload TPackage.DoLoadPackage 004db6a2 +022 coreide70.bpl Pakload TPackage.Load 004e719c +058 coreide70.bpl Pakmgr TIDEDesignPackage.Load 00d24457 +0f7 borlndmm.dll BorlndmmSysGetMem 004f5840 +030 coreide70.bpl Paklist TPackageListItem.LoadWait 004f57b8 +068 coreide70.bpl Paklist TPackageListItem.LoadDesignPackage 004f4e51 +039 coreide70.bpl Paklist TPackageListItem.SetIsInstalled 004f4c57 +0db coreide70.bpl Paklist TPackageList.AddPackage 00bed137 +05b delphide70.bpl Pasprojopts TProjOptsManager.InstallPackage 00bed6a7 +003 delphide70.bpl Pasprojopts TProjectOptions.InstallPackage 005ad5cf +0d3 coreide70.bpl Pasmgr TPascalPackageCodeUpdater.InstallPackage 005012ef +04f coreide70.bpl Pkgeditors TPackageEditorForm.InstallClick 4003c407 +00f rtl70.bpl Classes TBasicAction.Execute 0082cced +031 vcl70.bpl ActnlistTContainedAction.Execute 0082d9af +04f vcl70.bpl ActnlistTCustomAction.Execute 4003c2db +013 rtl70.bpl Classes TBasicActionLink.Execute 008214c1 +04d vcl70.bpl ControlsTControl.Click 007f6a60 +000 vcl70.bpl ComctrlsTToolButton.Click 0082192e +05e vcl70.bpl ControlsTControl.WMLButtonUp 00821340 +188 vcl70.bpl ControlsTControl.WndProc 00821110 +024 vcl70.bpl ControlsTControl.Perform 00824324 +078 vcl70.bpl ControlsTWinControl.ControlAtPos 00821110 +024 vcl70.bpl ControlsTControl.Perform 008243c2 +082 vcl70.bpl ControlsTWinControl.IsControlMouseMsg 008244ae +0da vcl70.bpl ControlsTWinControl.WndProc 007fad31 +241 vcl70.bpl ComctrlsTToolBar.WndProc 008241a8 +02c vcl70.bpl ControlsTWinControl.MainWndProc 77d496c2 +00a user32.dll DispatchMessageA 00844dab +083 vcl70.bpl Forms TApplication.ProcessMessage 00844de2 +00a vcl70.bpl Forms TApplication.HandleMessage 00845002 +096 vcl70.bpl Forms TApplication.Run thread $17c0: priority:1 7c90eb94 +00 ntdll.dll KiFastSystemCallRet 7c90d85a +0a ntdll.dll NtDelayExecution 7c8023e7 +4b kernel32.dll SleepEx 7c80244c +0a kernel32.dll Sleep thread $1614 (TNameChangeThread): priority:-2 7c90eb94 +00 ntdll.dll KiFastSystemCallRet 7c90e9a9 +0a ntdll.dll NtWaitForMultipleObjects 7c8094ec +00 kernel32.dll WaitForMultipleObjectsEx 7c809c81 +13 kernel32.dll WaitForMultipleObjects 58052d93 +27 JclThreadNameExpert70.bpl ThreadExpertUnit 273 +5 TNameChangeThread.Execute 598382eb +2b madExcept_.bplmadExcept HookedTThreadExecute 598381f5 +0d madExcept_.bplmadExcept CallThreadProc 59838237 +37 madExcept_.bplmadExcept ThreadExceptFrame created by main thread ($1514) at: 58052cee +1e JclThreadNameExpert70.bpl ThreadExpertUnit 250 +1 TNameChangeThread.Create thread $704: priority:15 7c90eb94 +00 ntdll.dllKiFastSystemCallRet 7c90e9a9 +0a ntdll.dllNtWaitForMultipleObjects 7c8094ec +00 kernel32.dll WaitForMultipleObjectsEx 7c809c81 +13 kernel32.dll WaitForMultipleObjects 598381f5 +0d madExcept_.bpl madExcept CallThreadProc 59838237 +37 madExcept_.bpl
[delphi-br] Projetos de Grande porte de Delphi 7 para Delphi 2006
Geleira Caros amigos, gostaria de um feed-back dos amigos que migraram seus projetos do delphi 7 para o Delphi 2006 (Win32). Com foi a migração??? Tiveram algum tipo de incompatibilidade, seja em Sintaxes ou procedimentos??? Recompila 100%, alguma recomendação final? Estou falando de um projeto de Grande porte, utilizando acesso à banco a cada 1 segundo, com Sockets e em média umas 10 Threads por Aplicação... Grato a Todos... Atenciosamente, Gerson Thomaz Santos Analista de Sistema Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar ou divulgar as informações nela contidas ou tomar qualquer ação baseada nessas informações. Se você recebeu esta mensagem por engano, por favor avise imediatamente o remetente, respondendo o e-mail e em seguida apague-a. Agradecemos sua cooperação. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] 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] System Error Code 1410 Essa Classe já existe
Salve Amigos.. Seguinte, alguem ja teve esse erro?? Uso Delphi 7, acessando MS-SQL via ADO e Comunicação Socket nesse sistema. System Error. Code: 1410. Esta classe já existe. Como tenho MadSHI, segue o Erro para os Amigos verem junto se alguem ja passou por isso. abração a todos date/time : 2006-03-28, 09:47:54, 265ms computer name : SERVER wts client name : useremote user name : Administrador admin operating system : Windows 2003 Service Pack 1 build 3790 system language : Portuguese system up time: 5 days 9 hours program up time : 3 seconds processors: 2x Intel(R) Pentium(R) 4 CPU 3.00GHz physical memory : 227/992 MB (free/total) free disk space : (C:) 25.51 GB (E:) 66.32 GB display mode : 800x600, 16 bit process id: $9cc allocated memory : 7.42 MB executable: RECEIVER.exe exec. date/time : 2006-03-27 14:22 madExcept version : 3.0a callstack crc : $674c0a9e, $72b97a98, $9fbacbec exception number : 1 exception class : EOSError exception message : System Error. Code: 1410. Esta classe já existe. thread $fe4 (TVrSystemThread): 004580fd +075 RECEIVER.exe SysUtilsRaiseLastOSError 004b59ac +10c RECEIVER.exe Controls 6000 +18 TWinControl.CreateWnd 004b5d9e +016 RECEIVER.exe Controls 6121 +3 TWinControl.CreateHandle 004b88e0 +01c RECEIVER.exe Controls 7796 +4 TWinControl.HandleNeeded 004b88ed +005 RECEIVER.exe Controls 7802 +1 TWinControl.GetHandle 0060473f +0d3 RECEIVER.exe Sock409 +37 TSock.SetBlocking 00605189 +041 RECEIVER.exe Sock730 +11 TSock.Open 00639895 +22d RECEIVER.exe Unit1 10937 +39 TForm1.trdPlugSCExecute 005c51d8 +034 RECEIVER.exe VrThreads 393 +4 TVrThread.ExecuteEvent 005c5073 +00f RECEIVER.exe VrThreads 328 +1 TVrSystemThread.CallExecute 005c5052 +042 RECEIVER.exe VrThreads 322 +6 TVrSystemThread.Execute 0044ce2b +02b RECEIVER.exe madExcept HookedTThreadExecute 00471434 +034 RECEIVER.exe Classes ThreadProc 00404d80 +028 RECEIVER.exe System ThreadWrapper 0044cd35 +00d RECEIVER.exe madExcept CallThreadProc 0044cd77 +037 RECEIVER.exe madExcept ThreadExceptFrame created by Main ($ae0) at: 005c4fee +022 RECEIVER.exe VrThreads 306 +2 TVrSystemThread.Create [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] Atualizando dados da GRID
Geleira
E ai lista...
lah vem eu de novo :D:D:D
seguinte agora a pergunta é bem chatinha e a solução também acho que será
beeemmm pancada:
sistema:
Um controle de Temperaturas de ambientes.:
funcionamento:
Recebe valores de aproximadamente uns 150 sensores de temperatura:
Funcionamento para o Usuário:
Tem uma GRID onde são exibidos os seguintes campos que vem de uma tabela de
entrada de dados:
SENSOR | TEMPERATURA | ULTMA LEITURA | STATUS
0001 |480°C| 08/02/06 10:35:27 | Acima
0002 |450°C| 08/02/06 10:35:39 | Normal
0003 |380°C| 08/02/06 10:34:12 | Normal
0004 |280°C| 08/02/06 10:36:01 | Abaixo
Continuando, quando o usuário clicar em uma linha do Grid eu atualizo um quadro
de informações mais completas do Sensor, como Foto do local, Técnico
responsável, etc, etc, etc...
Ai vem o lance: a cada 10 segundos eu tenho que atualizar os valores dessa
Grid e as vezes dah erro quando o kra clica na Grid bem na hora que eu vou dar
o Close; Open; na Query dessa GRID.
o que faço:
timerAtualiza:
sensor := tbTempSENSOR.value; //variavel sensor Global para armazenar o
sensor q a GRID estava posicionada
tbTemp.DisableControls;
tbTemp.Close;
tbTemp.Open;
tbTemp.EnableControls;
tbTemp.Locate('SENSOR', sensor, []);
Porém mesmo assim existem vezes que dah erros de Access Violation ou de
Canot Performe this operation on a Closed Data Set.
Acho que entra um clique no meio desse processo que me ferra a vida.
Haa só pra lembrar, isso acontece de 10 em 10 segundos em um ambiente com
aproximadamente 150 sensores.
Estou Usando:
Banco: MS-SQL Server
Acesso: ADOConection + ADOQuery
Versão do Delphi: 7
alguem ja teve algum projeto parecido ou alguem sabe uma maneira d fazer esse
processo não dar erros??? ja pensei em
usar 2 GRIDS com 2 Querys onde quando vou atualizar a GRID1, o kra fica usando
a GRID2 e vice-e-versa...
enfim, a duvida tah no ar
Abraço a todos
Atenciosamente,
Gerson
[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] Abrir PPT
Geleira Lista, boa tarde, Gostaria de saber se alguem ja fez uma coisa que parece simples, mas eu não consegui: Tenho a aplicação ABC.EXE e na mesma pasta um arquivo: DEF.ppt (powerPoint) e quero simplesmente abrir e imprimir o bixo, ja tentei usar o DEMO do Delphi, (PowerPointApplication), ja tentei usar Winexec, ja tentei OpenFile, mas não consegui. Se alguem ja fez isso e puder me enviar o código ou coisa do tipo agradeço [EMAIL PROTECTED] Haaa e , NÃO VAMOS começar com o manda pra mim também se não ja viu :D:D:D:D:D Abração a todos... e desde ja obrigado ;) Atenciosamente, Gerson Existem apenas 10 pessoas no mundo, as que entendem binário e as que não [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] OFF TOPIC - Hora homem
Geleira Amigos, BOM DIA, qual tem sido a Hora homem de Analise e de Desenvolvimento pratica pelos amigos, e qual você tem visto com sendo a média do mercado??? Costumam cobrar diferente a hora cobrada para Desenvolvimento e a hora cobrada por manutenção, ou seja, ajustes ou novidades pequenas no sistema?? por exemplo R$ 75,00 para analise, R$ 50,00 para desenvolvimento no escopo principal do Projeto e R$ 55,00 para analise, R$ 30,00 para desenvolvimentos posteriores, como uma mudança de tela, função , etc... valeu turma.. Atenciosamente, Gerson Thomaz Santos Analista de Sistema Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar ou divulgar as informações nela contidas ou tomar qualquer ação baseada nessas informações. Se você recebeu esta mensagem por engano, por favor avise imediatamente o remetente, respondendo o e-mail e em seguida apague-a. Agradecemos sua cooperação. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] OFF-TOPIC Valor Código Fonte
GeleiraCaros amigo, Boa Tarde.. sei que vai gerar muuuita discussão, por isso ja joguei como OFF rsrsrs Imaginem o seguinte: O Cliente me pediu um Cadastro de Locadora, com inteligencias, tipo, Mala direta automática, Leitor de código de barras, envio de email para lembrar clientes em atrazo, programação de locação, Relocação com valor fracionado, etc, etc, etc, etc... digamos que cobrarei R$ 2.500,00 pelo sistema, pronto, instalado e rodando. Ai ele me chega e pede os FONTES (Fato consumado) Vem a bucha: Alguem tem uma média de quantas vezes o valor do produto cobrar, tipo, 5 vezes, 10 vezes, ou uma Formula mágica (essa foi boa) rsrsrs tipo, ((valor do produto * 10) / 8) + 10 %.. Pra simplificar, pois sei que muitos iam colocar: Tu poderia explorar depois, vender pra outros, etc, o ambiente é: Ele quer os fontes pra ele, e eu não poderei utilizar os fontes pra outro sistema como o citado, nem alguns recursos de inteligências que foram idéias dele... Abração e grato á todos. Atenciosamente, Gerson Thomaz Santos Analista de Sistema Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar ou divulgar as informações nela contidas ou tomar qualquer ação baseada nessas informações. Se você recebeu esta mensagem por engano, por favor avise imediatamente o remetente, respondendo o e-mail e em seguida apague-a. Agradecemos sua cooperação. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] 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] JEDI
GeleiraCaros amigos da lista, alguem sabe onde tem um HELP detalhado sobre o JEDI. Baixei o Help do site, mas não explica praticamente nada, como por exemplo, eu queria poder saber a diferença entre a JvDBGrid e a JvDBUltimGrid... talvez a JvDBUltimGrid tenha algumas funções que estamos precisando aki, como algum modo de sort diferente. se alguem souber, agradeço... Atenciosamente, Gerson Thomaz Santos Analista de Sistema Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar ou divulgar as informações nela contidas ou tomar qualquer ação baseada nessas informações. Se você recebeu esta mensagem por engano, por favor avise imediatamente o remetente, respondendo o e-mail e em seguida apague-a. Agradecemos sua cooperação. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Relatórios em Delphi
Amigo Celso, quem se ofende é é a turma do EU sempre tenho razão AuHAUHuahuAHuhauHAUh aki na lista, pelomenos eu acho, somo todos crescidinho... e aproveitando a deixa... amigo, Celso, gente fina, camarada...(la em o golpe :P:P:P) me diz uma coisa, que acho q mais alguem aki poderia precisar: Conheces algum componente pra fazer Gráfico no Fortes??? volto a colocar, só não migrei pra ele pq não achei. eu gero relatórios gráficos em Pizza, Barra e Linhas, e no Fortes não achei nada ainda. sobre o lance de Tudo funcionar, o meu Quick tbm funfou tudo, bem, pelo menos tudo o que eu precisei até agora. Tah certo que teve algumas artemanhas escondidas que descobri depois de muito suor, mas funfou abração amigo... Gerson Thomaz Santos - Original Message - From: Celso Lorenzetti - GMail To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 20, 2005 12:10 PM Subject: Re: [delphi-br] Relatórios em Delphi Amigo, conheço o Quick e o Fortes www.fortesreport.com.br e te digo, sem a menor dúvida 1.000.000 de vezes o Fortes do que o Quick... Dá uma comparada nos dois e verá a diferença. 1. Precisão ao exportar para PDF, XLS, DOC, HTML; 2. Relatórios em colunas com mais opções; 3. Melhor estruturado as classes; 4. PageBreak que funciona; 5. Outros tipos de bandas, que no Quick não tem; 6. Converte automaticamente para matricial; 7. E o melhor, tudo funciona... 8. E outras tantas... P.S.: Quem utiliza o Quick, não se ofenda, é só minha opinião. Trabalhei 3 anos com o Quick, e ainda bem que conheci o Fortes. Ceslo Lorenzetti Original Message - From: lucsilfreitas To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 20, 2005 8:30 AM Subject: [delphi-br] Relatórios em Delphi Bom dia pessoal! Gostaria muito de uma informação: - Qual é a menhor ferramenta para gerar relatórios em Delphi 7? Tenho instalado em meu computador o crystal reports 9, mas não consigo assessa-lo. Já ouvi falar também de quick reports, mas não encontrei no CD de instalação de delphi. - Ele vem junto com o delphi ou é separado? No aguardo de respostas. LUCIANO -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Pegar o Nome do Componente
GeleiraCaros amigos, Creio que ja deve ter sido postado na lista, mas como eu ja procurei entra as mensagens antigas e não encontrei, alguem sabe uma maneira bem simples de pegar o nome do componente que eu cliquei: O objetivo real é o seguinte: Ao clicar em um Painel, eu verifico se ele esta em azul, se sim mudo ele pra amarelo. Até ai tudo bem, eu poderia usar: if Panel1.color = 'clNavy' then Panel1.color:='clYellow'; mas ai é q o bicho pega. tenho q fazer essa verificação em um quadro de paineis que tem só 672 paineis hehehe agora ficou chato né ter q fazer em um por um... então o que eu queria era algo tipo: if PAINEL_QUE_EU_CLIQUEI.color = 'clNavy' then PAINEL_QUE_EU_CLIQUEI.color:='clYellow'; Onde o PAINEL_QUE_EU_CLIQUEI fosse uma variavel mesmo que recebesse o nome do bixo, ai eu faço a rotina apenas no OnClick do Painel1 e faço todos os outros 671 paineis terem o mesmo painel1onclick... UFA... espero que tenham entendido.. abração a todos... Atenciosamente, Gerson Thomaz Santos Analista de Sistema [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Pegar o Nome do Componente
Vitãão... Tu salvou minha noite Kra... valeu mesmo amigo... agora vou sair um pouquinho mais cedo :D:D:D:D brigadão kra... deu certinho .. Abração Gerson - Original Message - From: Vitor Luiz Redes To: delphi-br@yahoogrupos.com.br Sent: Monday, December 12, 2005 9:01 PM Subject: Re: [delphi-br] Pegar o Nome do Componente if TPanel( Sender ).Color = clActiveBorder then TPanel( Sender ).Color := clBlack else TPanel( Sender ).Color := clActiveBorder; Vitor. - Original Message - From: Gerson Thomaz Santos To: Delphi-BR Sent: Monday, December 12, 2005 6:59 PM Subject: [delphi-br] Pegar o Nome do Componente GeleiraCaros amigos, Creio que ja deve ter sido postado na lista, mas como eu ja procurei entra as mensagens antigas e não encontrei, alguem sabe uma maneira bem simples de pegar o nome do componente que eu cliquei: O objetivo real é o seguinte: Ao clicar em um Painel, eu verifico se ele esta em azul, se sim mudo ele pra amarelo. Até ai tudo bem, eu poderia usar: if Panel1.color = 'clNavy' then Panel1.color:='clYellow'; mas ai é q o bicho pega. tenho q fazer essa verificação em um quadro de paineis que tem só 672 paineis hehehe agora ficou chato né ter q fazer em um por um... então o que eu queria era algo tipo: if PAINEL_QUE_EU_CLIQUEI.color = 'clNavy' then PAINEL_QUE_EU_CLIQUEI.color:='clYellow'; Onde o PAINEL_QUE_EU_CLIQUEI fosse uma variavel mesmo que recebesse o nome do bixo, ai eu faço a rotina apenas no OnClick do Painel1 e faço todos os outros 671 paineis terem o mesmo painel1onclick... UFA... espero que tenham entendido.. abração a todos... Atenciosamente, Gerson Thomaz Santos Analista de Sistema [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] ADO Acces com senha
Amigo, BOM DIA, vc tem q especificar a senha no Connection String. eu seto isso na hora que vou rodar, pegando de um arquivo.txt criptografado que, claro, tem um configurador: Ela sem criptografar fica assim: Provider=Microsoft.Jet.OLEDB.4.0; User ID=Admin; Data Source=ARQUIVO.MDB; Mode=ReadWrite; Extended Properties=; Jet OLEDB:System database=; Jet OLEDB:Registry Path=; Jet OLEDB:Database Password=senha_do_arquivo_ACCESS; Jet OLEDB:Engine Type=5; Espero que ajude OK... Abração... Gerson Thomaz Santos - Original Message - From: pcinfowave To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 07, 2005 10:17 PM Subject: [delphi-br] ADO Acces com senha Ola.. Gostaria de me conectar com um BD Access protegido por senha. Alguem pode dar um help, pois ja consegui conectar sem senha, mas com senha nao consigo. De ja agradeço []´s Paulo -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Fw: RELAX!!!...As melhores de 2005
Francisco, tirando que é OFF-Topic, a lista de contatos que veio junto tah massa heim.. auHAUhuaUAHUhauHUAHUhau imagina mandar um emial daqueles pra esses contatos todos, Vanessa, Renata, Nina, Gislene, Kátia, Lízia, carla... abração kra... e boa sorte nos outros emails CC. - Original Message - From: Francisco To: (*)Priscila - Arilu Calcados(S) Cc: Zelio ; VANESSA OLIVEIRA SANTOS ; Vanessa ; Valmir ; Topmaq ; Renata - Arilu ; Raio Filho ; Nina ; Napinho ; najila carvalho ; musica Denilson ; Mol SM - Peças ; Mol SM - Gerente Pós Vendas - (Osmar) ; Mol SM - Gerente de Vendas -(Edinaldo Castro) ; Mol SM - Financeiro ; Mol SM - Contabilidade ; Mol Nova Venecia - Vendas ; Mol BSF - Gerente Geral - Novo Celular: (27) 8119 9747 ; Mol BSF - Financeiro - Karla ; MILENA RAMOS ; MAX - LI, EU TE AMO MUTO ; Maria ; Marcosta ; Márcio Vilic (T)6781-8972 (mp)9145-9563 ; marcio ; luiz ; Logos ; Lizia ; Linsmar ; Kátia Maia da Silva ; Junior ; Jorge Loiro ; Jailson-BA (mp) 0**73 9191-7327 ; Jack Arilu ; Heron (Topmaq Automação Comercial - 0**71 3261-5000) ; Heber Guirra - Supermercados Familia ; Heber ; Gislene ; FRIGOBOM ; [EMAIL PROTECTED] ; FireBase ; Familia Souza Romano ; Eletrosantos ; Ednei ; eden stephane ; Diego ; Depart. de Informática ; delphi-br@yahoogrupos.com.br ; Daniel Simoes de Ameida ; danarf ; CNH - CONTEMPLAÇÃO - KATU ; carlossilvapm ; Carlinhos ; carla santos ; [EMAIL PROTECTED] ; Audicon - José Antonio ; Antonio Lomba ; Alessandra - Brasilia ; ALBERTOfoxsom-instrumentosmusicais Porto Seguro ; (li) Eddie (#)(h) Sent: Tuesday, December 06, 2005 9:58 PM Subject: [delphi-br] Fw: RELAX!!!...As melhores de 2005 Subject: ENC: RELAX!!!...As melhores de 2005 As melhores frases do ano de 2005 Homem é como vassoura: sem o pau, não serve pra nada. Os homens mentiriam muito menos se as mulheres fizessem menos perguntas. Marido é igual a menstruação: Quando chega, incomoda; quando atrasa, preocupa. ...Se dinheiro falasse, o meu diria tchau... Aquele que, ao longo de todo o dia: é ativo como uma abelha, forte como um touro, trabalha que nem um cavalo, e que ao fim da tarde se sente cansado que nem um cão... deveria consultar um veterinário. é bem provável que seja um grande burro . A calcinha não é a melhor coisa do mundo, mas está bem perto. O homem é um ser tão dependente que até pra ser corno precisa da ajuda da mulher! Estar junto não é estar ao lado, mas é estar dentro. A mulher está sempre ao lado do homem, para o que der e vier; já o homem, está sempre ao lado da mulher que vier e der. Se sua mulher pedir mais liberdade, compre uma corda mais comprida... Se um dia sentir um enorme vazio dentro de você . Vá comer, que é fome!!... Todo homem tem a fantasia de fazer sexo com duas mulheres ao mesmo tempo. As mulheres deveriam gostar da idéia. Pelo menos, teriam com quem conversar depois que ele pegasse no sono. Se for dirigir, não beba. Se for beber, me chama. Mulher feia é que nem muro alto, primeiro dá um medo, mas depois a gente acaba trepando. Quando lhe atirarem uma pedra, faça dela um degrau e suba... Só depois, quando tiver uma visão plena de toda a área, pegue outra pedra, mire bem e acerte o crânio do filho da puta que lhe atirou a primeira. Sabe o que é a Meia Idade? É a altura da vida em que o trabalho já não dá prazer e o prazer começa a dar trabalho !!! Sempre que possível, converse com um saco de cimento. Nessa vida só devemos acreditar no que é concreto! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Conexão atrávés da ADO.
Amigo, faltou tu sitar qual o banco de dados tais usando, eu por exemplo acesso, Firebird (com um componente de acesso Free para ADO) e MS-SQL server e não há a necessidade de tu criar um ODBC, visto que tu pode configurar toda a conection String no ADOConnection. Abração Gerson Thomaz Santos - Original Message - From: criamabr To: delphi-br@yahoogrupos.com.br Sent: Tuesday, November 29, 2005 1:39 PM Subject: [delphi-br] Conexão atrávés da ADO. Olá pessoal!!! Estou fazendo uns testes de conexão atrávés da ADO mas estou tendo alguns probleminhas em usar em rede. Estou utilizando os compenentes: TDOConnection, TataSource e TDOQuery. Criei uma conexão com banco via ODBC e conecto meu TDOConnection a ela. Blz!!! Consigo enchergar os registros, incluir e alterá-los sem nenhum problema, mas se for local. Em rede, quando excluo, exibe uma mensagem (que não programei) que excluí o registro, etc. Quando incluo em umas das estações, não exibe o registro na outra, mesmo dando um refresh, só aparece se eu fechar e abrir o DadaSet. Podem me ajudar em como utilizar a ADO em rede. Desde já, obrigado. Abraço, Cristiano. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Diferença entre datas
Ooo amigo, tu ta com sorte mesmo heim... eu postei uma resposta igualzinha em uma lista, hoje mesmo sente só..: Amigo, tem umas Funções no Delphi que são para ver dia, minutos, horas, etc entre duas datas: Abaixo segue como vc pode usar e exibir em um Edit2 a diferença do tempo: Edit2.Text:= IntToStr(YearsBetween(now,StrToDatetime(edit1.Text))) + ' Anos - ' + IntToStr(MonthsBetween(now,StrToDatetime(edit1.Text))) + ' Meses - ' + IntToStr(DaysBetween (now,StrToDatetime(edit1.Text))) + ' Dias - ' + IntToStr(HoursBetween (now,StrToDatetime(edit1.Text))) + ' Horas - ' + IntToStr(MinutesBetween (now,StrToDatetime(edit1.Text))) + ' Minutos - ' + IntToStr(SecondsBetween (now,StrToDatetime(edit1.Text))) + ' Segundos - ' + IntToStr(MilliSecondsBetween (now,StrToDatetime(edit1.Text))) + ' Milisegundos'; Acho q ajudou .. Abração Gerson thomaz Santos - Original Message - From: Alfredo Brandes To: delphi-br@yahoogrupos.com.br Sent: Friday, November 25, 2005 4:41 PM Subject: [delphi-br] Diferença entre datas Como eu faço pra calcular a diferença em dias entre duas datas??? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Cor do Botão
GeleiraCaros amigos, Alguem sabe como trocar a cor de um botão... []´s Atenciosamente, Gerson Thomaz Santos Analista de Sistema [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
