Jump to content
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

rjsma

converter uma imagem

Recommended Posts

rjsma

boas pessoal

Ontem fiz um programinha muito simples para converter imagens.

If KryptonComboBox1.SelectedItem = "JPG" Then
            Try
                SaveFileDialog1.Filter = "JPEG|*.jpg*"
                If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
                    PictureBox1.Image.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Jpeg)
                End If
            Catch ex As Exception

            End Try
        End If
        If KryptonComboBox1.SelectedItem = "PNG" Then
            Try
                SaveFileDialog1.Filter = "PNG|*.png*"
                If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
                    PictureBox1.Image.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Png)
                End If
            Catch ex As Exception

            End Try
        End If
        If KryptonComboBox1.SelectedItem = "GIF" Then
            Try
                SaveFileDialog1.Filter = "GIF|*.gif*"
                If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
                    PictureBox1.Image.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Gif)
                End If
            Catch ex As Exception

            End Try
        End If
        If KryptonComboBox1.SelectedItem = "bmp" Then
            Try
                SaveFileDialog1.Filter = "BMP|*.bmp*"
                If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
                    PictureBox1.Image.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Bmp)
                End If
            Catch ex As Exception

            End Try
        End If

Mas não me está a converter como deve ser as imagens, aparece me um ficheiro sem nenhum formato.Assim não devia fucinionar correctamente?

abraço

Share this post


Link to post
Share on other sites
bioshock

Desculpa a minha ignorância (?), mas onde nesse código é que existe uma conversão?

Share this post


Link to post
Share on other sites
renafi

Poe uma messageBox ou qualquer coisa que de uma resposta nos Catch. É que pode estar a dar um erro, e tu não veres isso.


Oracle Certified Professional - AdministraçãoOracle Certified Professional - Pl/sqlMCPD - Microsoft Certified Professional DeveloperMCTS - Microsoft Certified Technology Specialist

Share this post


Link to post
Share on other sites
rjsma

bioshock, penso que se fizer uma coisa assim

SaveFileDialog1.Filter = "PNG|*.png*"

o programa vai gravar a imagem que tiver na picturebox em png, será que tou enganado?

Share this post


Link to post
Share on other sites
rjsma

vou estudar o exemplo, julgo que já sei o que tenho de fazer.

obrigado pela ajuda

abraço  :)

Share this post


Link to post
Share on other sites
ribeiro55

Estás a usar uma "wildcard" depois da extensão por alguma razão em especial?

Tira lá isso daí e experimenta de novo.


Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Share this post


Link to post
Share on other sites
rjsma

era mesmo isso que não estava a deixar converter como deve ser, julgava que a seguir a extensão tambem levava o sinal do *.

Obrigado ribeiro55  :)

Share this post


Link to post
Share on other sites
rjsma

se agora quisesse fazer para videos ou para audio podia fazer da mesma maneira como fiz com as imagens? Mas em vez de mostrar na picturebox ia mostrar no media player.

abraço

Share this post


Link to post
Share on other sites
ribeiro55

Mostrar mostras.

Gravar é que não é assim tão linear.

Devem existir bibliotecas que permitam fazer isso de maneira fácil.


Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Share this post


Link to post
Share on other sites
rjsma

se na parte de gravar a extensão se fizesse uma coisa assim

SaveFileDialog1.Filter = "AVI|*.avi"

não ia resultar?

podia dar me uma explicação muito rapidinha  como se utiliza as bibliotecas, ainda não tive a oportunidade de estudar essa parte das bibliotecas, seriam mais facil?

abraço  :thumbsup:

Share this post


Link to post
Share on other sites
ribeiro55

Depende do que consideras "resultar".

A SaveFileDialog ia de facto adoptar o filename correcto, mas uma extensão não dita o formato do ficheiro.

Eu posso trocar imagem.jpg para imagem.avi e continuo a poder abrir como imagem se forçar a abertura.

Bibliotecas, ou referências são recursos externos à tua aplicação que servem para extender funcionalidades.

O controlo que deves estar a usar para ler videos e audio comprimido, é ele próprio uma biblioteca ou componente, uma vez que a framework não tem como ler esse tipo de formatos.

Quando disse que devem existir bibliotecas, não estou a dizer que sei quais são, mas acredito que alguém por aí fora tenha escrito um DLL para manipular esses formatos.

Se descobrires algum, basta referenciares a biblioteca e operar com os seus membros.


Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.