WN

WN (https://www.wn.se/forum/index.php)
-   Serversidans teknologier (https://www.wn.se/forum/forumdisplay.php?f=4)
-   -   Image resize i asp.net C# (https://www.wn.se/forum/showthread.php?t=27107)

editman 2008-02-13 12:27
Hej!

Jag skulle behöva tips och råd hur jag kan förbättra thumbnail-bilder på www.ergona.se/sortiment.aspx

Uppladdning är gjord nu så att man bara laddar upp en bild som skalas ner i 2 mindre storlkar.
Problemet är att bilderna blir taggiga och inte ser bra ut.

Hur kan jag bäst lösa detta problemet utan att användaren behöver ladda upp alla bilder igen?

Exempel på sådana lösningar?

/E

mng0 2008-02-13 12:58
Uppenbarligen så är det din kod som skalar ner bilderna som behöver justeras. Sen så har du ju orginalbilden i din lightbox för varje produkt. Bara att göra ett script som loopar igenom alla produkter och skalar om samt ersätter nuvarande thumbnails.

Du kan ju visa din kod om du har lust

Robert 2008-02-13 20:14
Det finns ett större antal parametrar för att ställa in kvalitet på alla transformationer man gör. Exempelvis:

Kod:
myGraphicObject.InterpolationMode = System.Drawing.Drawing2D.InterpolationMode.HighQualityBilinear;
och även ställa in rätt kvalitet när du sparar, exemeplvis:

Kod:
System.Drawing.Imaging.ImageCodecInfo JpegICI = null;
System.Drawing.Imaging.EncoderParameters objEncoderParameters = new System.Drawing.Imaging.EncoderParameters();
System.Drawing.Imaging.EncoderParameter objEncoderParameter = new System.Drawing.Imaging.EncoderParameter(System.Drawing.Imaging.Encoder.Quality, 100);
objEncoderParameters.Param[0] = objEncoderParameter;
for (int i = 0; i <= objImageCodecInfo.Length - 1; i++)
  {
  if (objImageCodecInfo[i].FormatDescription.Equals("JPEG"))
  {
    JpegICI = objImageCodecInfo[i];
    break;
  }
  }
 myBitmap.Save("filnamn.jpg", JpegICI, objEncoderParameters);

Frej 2008-02-14 09:32
Beroende på hur du skapar thumbnails (skalar de stora bilderna först sen skapar mindre av dessa) så kan det påverka.

Det finns en "bugg" i .net 2.0 som gör att när man använder getThumbnail så använder systemet bildens EXIF Thumbnail som finns och skala om denna, om man då vill skala upp en bild så blir den dålig.

Robert 2008-02-14 12:01
Håller med Frej. Att skriva en "egen" resize tar väl max 3 rader kod beroende på dina krav.

editman 2008-02-18 07:43
Tack för alla tipsen, kan du ge exempel på hur jag skulle kunna
skriva en resize med så lite kod som möjligt?

Har kämpat igenom tutorials med väldigt massa information....

Tack!

Frej 2008-02-18 09:30
Här har du en färdig klass jag skrivit för länge sedan, dock i vb.net men du kan ju skriva om den. Det finns lite fler funktioner som rotation osv, samt hanterar fulhackar buggen jag skrev om tidigare genom att göra en dubbelrotation på 90 grader, då "förstörs" exif-datat och getThumbnail tar från orginalet. Anyway det var ett tag sedan denna skrevs. Men du har något att gå på iaf


Kod:
Imports Microsoft.VisualBasic
Imports System
Imports System.Drawing
Imports System.Drawing.Imaging
Imports System.Drawing.Image
Imports System.IO
Imports System.Text

Namespace Image.Edit

 * *Public Structure CropType
 * * * *Public Height As String
 * * * *Public Width As String
 * *End Structure

 * *Public Structure ResizeType
 * * * *Public Height As String
 * * * *Public Width As String
 * *End Structure

 * *Public Structure RotateType
 * * * *Public Degrees As String
 * *End Structure

 * *Public Class ImageTransform
 * * * *Public Crop As CropType
 * * * *Public Resize As ResizeType
 * * * *Public Rotate As RotateType
 * *End Class


 * *Public Class Edit
 * * * *Public _pathOutputImage As String
 * * * *Public imgTrans As ImageTransform
 * * * *Public _inputImage As Drawing.Image
 * * * *Public _strFileName As String
 * * * *Private _inputImagePath As String
 * * * *Public myBitmap As Bitmap
 * * * *Public myImageCodecInfo As Imaging.ImageCodecInfo
 * * * *Public myEncoder As Imaging.Encoder
 * * * *Public myEncoderParameter As Imaging.EncoderParameter
 * * * *Public myEncoderParameters As Imaging.EncoderParameters

 * * * *Public Log As StringBuilder

 * * * *ReadOnly Property Height() As String
 * * * * * *Get
 * * * * * * * *Return _inputImage.Height
 * * * * * *End Get
 * * * *End Property

 * * * *ReadOnly Property GetLof() As String
 * * * * * *Get
 * * * * * * * *Return Log.ToString
 * * * * * *End Get
 * * * *End Property


 * * * *ReadOnly Property Width() As String
 * * * * * *Get
 * * * * * * * *Return _inputImage.Width
 * * * * * *End Get
 * * * *End Property

 * * * *Public Sub New(ByVal ImagePath As String)
 * * * * * *Try
 * * * * * * * *_inputImagePath = ImagePath
 * * * * * * * *_inputImage = Drawing.Image.FromFile(_inputImagePath)
 * * * * * * * *_pathOutputImage = _inputImagePath
 * * * * * * * *Log = New StringBuilder()
 * * * * * *Catch er As Exception
 * * * * * * * *Throw er
 * * * * * *End Try
 * * * *End Sub

 * * * *Public Sub FileName(ByVal strFileName As String)
 * * * * * *_strFileName = strFileName
 * * * *End Sub

 * * * *Private Function getRandomName() As String
 * * * * * *Dim fi As New FileInfo(_inputImagePath)
 * * * * * *Return fi.DirectoryName & "\" & _strFileName
 * * * *End Function

 * * * *Public Function Transform(ByVal XMLFile As String)
 * * * * * *Dim reader As New System.Xml.Serialization.XmlSerializer(GetType(ImageTransform))
 * * * * * *Dim file As New System.IO.StreamReader(XMLFile)
 * * * * * *imgTrans = reader.Deserialize(file)
 * * * * * *file.Close()

 * * * * * *'resize
 * * * * * *If Not imgTrans.Resize.Height Is Nothing Then
 * * * * * * * *Resize(imgTrans.Resize.Height.ToString, imgTrans.Resize.Width.ToString)
 * * * * * *End If
 * * * * * *'crop
 * * * * * *If Not imgTrans.Crop.Height Is Nothing Then
 * * * * * * * *Crop(imgTrans.Crop.Height.ToString, imgTrans.Crop.Width.ToString)
 * * * * * *End If
 * * * * * *'rotate
 * * * * * *If Not imgTrans.Rotate.Degrees Is Nothing Then
 * * * * * * * *Rotate(imgTrans.Rotate.Degrees)
 * * * * * *End If
 * * * *End Function

 * * * *Public Function Crop(ByVal Height As String, ByVal Width As String)
 * * * * * *_pathOutputImage = getRandomName()
 * * * * * *Dim bmpImage As Bitmap
 * * * * * *Dim recCrop As Rectangle
 * * * * * *Dim bmpCrop As Bitmap
 * * * * * *Dim gphCrop As Graphics
 * * * * * *Dim recDest As Rectangle
 * * * * * *Try
 * * * * * * * *TakeNote("Crop " & Height & " x " & Width)
 * * * * * * * *bmpImage = New Bitmap(_inputImage)
 * * * * * * * *recCrop = New Rectangle(0, 0, Width, Height)
 * * * * * * * *bmpCrop = New Bitmap(recCrop.Width, recCrop.Height, bmpImage.PixelFormat)
 * * * * * * * *gphCrop = Graphics.FromImage(bmpCrop)
 * * * * * * * *recDest = New Rectangle(0, 0, Width, Height)
 * * * * * * * *gphCrop.DrawImage(bmpImage, recDest, recCrop.X, recCrop.Y, recCrop.Width, _
 * * * * * * * * * *recCrop.Height, GraphicsUnit.Pixel)

 * * * * * *Catch er As Exception
 * * * * * * * *TakeNote("CROP ERR: " & er.ToString)
 * * * * * * * *Throw er
 * * * * * *Finally
 * * * * * * * *bmpCrop.Save(_pathOutputImage)
 * * * * * * * *_inputImage = Drawing.Image.FromFile(_pathOutputImage)
 * * * * * *End Try
 * * * *End Function

 * * * *Public Function Rotate(ByVal Flip As String)
 * * * * * *_pathOutputImage = getRandomName()

 * * * * * *TakeNote("Rotating : " & Flip)
 * * * * * *Dim thumb As System.Drawing.Image
 * * * * * *Try
 * * * * * * * *thumb = _inputImage
 * * * * * * * *Select Case Flip
 * * * * * * * * * *Case "90"
 * * * * * * * * * * * *thumb.RotateFlip(RotateFlipType.Rotate90FlipXY)
 * * * * * * * * * *Case "180"
 * * * * * * * * * * * *thumb.RotateFlip(RotateFlipType.Rotate180FlipXY)
 * * * * * * * * * *Case "270"
 * * * * * * * * * * * *thumb.RotateFlip(RotateFlipType.Rotate270FlipXY)
 * * * * * * * *End Select
 * * * * * *Catch er As Exception
 * * * * * * * *TakeNote("ROTATE ERR: " & er.ToString)
 * * * * * * * *Throw

 * * * * * *Finally
 * * * * * * * *thumb.Save(_pathOutputImage)
 * * * * * * * *_inputImage = thumb
 * * * * * * * *thumb.Dispose()
 * * * * * *End Try

 * * * *End Function

 * * * *Public Function Resize(ByVal Width As String, ByVal Height As String)
 * * * * * *_pathOutputImage = getRandomName()

 * * * * * *Dim thumb As System.Drawing.Image
 * * * * * *thumb = _inputImage
 * * * * * *Dim inp As New IntPtr()
 * * * * * *Dim strMax As String = Width

 * * * * * *If CInt(thumb.Width) > CInt(thumb.Height) Then
 * * * * * * * *Width = strMax
 * * * * * * * *Height = thumb.Height / (thumb.Width / Width)
 * * * * * *Else
 * * * * * * * *Height = CInt(strMax)
 * * * * * * * *Width = thumb.Width / (thumb.Height / CInt(Height))
 * * * * * *End If

 * * * * * *Try

 * * * * * * * *TakeNote("Resize " & Height & " x " & Width)
 * * * * * * * *If Height > 0 And Width > 0 Then
 * * * * * * * * * *thumb.RotateFlip(RotateFlipType.Rotate90FlipXY)
 * * * * * * * * * *thumb.RotateFlip(RotateFlipType.Rotate270FlipXY)
 * * * * * * * * * *If CInt(thumb.Width) > CInt(Width) Then
 * * * * * * * * * * * *thumb = thumb.GetThumbnailImage(Width, Height, Nothing, inp)
 * * * * * * * * * *End If
 * * * * * * * *Else
 * * * * * * * * * *thumb = _inputImage
 * * * * * * * *End If

 * * * * * *Catch er As Exception

 * * * * * * * *TakeNote("RESIZE ERR: " & er.ToString)
 * * * * * * * *Throw er

 * * * * * *Finally

 * * * * * * * *myImageCodecInfo = GetEncoderInfo(ImageFormat.Jpeg)
 * * * * * * * *myEncoder = Imaging.Encoder.Quality
 * * * * * * * *myEncoderParameters = New EncoderParameters(1)
 * * * * * * * *myEncoderParameter = New EncoderParameter(myEncoder, CType(75L, Int32))
 * * * * * * * *myEncoderParameters.Param(0) = myEncoderParameter

 * * * * * * * *thumb.Save(_pathOutputImage, myImageCodecInfo, myEncoderParameters)

 * * * * * * * *_inputImage = thumb
 * * * * * * * *thumb.Dispose()
 * * * * * * * *thumb = Nothing
 * * * * * * * *myImageCodecInfo = Nothing
 * * * * * * * *myEncoder = Nothing
 * * * * * * * *myEncoderParameters = Nothing
 * * * * * * * *myEncoderParameter = Nothing

 * * * * * *End Try

 * * * *End Function

 * * * *Public Function SaveImage() As String
 * * * * * *Log = Nothing
 * * * * * *Return _strFileName
 * * * *End Function

 * * * *Private Sub TakeNote(ByVal str As String)
 * * * * * *Log.Append(str & vbCrLf)
 * * * *End Sub

 * * * *Private Function RndString(Optional ByVal sLen As Integer = 15) As String
 * * * * * *Dim r As String = ""
 * * * * * *Dim i As Integer
 * * * * * *Randomize()
 * * * * * *For i = 1 To sLen
 * * * * * * * *Randomize(Int((57 - 48 + 1) * Rnd() + 48))
 * * * * * * * *Randomize()
 * * * * * * * *If Int(2 * Rnd() + 1) = 1 Then
 * * * * * * * * * *r = r + Chr(Int((57 - 48 + 1) * Rnd() + 48))
 * * * * * * * *Else
 * * * * * * * * * *r = r + Chr(Int((90 - 65 + 1) * Rnd() + 65))
 * * * * * * * *End If
 * * * * * *Next i
 * * * * * *Return DateTime.Now.Year & DateTime.Now.Month & DateTime.Now.Day & r
 * * * *End Function

 * * * *Private Shared Function GetEncoderInfo(ByVal format As Imaging.ImageFormat) As Imaging.ImageCodecInfo
 * * * * * *Dim j As Integer
 * * * * * *Dim encoders() As Imaging.ImageCodecInfo
 * * * * * *encoders = Imaging.ImageCodecInfo.GetImageEncoders()

 * * * * * *j = 0
 * * * * * *While j < encoders.Length
 * * * * * * * *If encoders(j).FormatID = format.Guid Then
 * * * * * * * * * *Return encoders(j)
 * * * * * * * *End If
 * * * * * * * *j += 1
 * * * * * *End While
 * * * * * *Return Nothing

 * * * *End Function 'GetEncoderInfo
 * *End Class


End Namespace
För att bara skala om bilder;

Kod:
Dim ImageResize As New Image.Edit.Edit(strPath & "\" & strFilnamn)
ImageResize.FileName(strFilnamn)
ImageResize.Resize("640", "")
ImageResize.SaveImage()
ImageResize = Nothing

editman 2008-02-18 10:45
Tack, ska se hur det blir när jag skrivit om den till C#, ska jag lägga den första koden i en aspx.cs fil, och den andra i aspx?

Robert 2008-02-18 11:33
Du kan lägga den första koden i en egen fil om du känner för det (skapa en ny fil av typen Class och klistra in koden). Sen kan du anropa den från var du vill i ditt projekt.

editman 2008-02-18 11:46
tack, har lite problem att skriva om koden till C# (är ganska ny på området), skall det inte finnas ett program som omvandlar vb till c#?

Frej 2008-02-19 10:18
Är inte säker på om man kan blanda vb och cs. men prova lägga första koden i en .vb fil i app_data katalogen. Den andra kan köras från en aspx fil. Eller var du vill köra den ifrån. Det kan kanske gå att köra blandat, har aldrigt testat.

editman 2008-02-26 18:12
Någon som har ett exempel i C#?

Osiris 2008-02-26 18:47
Här finns exempel på tumnaglar i C#

editman 2008-02-28 10:51
Jag har hittat denna koden som jag tror fungerar för mig, men undrar
var jag ska lägga in sökvägen till min bildmapp etc.

http://www.eggheadcafe.com/articles/20030515.asp

Tacksam för all hjälp jag kan få!

tartareandesire 2008-02-28 12:34
Citat:
Originally posted by editman@Feb 28 2008, 11:51
Jag har hittat denna koden som jag tror fungerar för mig, men undrar
var jag ska lägga in sökvägen till min bildmapp etc.
http://www.eggheadcafe.com/articles/20030515.asp
Tacksam för all hjälp jag kan få
Har inte kollat igenom så noga, plus att jag inte kodar i .NET själv, men du har ju ett par funktioner i toppen där mappvariabler ingår.

editman 2008-03-03 13:28
Har tittat på ett flertal tutorials, men vet inte vilken kod som ska stå i aspx samt aspx.cs

Exempelvis om jag skulle använda koden som "Robert" anger tidigare i tråden, var skulle den isåfall stå?

Hur hämtar jag bilderna i aspx? Kodexempel?

goose 2008-03-06 00:29
Ingetdera :). Roberts kod skall du lägga i App_Code mappen. Du högerklickar på den mappen och väljer "add new item" och så väljer du Class. Sen klipper du bara in hans kod. Sen kan du anropa dessa funktioner i codebehind-filen (det är aspx.cs-filen). Hur du hämtar bilderna kan man ju göra tex genom en FileUpload-komponent som du lägger på en aspx-sida. Sedan tar du hand om bilden och gör en thumbnail som du sparar.

Jag har säkert missat massa där, men ungefär så är det.


Alla tider är GMT +2. Klockan är nu 23:17.

Programvara från: vBulletin® Version 3.8.2
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Svensk översättning av: Anders Pettersson