Re: [delphi-br] Redimensionando JPEG JPG
Romrio, pode parecer piada, mas o Windows aceita a / no lugar da \ eu sei porque uso isso nos meus script ANT do Java para que eles possam ser usados no JAVA ou Windows!! Louco n?? --- Romario (Listas) [EMAIL PROTECTED] escreveu: Se voc utiliza o Windows como sistema operacional, COM CERTEZA a barra est errada. Sds, Romario Isaac Boratino escreveu: Naum esta esta, porque se eu tiro estas duas linhas Jpg.Width := 120; Jpg.Height := 120; funciona perfeitamente, mas eu mudei so para ter certeza, e nada.. valew - Original Message - From: Alosi yarru To: delphi-br@yahoogrupos.com.br Sent: Thursday, June 16, 2005 11:26 AM Subject: Re: [delphi-br] Redimensionando JPEG JPG o problema no est na barra que no est invertida? - Original Message - From: Isaac Boratino To: delphi-br@yahoogrupos.com.br Sent: Thursday, June 16, 2005 11:14 AM Subject: [delphi-br] Redimensionando JPEG JPG Oi pessoal tudo bom!? Estou comm um probleminha com Jpeg.. eu estou precisando fazer um programinha que pega uma imagem Jpeg e faz uma copia dela mesma s que com dois tamanhos diferentes, eu estava testando mas fica dando um erro: Cannot change the size of a JPEG image alguem ja pssou por isso? Vou colocar meu script aqui: procedure TForm1.Button1Click(Sender: TObject); var Arquivo: String; JPeg, Jpg: TJPegImage; begin Arquivo := 'c:/gato.jpg'; JPeg := TJPegImage.Create; try JPeg.LoadFromFile(Arquivo); Jpg := TJPegImage.Create; try Jpg.Assign(JPeg); Jpg.Width := 120; Jpg.Height := 120; Jpg.SaveToFile(ChangeFileExt('c:/a', '.jpg')); finally Jpg.Free; end; finally JPeg.Free; end; end; Se eu fao isso com BMP da totalmente certo... ate mais e obrigado! [As partes desta mensagem que no 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 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 Servio do Yahoo!. [As partes desta mensagem que no 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 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 Servio do Yahoo!. [As partes desta mensagem que no continham texto foram removidas] ___ Yahoo! Acesso Grtis - Internet rpida e grtis. Instale o discador agora! http://br.acesso.yahoo.com/ -- 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 http://br.yahoo.com/info/utos.html Valfrid-Ly Silva Couto [EMAIL PROTECTED] [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ 15114646 ___ Yahoo! Acesso Grtis - Internet rpida e grtis. Instale o discador agora! http://br.acesso.yahoo.com/ -- 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
[delphi-br] Redimensionando JPEG JPG
Oi pessoal tudo bom!? Estou comm um probleminha com Jpeg.. eu estou precisando fazer um programinha que pega uma imagem Jpeg e faz uma copia dela mesma s que com dois tamanhos diferentes, eu estava testando mas fica dando um erro: Cannot change the size of a JPEG image alguem ja pssou por isso? Vou colocar meu script aqui: procedure TForm1.Button1Click(Sender: TObject); var Arquivo: String; JPeg, Jpg: TJPegImage; begin Arquivo := 'c:/gato.jpg'; JPeg := TJPegImage.Create; try JPeg.LoadFromFile(Arquivo); Jpg := TJPegImage.Create; try Jpg.Assign(JPeg); Jpg.Width := 120; Jpg.Height := 120; Jpg.SaveToFile(ChangeFileExt('c:/a', '.jpg')); finally Jpg.Free; end; finally JPeg.Free; end; end; Se eu fao isso com BMP da totalmente certo... ate mais e obrigado! [As partes desta mensagem que no 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 * 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] Redimensionando JPEG JPG
o problema no est na barra que no est invertida? - Original Message - From: Isaac Boratino To: delphi-br@yahoogrupos.com.br Sent: Thursday, June 16, 2005 11:14 AM Subject: [delphi-br] Redimensionando JPEG JPG Oi pessoal tudo bom!? Estou comm um probleminha com Jpeg.. eu estou precisando fazer um programinha que pega uma imagem Jpeg e faz uma copia dela mesma s que com dois tamanhos diferentes, eu estava testando mas fica dando um erro: Cannot change the size of a JPEG image alguem ja pssou por isso? Vou colocar meu script aqui: procedure TForm1.Button1Click(Sender: TObject); var Arquivo: String; JPeg, Jpg: TJPegImage; begin Arquivo := 'c:/gato.jpg'; JPeg := TJPegImage.Create; try JPeg.LoadFromFile(Arquivo); Jpg := TJPegImage.Create; try Jpg.Assign(JPeg); Jpg.Width := 120; Jpg.Height := 120; Jpg.SaveToFile(ChangeFileExt('c:/a', '.jpg')); finally Jpg.Free; end; finally JPeg.Free; end; end; Se eu fao isso com BMP da totalmente certo... ate mais e obrigado! [As partes desta mensagem que no 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 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 Servio do Yahoo!. [As partes desta mensagem que no 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 * 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] Redimensionando JPEG JPG
Naum esta esta, porque se eu tiro estas duas linhas Jpg.Width := 120; Jpg.Height := 120; funciona perfeitamente, mas eu mudei so para ter certeza, e nada.. valew - Original Message - From: Alosi yarru To: delphi-br@yahoogrupos.com.br Sent: Thursday, June 16, 2005 11:26 AM Subject: Re: [delphi-br] Redimensionando JPEG JPG o problema no est na barra que no est invertida? - Original Message - From: Isaac Boratino To: delphi-br@yahoogrupos.com.br Sent: Thursday, June 16, 2005 11:14 AM Subject: [delphi-br] Redimensionando JPEG JPG Oi pessoal tudo bom!? Estou comm um probleminha com Jpeg.. eu estou precisando fazer um programinha que pega uma imagem Jpeg e faz uma copia dela mesma s que com dois tamanhos diferentes, eu estava testando mas fica dando um erro: Cannot change the size of a JPEG image alguem ja pssou por isso? Vou colocar meu script aqui: procedure TForm1.Button1Click(Sender: TObject); var Arquivo: String; JPeg, Jpg: TJPegImage; begin Arquivo := 'c:/gato.jpg'; JPeg := TJPegImage.Create; try JPeg.LoadFromFile(Arquivo); Jpg := TJPegImage.Create; try Jpg.Assign(JPeg); Jpg.Width := 120; Jpg.Height := 120; Jpg.SaveToFile(ChangeFileExt('c:/a', '.jpg')); finally Jpg.Free; end; finally JPeg.Free; end; end; Se eu fao isso com BMP da totalmente certo... ate mais e obrigado! [As partes desta mensagem que no 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 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 Servio do Yahoo!. [As partes desta mensagem que no 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 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 Servio do Yahoo!. [As partes desta mensagem que no 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 * 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