Jump to content
Sign in to follow this  
backup

Bitdybde bmp fil

Recommended Posts

I et vb.net program leser jeg i en bitmap inn en bmp fil. Så skal programmet undersøke om bmp fila's egenskap bitdybde = 24 (kan se det med høyreklikk bmp-fila, velg egenskaper, velg sammendrag). Skulle gjerne hatt vb.net kode for hvordan dette kan programmeres? Har googlet, men ingen suksess med det.

Share this post


Link to post

using(System.Drawing.Image b = System.Drawing.Image.FromFile( "bilde.bmp" ))

{

Console.WriteLine( b.PixelFormat.ToString() );

b.Dispose();

}

Share this post


Link to post
using(System.Drawing.Image b = System.Drawing.Image.FromFile( "bilde.bmp" ))

{

Console.WriteLine( b.PixelFormat.ToString() );

b.Dispose();

}

6752264[/snapback]

 

jorn79: Bingo! Funka perfekt, akkurat koda jeg trengte, tusen takk!

Share this post


Link to post
using(System.Drawing.Image b = System.Drawing.Image.FromFile( "bilde.bmp" ))

{

Console.WriteLine( b.PixelFormat.ToString() );

b.Dispose();

}

6752264[/snapback]

(mulig flisespikk)

Blir det ikke doble Dispose her? Nå gjør det vel ingen skade, men hvorfor bruke using hvis du ikke utnytter det?

 

- grå -

Share this post


Link to post

For ordens skyld: her er koden jeg bruker (vb.net, Steganografi):

 

Dim pic As New Bitmap(txtBilde.Text)

If pic.PixelFormat <> 137224 Then

MessageBox.Show("Bildet er ikke en 24bit bitmap!")

Exit Sub

End If

Share this post


Link to post
using(System.Drawing.Image b = System.Drawing.Image.FromFile( "bilde.bmp" ))

{

Console.WriteLine( b.PixelFormat.ToString() );

b.Dispose();

}

6752264[/snapback]

(mulig flisespikk)

Blir det ikke doble Dispose her? Nå gjør det vel ingen skade, men hvorfor bruke using hvis du ikke utnytter det?

6754419[/snapback]

 

Ja og ja. Kjører den dobbelt. Var litt trøtt ;) Men er også enig med deg at det er flisespikk, siden det ihvertfall er MYE bedre å kjøre den 2 ganger enn 0 ganger :)

(se koden som ble postet etter deg...)

 

 

For ordens skyld: her er koden jeg bruker (vb.net, Steganografi):

 

Dim pic As New Bitmap(txtBilde.Text)

If pic.PixelFormat <> 137224 Then

    MessageBox.Show("Bildet er ikke en 24bit bitmap!")

      Exit Sub

End If

6755947[/snapback]

 

Du bør dispose pic objektet (bruk using). Litt dumt å bruke "magic-numbers"... Hva er 137224?? Bruk PixelFormat.Format24bppRgb isteden.

 

using pic As New Bitmap(txtBilde.Text)

If pic.PixelFormat <> PixelFormat.Format24bppRgb Then

MessageBox.Show("Bildet er ikke en 24bit bitmap!")

Exit Sub

End If

end using

Share this post


Link to post

137224 får jeg når jeg tar MessageBox.show(pic.PixelFormat) når bildet er en 24bit bitmap. Har imidlertid endra koden til slik du foreslår, funker perfekt, takker så mye for hjelpen jorn79.

Share this post


Link to post

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
Sign in to follow this  

×
×
  • Create New...