Ir para conteúdo
Fórum Script Brasil

Tetzner

Membros
  • Total de itens

    50
  • Registro em

  • Última visita

Tudo que Tetzner postou

  1. Ola, Tenho um projeto com 2 forms ( 2 unit´s ) numa unit tenho uma funcao que gostaria de chamar nos dois .pas como devo declarar/chamar a Função da Unit1 e usá-la tb na Unit 2 ?
  2. Tetzner

    Cores no Memo1

    não funciona para uma palavra ou linha isso muda a cor do texto todo ... eu quero "destacar" uma linha, palavra, letra ... mas vlw mesmo assim
  3. tem alguma maneira de se escolher a cor de uma linha ou palavra num tipo memo ? se não, como fazer de outro modo ou objeto ...
  4. valeu to tentando mas ainda não consegui matar o processo de sistema ... :(
  5. Pessoal, Estou usando o componente Indy IdSmtp + conta de Email do Gmail. Copiei as informações de porta do meu email ( outlook express ) e fiz autenticação no login. Também habilitei na página do gmail o envio e recebimento. Resumindo, pelo Outlook funciona, mas pelo Delphi com Indy não está permitindo o envio. Alguém pode me ajudar a identificar o problema ou postar um exemplo de envio de email com conta no gmail que funcione ? Grato!
  6. mas não é esse VideoCap que eu tava falando ... era um que tem até o fonte disponivel mas deixa pra lá
  7. heheh obrigado pela Aula!! rs mas é só curiosidade mesmo. Tenho 2 anti virus e 2 anti spy instalados rs :)) eu queria mesmo, a titulo de curiosidade e aprendizado, entender o funcionamento deste nivel de prioridade. já descobri que um "service" tem um nivel a mais de acesso nesta hierarquia. para criar um processo com nível sistêmico ele necessariamente precisa ser um service ?
  8. neste caso, a princípio, esta pergunta eu não saberia responder. Talvez alguém se habilite. o mesmo acontece no task manager tem processos que você seleciona "Finalizar Tarefa" e aparece uma mensagem de erro "o Gerenciador de Tarefas não pode finalizar o processo" rs
  9. Porque alguns processos não "morrem" ? rs consegui matar o processo da minha aplicação, mas não consigo "matar" outros processos ( sou Admin da máquina )
  10. Pessoal, Alguém aqui usa o componente VideoCap, poderia me dizer como faço para pré-definir as configurações a serem utilizadas? eu consegui setar o componente para usar sempre o 1o driver disponivel, mas não consigo fixar o tamanho do vídeo 640x480 e nem mesmo os parâmetros de luminosidade e cores, taxa de compressão do vídeo. Tem jeito de fazer isso ?
  11. Pessoal, Como é que eu faço para "matar" um processo usando delphi 4 rs ? antigamente usava um comando do dos Kill -9 no delphi tem algo interno ? :blink:
  12. Desculpe, mas é para qualquer um quiser ajudar rs o problema original é: "tenho 2 jpegs, quero compará-los para saber se são iguais ou diferentes" obtive várias respostas, levando sempre à conversão para bitmap. gostaria de uma solução que compare o arquivo .jpeg já que este é bem menor que o equivalente .bmp vlw por qualquer help.
  13. :D vou testar em casa vlw!! :)
  14. então eu tenho de gerar uma "miniatura" da imagem e ai trabalhar com ela? nossa vai ficar muito lento eu tenho originalmente um jpeg transformo em bitmap ai tem de montar miniatura .... se a imagem original .jpg tens uns 25kb e transformo em bitmap vai para 900 kb ai faço minitarura ... Eu gostaria de trabalhar só com a Jpeg direto e comparar imagem 1 com 2 e saber simples saber de a imagem 1 é igual a imagem 2 .jpeg não tem um modo mais simples e eficiente ?
  15. Testou carregando com .jpeg e depois tentou acessar / comparar com o codigo acima o Tbitmap ? se sim, carrega duas imagens diferentes e testa se funcionar, por favor posta o codigo completo do .pas aki valeu!!
  16. Então, se a imagem original tem 800x600 mesmo com o Timage em 200x100 e o Strech true fazendo a varredura com o property pixels eu preciso varrer de 1 a 800 para cobrir a imagem o componente não deveria usar o novo tamanho relativo, em vez do absoluto da imagem original ?
  17. Tenho uma imagem de 800x600 jpeg uso componente TImage para carregá-la com loadfromfile. mas o componente tem width = 200x150 ( 1/4 do original ) a propriedade Stretch está true, mas ao trabalhar com a imagem, a referencia de .pixels[x,y] continua como sendo a da imagem original. se eu varrer a imagem 200x150 no componente, apenas um bloco dela é percorrida. Como fazer para reduzir a imagem e trabalhar com ela na nova dimensão ?
  18. Cara eu tentei ontem carregar no Timage o .jpeg Load from file dai eu usei o TImage.Picture.Bitmap mas retorna sempre uma imagem nula ( sempre dá igual ). se eu tenho 1 Timage, carrego com .jpeg como faço para trabalhar no bitmap dele ?
  19. Ola Como recuperar os arquivos deletados da Lixeira e como saber quais arquivos estão lá ? Pelo Delphi tem como ? :blink:
  20. hummmmmmmmmmm ok verdade. cara, acho que com alguns ajustes e testes posso sim utilizar este código para a finalidade deseja. Muito obrigado. uma última questão: o caractere lido "ch1" em: Img1.Read(Ch1, 1); é um byte ou bit ?
  21. Então ... 2 problemas imagens de tamanhos diferentes, podem sim ser iguais ... basta uma variação na LUZ e pronto ( a olho nú você nem percebe ) por isso que estabelece-se um % de semelhança, tipo 95% igual outro é que eu tenho dois Jpges ( que são menores ) em vez de Bmps
  22. Ola, Alguém poderia me ajudar, estou tentando comparar 2 imagens .jpeg para descobrir se são iguais. mesmo que não sejam 100% idênticas, mas tenham por exemplo 95% de semelhança, teria de dizer que são iguais. :unsure:
  23. Mas isto não impedirá de o usuário desplugar o cabo USB da câmera. :blink: então, não uso DSPACK teria de ser algo SYSTEM mesmo tipo algo que verifique as usb´s
  24. Ola como faço para copiar meus arquivos de/para meu celular(nokia) usando Delphi ? ele está conectado pelo cabo na USB, o software que vem com o aparelho funciona, mas queria fazer algo mais personalizado em Delphi.
  25. Ola Como faço para detectar que no micro existe uma webcam conectada ?? Tenho um programa que utiliza a webcam, mas se alguém despluga o cabo da USB o programa trava. Então quero primeiro detectar se há webcam na usb e então acionar o programa
×
×
  • Criar Novo...