[delphi-br] Manipulação de Tabela Excel
Existe um modelo de uma tabela aqui na empresa usada pra fichas de ponto de funcionários. O que queria fazer é imprimir o nome do funcionário em arquivos Excel no campo aonde seria o nome do funcionário. E depois imprimir... alguém tem um exemplo de como fazer isso? _ E-mail classificado pelo Identificador de Spam Inteligente. Para alterar a categoria classificada, visite o Terra Mail http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=jvp.vinicius_l=1,118657 0376.182081.7152.cadarga.hst.terra.com.br,21293,Des15,Des15 _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 07/08/2007 / Versão: 5.1.00/5092 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Sockets na Marra
Gostaria de saber se alguém conhece alguma biblioteca para delphi (unit) para trabalhar com sockets com um nível de abstração menor que uso de componentes indy e serversocket do próprio dephi. Gostaria de trabalhar no delphi com sockets da mesma forma que trabalho com C++ e C pra poder conseguir fazer o que preciso... de preferência com exemplos... Com certeza muitos já precisaram disso... _ E-mail classificado pelo Identificador de Spam Inteligente. Para alterar a categoria classificada, visite o Terra Mail http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=jvp.vinicius_l=1,1181325677 .666839.17418.fomboni.hst.terra.com.br,15056,20031127114101,20031127114101 _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 07/06/2007 / Versão: 5.1.00/5048 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Rotina de Conexão com o Banco
Estou tendo um problema com meu sistema usando ZeosLib e MySQL que ao tentar se conectar ao banco fica muito lenta alguém pode me passar rotinas de conexão com o banco que vocês usam até para eu tirar idéia de como fazer corretamente... Estou interessado na lógica... _ E-mail classificado pelo Identificador de Spam Inteligente. Para alterar a categoria classificada, visite o Terra Mail http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=jvp.vinicius_l=1,1180355236 .914294.17434.domoni.hst.terra.com.br,18014,Des15,Des15 _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 25/05/2007 / Versão: 5.1.00/5039 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Numero de usuários
Eu trabalho exatamente com esse tipo de controle e trabalho desenvolvendo soluções para esse fim. Vou explicar superficialmente como funciona esse tipo de controle que você precisa em sua aplicação limitada pelo numero de acessos. Você deve criar uma rotina que de tempo em tempo cria um registro na tabela dizendo estou aqui com um tempo de vida. Então cada vez que entrar na aplicação você deve constar se existe mais conexões com mais tempo de vida que o definido. Cada vez que vc inicia a aplicação você já destrói os registros com mais tempo de vida do definido e analisado de tempo em tempo e atualizando os registros com novos delays. O ideal é trabalhar com Stored Procedure para esse fim para minimizar o uso da rede e atribuir mais serviço ao servidor. Qualquer problema pode me procurar no MSN: [EMAIL PROTECTED] _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Sérgio T. Uetanabaro Enviada em: quinta-feira, 19 de abril de 2007 18:01 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Numero de usuários Mas o problema ainda vai persistir pq se ele der um CAD e matar o processo o decremento nao será executado. Caso chegue a estourar o nro de licensas, um suportezinho será necessário []´s Sergio _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Régis Bender Enviada em: quinta-feira, 19 de abril de 2007 17:44 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: [delphi-br] Numero de usuários Uma idéia que eu te dou é criar uma tabela aonde aparece o número de cópias registradas e cada vez que entra no sistema faz a validação na tabela. Por exemplo: você permite três usuários na tabela. quando você entra no sistema, testa se a permissão é diferente de zero. Caso seja, ele altera essa tabela e diminui '1'. E se for = a '0', vc deixa uma mensagem dizendo que o número de usuarios permitido é '3'. Não esqueça de incrementar essa tabela ao sair do sistema. abraço sds Bender Desenvolvimento de Sistemas e Serviços Contábeis (Régis) (51) 98470699 Novo Hamburgo/RS MSN: [EMAIL PROTECTED] mailto:regissk8%40terra.com.br com.br - Original Message - From: Sérgio T. Uetanabaro To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Thursday, April 19, 2007 5:32 PM Subject: RES: [delphi-br] Numero de usuários Infelizmente só tem solução q dói... hehehe. Tentar ver algum esquema de dar um broadcast na rede em que seu software responda a esse broadcast e conte o nro de softwares rodando... tem muito softwares q estao fazendo isso. []´s Sergio _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Ricardo César Cardoso Enviada em: quinta-feira, 19 de abril de 2007 16:06 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: [delphi-br] Numero de usuários CAD = CTRL + ALT + DEL. Imagine... abreviação da abreviação... Alberto alberto.ferreira@ mailto:alberto.ferreira%40tan.com.br tan.com.br escreveu: Obrigado Sergio, mas... não tem nada mais simples? É que é um software distribuído, de prateleira e sem manutenção. Teria que colocar esse autenticador como um serviço no windows e tudo mais, me preocupar se ele está no ar, além do mais pode ser que algumas máquinas desses usuários não possam nem ser chamadas de estação, quem dirá de servidores. O que é CAD? []s - Original Message - From: Sérgio T. Uetanabaro To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Thursday, April 19, 2007 9:31 AM Subject: RES: [delphi-br] Numero de usuários Acho q a melhor opção seria vc ter um servidor de autenticacao de copia. Toda vez que um usuario logar no seu sistema vc acessa esse servidor via TCP, por exemplo, e autentica a copia, mantendo nele o nro de copia rodando na rede interna, tratando devidamente o OnDisconnect para que não haja problemas de matar o processo no CAD. Acho que eh a opcao mais correta e facil de se fazer isso. []´s Sergio Uetanabaro _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Alberto Enviada em: quinta-feira, 19 de abril de 2007 08:34 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: [delphi-br] Numero de usuários Olá, Existe alguma maneira de saber quantos usuários estão logados no sistema em uma rede interna? Ou refazendo a pergunta: Preciso controlar o número de copias, qual a melhor opção? Pensei no seguinte, o usuário pode instalar o sistema em várias máquinas, mas se a sua copia dá direito a dois usuários, para o terceiro entrar alguém precisa sair. Poderia até gravar uma flag no banco e comparar algo como n_copias X n_logados, mas
RES: [delphi-br] Tratamento de Imagens no Delphi [Como comprimir?]
Uma coisa que deve ser levada em questão é o tempo entre compactar e arquivar depois descompactar para vizualizar. Se for uma imagem jpeg não vale a pena esse custo de processamento em oposto ao ganho em compressão que é muito insignificante. E caso for imagens BMP é mais fácil converter para JPEG antes. Mas só vale mesmo a compressão se você tiver que realmente salvar BMP no banco. Se precusar de rotinas de compactação só falar... _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Sérgio T. Uetanabaro Enviada em: quinta-feira, 19 de abril de 2007 17:43 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Tratamento de Imagens no Delphi [Como comprimir?] Para utilizar compressao acredito que vc vai ter q fazer isso na mao. Comprimir antes de gravar e descomprimir para depois mostrar. A nao ser q tenha componentes pronto para isso, mas nao conheço nenhum. []´s Sergio _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br] Em nome de Berdam Enviada em: quinta-feira, 19 de abril de 2007 11:44 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: [delphi-br] Tratamento de Imagens no Delphi [Como comprimir?] existe o tipo de campo blob, ele permite inserção de imagens. Són sei a taxa de compressão. silvano_monteiro escreveu: Boa tarde pessoal Estou com uma questao. Queria a opniao de vcs sobre qual a melhor maneira de se gravar uma imagem em um bando de Dados para q ela fique mais leve possivel. Se existe alguma maneira da imagem ser comprimida ao Gravar ou existe alguma rotina pra gravar ela q ocupe pouco espaco no Banco de Dados. Eu estou utilizando D7 + Firebird Alguem poderia me ajudar??? Desde ja Agradeco Silvano Monteiro Cuiabá-MT [As partes desta mensagem que não continham texto foram removidas] _ E-mail classificado pelo Identificador de Spam Inteligente. Para alterar a categoria classificada, visite o Terra Mail http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=jvp.vinicius_l=1,1177015631 .867734.32405.assuan.hst.terra.com.br,17786,Des15,Des15 _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 19/04/2007 / Versão: 5.1.00/5013 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Componente WebCam
Estou precisando de um componente freeware ou opensource para tirar fotos com a webcam para utilizar em um modulo de cadastro... Estou procurando e até agora não encontrei nenhum que me agrade... Alguém pode dar dicas de algum bom ? [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Alguem tem uma função Parecida?
Estou precisando de uma função que ao ser passado um diretório me retorne uma lista de arquivos daquele diretório e de seus subdiretórios... por exemplo, se eu colocasse como parâmetro c:\ ele me retornaria todos os arquivos do meu hd... +/- isso que to precisando... Já consegui fazer uma função que retorne tudo de um determinado diretório, mas não de seus subdiretórios... _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 02/06/2006 / Versão: 4.4.00/4776 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
RES: [delphi-br] Esconder Aplicação do Usuário
Isso só funciona no Windows 9x eu acho... -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Andre Luis Enviada em: terça-feira, 30 de maio de 2006 17:00 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Esconder Aplicação do Usuário {Para ocultar um programa, deve-se registrar este como um serviço do Windows. Normalmente um serviço do Windows é ativado quando com a inicialização do sistema (Windows) e pemanece ativo até a finalização deste. Este processo esconde o programa da lista Ctrl+Alt+Del} Const Servico_Simples = 1; Servico_Unregister = 1; Function RegisterServiceProcess(DwProcessID, dwType: DWord): DWord; StdCall; External 'KERNEL32.dll'; procedure TForm1.FormCreate(Sender: TObject); begin RegisterServiceProcess(GetCurrentProcessID, Servico_Simples); end; procedure TForm1.FormDestroy(Sender: TObject); begin RegisterServiceProcess(GetCurrentProcessID, Servico_Unregister); end; end. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.ard.yahoo.com/SIG=12fgqjd7g/M=396559.7942981.9535540.2369893/ D=brclubs/S=2137111264:HM/Y=BR/EXP=1149026419/A=3739190/R=0/id=noscript/ SIG=154dcqslu/*http:/lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BA DGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/de sktops?c%3dbr%26l%3dpt%26s%3ddhs _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 30/05/2006 / Versão: 4.4.00/4773 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
[delphi-br] Esconder Aplicação do Usuário
Estou desenvolvendo um aplicativo que monitora tudo que o funcionário faz nas estações de trabalho aqui de onde eu trabalho. Ele funciona tirando screenshot de tempo em tempo... Já consegui fazer o aplicativo ficar bastante interessante, já adicionei vários tipos de implementações de modo que ele só tire fotos quando o usuário esteja trabalhando realmente e não consumir recursos sem necessidade. Mas ainda não sei como fazer que esse aplicativo não apareça para o usuário. Queria que ele ficasse invisível... Por enquanto está funcionando no tray, mas já aconteceu de alguns usuários desligarem o aplicativo. _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 29/05/2006 / Versão: 4.4.00/4772 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
RES: [delphi-br] INDY - Configuração
Em que propriedade habilito essa autentificação ? -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alosi yarru Enviada em: terça-feira, 23 de maio de 2006 23:04 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] INDY - Configuração atualize teu indy que tem como enviar sim, eu utilizo com autenticação e funciona. Uso D6 com Indy 10. t+ - Original Message - From: Sylvio Rodrigues ® [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, May 23, 2006 10:36 PM Subject: [delphi-br] INDY - Configuração Bom dia Fiz um exemplo do site active delphi para envio de e-mails através do delphi (INDY), deu certo com os provedores UOL e YAHOO, mas não funciona com o Gmail e FlexHost que requerem autenticação no servidor. Estou usando delphi 7. Alguem já passou por isto e saberia como resolver ? instruções do provedor para configuração smtp: (marque a opção meu servidor requer autenticação e clique em configurações e marque tbm fazer logon usando.)* Obrigado !!! * -- Sylvio Rodrigues (r) fone: (17) 8112-9812 e-mail/msn: [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos ___ Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz. http://br.info.mail.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.ard.yahoo.com/SIG=12f2v9apn/M=396559.7942981.9484408.2369893/ D=brclubs/S=2137111264:HM/Y=BR/EXP=1148443515/A=3718281/R=2/id=noscript/ SIG=154dcqslu/*http:/lt.dell.com/lt/lt.aspx?CID=13040LID=340715DGC=BA DGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/de sktops?c%3dbr%26l%3dpt%26s%3ddhs http://br.i1.yimg.com/br.yimg.com/i/230506_y300x250_maio03_dhs_dim5150. gif _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 23/05/2006 / Versão: 4.4.00/4768 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
RES: [delphi-br] Tá aí uma grande dúvida
Bom, esse esquema de verificar pelo serial do HD é muito antigo e muitas vezes fácil de ser burlado através de editores hexadecimal. Qualquer pessoa que saiba o mínimo de assembler consegue burlar tal proteção, porém como se vende sistemas para empresas leigas ainda é uma ótima opção. Mas vamos a sua duvida... Eu conheço muito sistemas de proteção eficientes para software e vou descrever alguns usados por ai... ## Inicialização por loader.## Esse método de proteção consiste em criar um arquivo executável de espere um parâmetro basiado na data e uma tabela de criptografia que é ativado pelo loader. O loader é um programa que chama esse programa principal, ou seja, sua aplicação, com a senha correta. Ai você pode me perguntar, qualquer pessoa pode copiar um loader de outra pessoa e crackear seu programa. De forma nenhuma... Se você tiver uma conexão online pode ser verificado através de um banco de dados online ou um webservice a validade daquele usuário e automaticamente revalidar esse loader como se fosse um sistema de atualização online do seu software, porem atualiza esse loader que normalmente é um programinha feito em C ou Cpp para que seja bem pequeno. Já vi alguns softwares usando esse sistema que espera que o usuário fique online de período em período (no caso do sistema que verifiquei era a cada semana) e revalidava o loader. Funcionava muito bem. Número Serial: O Programa possui um número único serial que o habilita completamente. Prós: O usuário somente digita o serial e pronto, o programa está liberado. Ideal para softwares de prateleira aonde o usuário já adquiriu o produto. O sistema preferido para a divulgação indireta. Contras: Centenas de outros usuários somente digitam o mesmo serial e pronto: centenas de programas registrados. Use esta forma caso não deseje receber pelo seu programa ou queira uma divulgação indireta do mesmo e esperar pela consciência do usuário, isso não funciona no Brasil. Centenas ou milhares de usuário podem usar o mesmo serial. Esta caindo em desuso rapidamente pois há centenas de sites com index sofisticados de seriais para qualquer programa o que torna o sistema quase completamente inútil hoje em dia. HardLocks: Um pequeno dispositivo é colocado na porta serial, paralela ou USB com uma identificação única para liberar o funcionamento do sistema. Prós: Um dos sistemas mais difíceis de serem quebrados e definitivamente o mais seguro. Garante a taxa de uma licença por máquina o que é o ideal. Para sistemas caros (algo acima de $1000,00) considere seriamente o uso de HardLocks. Contras: Custo do HardLock por cópia licenciada e alguns problemas (raros) com periféricos usando aquela mesma porta, mas nada tão sério assim para prejudicar o usuário. As portas seriais e paralelas estão caindo em desuso com o USB e já existem HardLocks para elas também. Os Hardlocks pode apresentar defeitos dependendo do tipo. Você deve adquirir um kit de gravação e um Hardlock para cada cópia de distribuição. Não é muito caro mas o seu software deve compensar isto obviamente. Disquete de Habilitação: Um disquete é fornecido junto com o programa para a sua habilitação ou desabilitação. Prós: É o hardlock dos pobres sem o mesmo nível de proteção. Contras: Não faça proteção via disquetes de habilitação/desabilitação como o Dr. Case e outros. É perda de tempo ! Há vários utilitários que fazem a cópia perfeita do disquete sendo possível habilitá-lo em qualquer máquina. E ainda pode-se ter o problema de superfície no disco e um belo dia quando o usuário precisar instalar o software em outra máquina ele terá a surpresa do disco já mofado ou perdido. Tenha certeza que isto sempre acontece no final de semana quando ele liga para o seu escritório na segunda descarregando o seu vocabulário. Identidade Única: Uma das melhores e mais eficientes tipos de proteções é de identidade do equipamentos recentemente implementado pela própria Microsoft. Isto consiste em recolher dados únicos sobre o seu computador como serial do HD, informação da BIOS (não aconselhável), Versão do OS, Nome do computador etc. Com base nestas informações você poderá gerar uma fechadura de identificação. Essa fechadura precisará de uma chave fornecida por você para habilitar o seu software unicamente para aquela máquina. Prós: Difícil de ser quebrado quando bem implementado e permite alta adaptabilidade contra cracks criado contra o sistema como patchs invisíveis que permitem a modificação do sistema. Permite a taxa de apenas uma licença por computador. Contras: Caso o usuário formate a maquina, modifique periféricos chaves o sistema pode desabilitar a cópia automaticamente. Isto cria problemas com a solicitação de uma nova licença para instalação. O usuário pode simplesmente ligar alegando este fato e de boa fé você terá que fornecer uma nova liberação. Habilitação Pela Internet: Ao adquirir um produto o usuário recebe uma senha que permite a geração de um número para habilitação e instalação em uma máquina. Prós: Após
RES: [delphi-br] Componente / Lib / Class Webcam
O Rafael que ficou de mandar o componente que tira foto com webcam e falo que ia mandar por email não o fez... então continua a questão... Alguém tem um tal componente que faz isso ? Se tiver segue meu e-mail... [EMAIL PROTECTED] se eu receber fico comprometido em disponibilizar parada todos... _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Vinicius Florido Enviada em: sábado, 20 de maio de 2006 13:39 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Componente / Lib / Class Webcam Quero sim me mande um email com o componente se for possível. [EMAIL PROTECTED] -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rafael Enviada em: sexta-feira, 19 de maio de 2006 16:51 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Componente / Lib / Class Webcam Então, eu tenho um componente que tira foto direto da web cam, eu utilizo ele em algumas aplicações minhas! Se quiser me envie um e-mail solicitando. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Vinicius Florido Enviada em: sexta-feira, 19 de maio de 2006 16:16 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Componente / Lib / Class Webcam Estou desenvolvendo um sistema que em certo momento do cadastro do cliente deve-se adicionar uma foto através da webcam. Hoje o sistema aceita fotos de meios externos através da escolha direta da foto em um dialog de fotos. Mas nesse caso o ideal seria tirar a foto usando a webcam. Alguém conhece um componente ou classe ou biblioteca ou dll, freeware que faça tal coisa? Mesmo que não seja freeware mas vocês já tenham usado e aconselhem comprar por favor me indique. Grato desde já... _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 19/05/2006 / Versão: 4.4.00/4766 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.ard.yahoo.com/SIG=12f7lg0e1/M=396559.7942981.9477179.2369893/ D=br clubs/S=2137111264:HM/Y=BR/EXP=1148073410/A=3714796/R=2/id=noscript/SIG= 1554 ctaqg/*http:/lt.dell.com/lt/lt.aspx?CID=13048LID=341557DGC=BADGSeg=DH SDU RL=http://www1.la.dell.com/content/products/category.aspx/notebooks?c%3d br%2 http://www1.la.dell.com/content/products/category.aspx/notebooks?c%3dbr %252 6l%3dpt%26s%3ddhs http://br.i1.yimg.com/br.yimg.com/i/br/ads7/220506_y300x250_maio03_dhs_ note d510.gif _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.ard.yahoo.com/SIG=12fch8vcu/M=396559.7942981.9477179.2369893/ D=brclubs/S=2137111264:HM/Y=BR/EXP=1148139664/A=3714796/R=2/id=noscript/ SIG=1554ctaqg/*http:/lt.dell.com/lt/lt.aspx?CID=13048LID=341557DGC=BA DGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/no tebooks?c%3dbr%26l%3dpt%26s%3ddhs http://br.i1.yimg.com/br.yimg.com/i/br/ads7/220506_y300x250_maio03_dhs_ noted510.gif _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 19/05/2006 / Versão: 4.4.00/4766 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.ard.yahoo.com/SIG=12fblfdpm/M=396559.7942981.9477179.2369893/ D=br clubs/S=2137111264:HM/Y=BR/EXP=1148150665/A=3714796/R=2/id=noscript/SIG= 1554 ctaqg/*http://lt.dell.com/lt/lt.aspx?CID=13048 http://lt.dell.com/lt/lt.aspx?CID=13048LID=341557DGC=BADGSeg=DHSD LID=341557DGC=BADGSeg=DHSD URL="" href="http://www1.la.dell.com/content/products/category.aspx/notebooks?c%3">http://www1.la.dell.com/content/products/category.aspx/notebooks?c%3 dbr% http://www1.la.de
RES: [delphi-br] Componente / Lib / Class Webcam
Quero sim me mande um email com o componente se for possível. [EMAIL PROTECTED] -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rafael Enviada em: sexta-feira, 19 de maio de 2006 16:51 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Componente / Lib / Class Webcam Então, eu tenho um componente que tira foto direto da web cam, eu utilizo ele em algumas aplicações minhas! Se quiser me envie um e-mail solicitando. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Vinicius Florido Enviada em: sexta-feira, 19 de maio de 2006 16:16 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Componente / Lib / Class Webcam Estou desenvolvendo um sistema que em certo momento do cadastro do cliente deve-se adicionar uma foto através da webcam. Hoje o sistema aceita fotos de meios externos através da escolha direta da foto em um dialog de fotos. Mas nesse caso o ideal seria tirar a foto usando a webcam. Alguém conhece um componente ou classe ou biblioteca ou dll, freeware que faça tal coisa? Mesmo que não seja freeware mas vocês já tenham usado e aconselhem comprar por favor me indique. Grato desde já... _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 19/05/2006 / Versão: 4.4.00/4766 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.ard.yahoo.com/SIG=12f7lg0e1/M=396559.7942981.9477179.2369893/ D=br clubs/S=2137111264:HM/Y=BR/EXP=1148073410/A=3714796/R=2/id=noscript/SIG= 1554 ctaqg/*http:/lt.dell.com/lt/lt.aspx?CID=13048LID=341557DGC=BADGSeg=DH SDU RL=http://www1.la.dell.com/content/products/category.aspx/notebooks?c%3d br%2 http://www1.la.dell.com/content/products/category.aspx/notebooks?c%3dbr %252 6l%3dpt%26s%3ddhs http://br.i1.yimg.com/br.yimg.com/i/br/ads7/220506_y300x250_maio03_dhs_ note d510.gif _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html . [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.ard.yahoo.com/SIG=12fch8vcu/M=396559.7942981.9477179.2369893/ D=brclubs/S=2137111264:HM/Y=BR/EXP=1148139664/A=3714796/R=2/id=noscript/ SIG=1554ctaqg/*http:/lt.dell.com/lt/lt.aspx?CID=13048LID=341557DGC=BA DGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/no tebooks?c%3dbr%26l%3dpt%26s%3ddhs http://br.i1.yimg.com/br.yimg.com/i/br/ads7/220506_y300x250_maio03_dhs_ noted510.gif _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 19/05/2006 / Versão: 4.4.00/4766 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
RES: [delphi-br] Componente / Lib / Class Webcam
To usando uma webcam genérica daquelas bem simples... Estou reconhecendo ela pelo Windows... procurei na net não achei nada de como fazer isso diretamente pelo delphi nem como usar a API do Windows para tal. Achei um componente dentro do Jedi Project que atende parcialmente, mas não extamente as espectativas. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Desenvolvimento (Anderson) Enviada em: sexta-feira, 19 de maio de 2006 16:37 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Componente / Lib / Class Webcam veja: vc tem 2 formas: usar o proprio driver da webcam ou usar o twain do windows (usar o windows pra reconhecer a webcam). As duas é fácil de fazer... vc encontra na net essas explicações... qual a webcam q vc ta usando? Se for logitech, procure por LVPORTAL nos sites de busca, q vc acha... - Original Message - From: Vinicius Florido To: delphi-br@yahoogrupos.com.br Sent: Friday, May 19, 2006 4:16 PM Subject: [delphi-br] Componente / Lib / Class Webcam Estou desenvolvendo um sistema que em certo momento do cadastro do cliente deve-se adicionar uma foto através da webcam. Hoje o sistema aceita fotos de meios externos através da escolha direta da foto em um dialog de fotos. Mas nesse caso o ideal seria tirar a foto usando a webcam. Alguém conhece um componente ou classe ou biblioteca ou dll, freeware que faça tal coisa? Mesmo que não seja freeware mas vocês já tenham usado e aconselhem comprar por favor me indique. Grato desde já... _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 19/05/2006 / Versão: 4.4.00/4766 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [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!. __ Informação do NOD32 IMON 1.1548 (20060519) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE http://br.ard.yahoo.com/SIG=12fbp6mm9/M=396559.7942981.9477179.2369893/ D=brclubs/S=2137111264:HM/Y=BR/EXP=1148074478/A=3714796/R=2/id=noscript/ SIG=1554ctaqg/*http:/lt.dell.com/lt/lt.aspx?CID=13048LID=341557DGC=BA DGSeg=DHSDURL=http://www1.la.dell.com/content/products/category.aspx/no tebooks?c%3dbr%26l%3dpt%26s%3ddhs http://br.i1.yimg.com/br.yimg.com/i/br/ads7/220506_y300x250_maio03_dhs_ noted510.gif _ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do http://br.yahoo.com/info/utos.html Serviço do Yahoo!. _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 19/05/2006 / Versão: 4.4.00/4766 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
[delphi-br] Duvida sobre TService
Estou fazendo um aplicação para verificar o que as estações de trabalho estão fazendo durante o dia... Criei em forma de serviço... Porem com instalar o serviço na maquina parece que o sistema fica instável e trava a janela do painel de controle... Aqui está o código da aplicação Classe Principal do Serviço unit USRECKIT2; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs, ExtCtrls, MoveDetect, Jpeg, RecKitCapture; type TSRECKIT2 = class(TService) procedure ServiceAfterInstall(Sender: TService); procedure ServiceStart(Sender: TService; var Started: Boolean); procedure ServiceContinue(Sender: TService; var Continued: Boolean); procedure ServicePause(Sender: TService; var Paused: Boolean); procedure ServiceShutdown(Sender: TService); procedure ServiceStop(Sender: TService; var Stopped: Boolean); procedure ServiceExecute(Sender: TService); private RecKitCap: TRecKitCap; public function GetServiceController: TServiceController; override; procedure DefaultFolder; end; var SRECKIT2: TSRECKIT2; implementation uses DOTExtLib, IniFiles; {$R *.DFM} procedure ServiceController(CtrlCode: DWord); stdcall; begin SRECKIT2.Controller(CtrlCode); end; function TSRECKIT2.GetServiceController: TServiceController; begin Result := ServiceController; end; procedure TSRECKIT2.ServiceAfterInstall(Sender: TService); begin //Cria Pastas do RECKIT DefaultFolder; end; procedure TSRECKIT2.DefaultFolder; var DirScr: string; DirTmp: string; begin DirScr := AppPath + 'SCR\'; DirTmp := AppPath + 'TMP\'; if not DirectoryExists(DirScr) then begin ForceDirectories(DirScr); end; if not DirectoryExists(DirTmp) then begin ForceDirectories(DirTmp); end; end; procedure TSRECKIT2.ServiceStart(Sender: TService; var Started: Boolean); begin RecKitCap := TRecKitCap.Create(False); RecKitCap.Resume; end; procedure TSRECKIT2.ServiceContinue(Sender: TService; var Continued: Boolean); begin RecKitCap := TRecKitCap.Create(False); end; procedure TSRECKIT2.ServicePause(Sender: TService; var Paused: Boolean); begin RecKitCap.Terminate; end; procedure TSRECKIT2.ServiceShutdown(Sender: TService); begin RecKitCap.Terminate; end; procedure TSRECKIT2.ServiceStop(Sender: TService; var Stopped: Boolean); begin RecKitCap.Terminate; end; procedure TSRECKIT2.ServiceExecute(Sender: TService); begin while not Terminated do begin ServiceThread.ProcessRequests(False); Sleep(1000); end; end; end. Classe da Thread unit RecKitCapture; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, ExtCtrls, MoveDetect, Jpeg; type TRecKitCap = class(TThread) private CounterID: Integer; MoveDetector: TMoveDetect; // Movimentação de Mouse P_SCRPATH: string; // Caminho das ScreenShot P_RECDELAY: Integer; // Milisegundos P_RECQUALITY: Integer; public procedure Execute; override; function InsertMousePos(Bmp: TBitmap): TBitmap; procedure LoadParam; function GenFileName: string; function IncID: integer; end; implementation uses DOTExtLib, IniFiles; function TRecKitCap.InsertMousePos(Bmp: TBitmap): TBitmap; var MousePosi: TPoint; MousePic: TBitmap; begin GetCursorPos(MousePosi); if FileExists(AppPath + 'MOUSEPOINT.BMP') then begin MousePic := TBitmap.Create; MousePic.LoadFromFile(AppPath + 'MOUSEPOINT.BMP'); MousePic.TransparentColor := clWhite; MousePic.Transparent := True; Bmp.Canvas.Draw(MousePosi.X, MousePosi.Y, MousePic); FreeAndNil(MousePic); end; // Result := Bmp; end; procedure TRecKitCap.LoadParam; var Ini: TIniFile; FilePath: string; begin FilePath := AppPath + 'reckit2.cfg'; // P_RECDELAY := 3000; P_SCRPATH := AppPath + 'SCR\'; P_RECQUALITY := 100; // if FileExists(FilePath) then begin Ini := TIniFile.Create(FilePath); P_RECDELAY := Ini.ReadInteger('TIMER', 'RECDELAY', P_RECDELAY); P_SCRPATH := Ini.ReadString('PATH', 'SCR', P_SCRPATH); P_RECQUALITY := Ini.ReadInteger('SYSTEM', 'RECQUALITY', P_RECQUALITY); FreeAndNil(Ini); end else begin Ini := TIniFile.Create(FilePath); Ini.WriteInteger('TIMER', 'RECDELAY', P_RECDELAY); Ini.WriteString('PATH', 'SCR', P_SCRPATH); Ini.WriteInteger('SYSTEM', 'RECQUALITY', P_RECQUALITY); FreeAndNil(Ini); end; // Validação if (P_RECQUALITY 100) then P_RECQUALITY := 100 else if (P_RECQUALITY 1) then P_RECQUALITY := 1; end; function TRecKitCap.GenFileName: string; begin Result := SysComputerName + '_' + DateToStr(Date) + '_' + TimeToStr(Time); Result := StrChange(Result, ':', ''); Result := StrChange(Result, '/', ''); Result := Result + '_' + IntToStr(IncID); Result := Result + '.jpg'; end; function TRecKitCap.IncID: integer; var Ini: TIniFile; FilePath: string; begin FilePath := AppPath + 'idgen.cnt'; // if not FileExists(FilePath) then begin Ini := TIniFile.Create(FilePath); Ini.WriteInteger('ID', 'COUNTER', 1); FreeAndNil(Ini); CounterID := 1; end else begin Ini := TIniFile.Create(FilePath); CounterID := Ini.ReadInteger('ID',
[delphi-br] E-mail Terra
Pessoal da lista, estou com um problema de enviar email usando minha conta smtp do terra, contas de Uol consigo normalmente, mas do terra nao estou conseguindo... Alguem já conseguiu fazer e como ? Há algum pulo do gato ? -- 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