Manda esse executável p/ o repositório do grupo, assim todos podemos usufruir
da ferramenta!! :))
Citando Alisson <[EMAIL PROTECTED]>:
>
> Certa vez tentei fazer uma rotina como essa. Se salvasse com bmp, o arquivo
> ficava muito grande. Então tentei mudar para gif ou jpg, mas a figura
> continuava do mesmo tamanho. O curioso é que se eu abrisse a figura em um
> editor e salvasse sem fazer nenhuma modificação o tamanho diminuía. Será que
> tem alguma maneira de salvar com o tamanho já reduzido?
>
> ----- Original Message -----
> From: "MYSQL" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Tuesday, October 19, 2004 7:21 PM
> Subject: Re: [delphi-br] Diminuir tamanho de imagem sem preder muita
> resolução!
>
>
> Você deve usar jpg ou gif.
> Use um programa chamado conversor.exe.
> Se quiser eu posso enviar.
>
> Michelangelo V. Freitas
> [EMAIL PROTECTED]
>
> ----- Original Message -----
> From: "David Leão " <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>;
> <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>;
> <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>;
> <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
> Sent: Friday, October 15, 2004 7:58 PM
> Subject: [delphi-br] Diminuir tamanho de imagem sem preder muita resolução!
>
>
>
> Caros Amigos,
> Tenho uma rotina pra capturar uma imagem da área de trabalho e salvar como
> bmp, gostaria de saber se existe uma maneira melhor de fazer, pois do jeito
> que está a imagem fica com mais de 3mb.
> Será que gravando em jpg melhora??
> vcs podem me ajudar??
> a rotina que estou usando eh a descrita abaixo .
>
> Keybd_Event(VK_SnapShot, 0, 0, 0); // Simula o pressionamento da tecla
> Print Screen
> Image1.Picture.LoadFromClipboardFormat(cf_BitMap, ClipBoard
> GetAsHandle(cf_Bitmap), 0); // Captura da área de transferência a imagem
> Image1.Picture.SaveToFile('C:\Desktop.Bmp'); // salva a imagem como
> bmp.
>
> __________________________________________
> David Leão Alves
> Administrador de Banco de Dados
> Governo do Estado do Amapá
> Secretaria de Estado do Meio Ambiente - SEMA
> Av. Mendonça Furtado, 53 - Centro / Macapá-AP
> 212-5318 - 212-5378
> 212-5303
> [EMAIL PROTECTED]
> www.sema.ap.gov.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] ou [EMAIL PROTECTED]
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
>
> --
> <<<<< 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] ou [EMAIL PROTECTED]
>
>
>
> 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!.
>
>
>
>
> --
> <<<<< 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] ou [EMAIL PROTECTED]
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
___________________________________________________________________________________
Acesse nosso portal www.click21.com.br
Porque internet grátis, nem a Embratel pode fazer mais barato. Mas pode fazer melhor.
--
<<<<< 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] ou [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
