[ Deep|Blue @ 16.08.2004. 13:18 ] @
dal se neko igrao sa kompresijama ??? Kako podesavati jpeg kompresiju koristeci vb-ovu imaging klasu. Slicno pitanje i za podesavanje tiff kompresija. |
[ Deep|Blue @ 16.08.2004. 13:18 ] @
[ mmix @ 16.08.2004. 14:27 ] @
Evo ti deo mog koda koji generiše JPG od bitmap objekta i šalje ga u response stream:
Code: Public Shared Function GetEncoderInfo(ByVal mimeType As String) As ImageCodecInfo Dim encoders() As ImageCodecInfo = ImageCodecInfo.GetImageEncoders() Dim j As Integer ' locate encoder For j = 0 To encoders.Length If encoders(j).MimeType = mimeType Then Return encoders(j) Next ' not found, return error Return Nothing End Function .... Dim img as Bitmap ... ' set jpeg quality to 100% Dim enc_params As EncoderParameters = New EncoderParameters(1) Dim param1 As EncoderParameter = New EncoderParameter(Encoder.Quality, 100L) enc_params.Param(0) = param1 ' dump image to response stream img.Save(Response.OutputStream, GetEncoderInfo("image/jpeg"), enc_params) Nadam se da pomaže [ Deep|Blue @ 20.08.2004. 18:16 ] @
hvala puno mmix,
kopao sam po msdn-u za opise koriscenja encodera, ali poslovicno siromasan help je na ovu temu bash preterao. Copyright (C) 2001-2025 by www.elitesecurity.org. All rights reserved.
|