{"id":741,"date":"2009-11-17T21:38:00","date_gmt":"2009-11-17T01:38:00","guid":{"rendered":""},"modified":"2013-11-17T16:55:10","modified_gmt":"2013-11-17T08:55:10","slug":"delphi%e5%8e%8b%e7%bc%a9%e5%9b%be%e7%89%87%e4%bb%a3%e7%a0%81","status":"publish","type":"post","link":"https:\/\/kyle.ai\/blog\/741.html","title":{"rendered":"Delphi\u538b\u7f29\u56fe\u7247\u4ee3\u7801"},"content":{"rendered":"<pre class=\"brush: delphi; title: ; notranslate\" title=\"\">\r\n\u6dfb\u52a0\u5f15\u7528\uff1auses JPEG;\r\n\r\n\/\/=====================\u56fe\u7247\u5904\u7406\u51fd\u6570\uff0c\u5c06\u8986\u76d6\u539f\u56fe\u7247\u6587\u4ef6===========================\r\n\/\/=====filename:\u56fe\u7247\u5b8c\u6574\u8def\u5f84  PressQuality:\u538b\u7f29\u8d28\u91cf Width:\u5bbd  Height:\u9ad8\r\nfunction CompressMainFun(filename: String; PressQuality,Width,Height:integer): Boolean;\r\nvar\r\n  bmp: TBitmap;\r\n  jpg: TJpegImage;\r\n  i: Integer;\r\n  sTemp:string;\r\nbegin\r\n  Result := False;\r\n    if pos(UpperCase('.bmp'), UpperCase(filename)) &lt;&gt; 0 then   \/\/bmp\u683c\u5f0f\r\n    begin\r\n      bmp.LoadFromFile(filename);\r\n      jpg.Assign(bmp);\r\n      jpg.CompressionQuality := PressQuality;\r\n      jpg.Compress;\r\n      bmp.height := Height;\r\n      bmp.Width := Width;\r\n      bmp.Canvas.StretchDraw(bmp.Canvas.ClipRect, jpg);\r\n      jpg.Assign(bmp);\r\n      sTemp := filename + '.jpg';\r\n      jpg.SaveToFile(sTemp);\r\n      DeleteFile(filename);\r\n      CopyFile(PChar(sTemp), PChar(filename), True);\r\n      DeleteFile(sTemp);\r\n    end\r\n    else                                                     \/\/\u5176\u5b83\u683c\u5f0f\r\n    begin\r\n      jpg.LoadFromFile(filename);\r\n      bmp.height := Height;\r\n      bmp.Width := Width;\r\n      bmp.Canvas.StretchDraw(bmp.Canvas.ClipRect, jpg);\r\n      jpg.Assign(bmp);\r\n      jpg.CompressionQuality := PressQuality;\r\n      jpg.Compress;\r\n      sTemp := filename + '.jpg';\r\n      jpg.SaveToFile(sTemp);\r\n      DeleteFile(filename);\r\n      CopyFile(PChar(sTemp), PChar(filename), True);\r\n      DeleteFile(sTemp);\r\n    end;\r\n  Result := True;\r\nend;\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>\u6dfb\u52a0\u5f15\u7528\uff1auses JPEG; \/\/=====================\u56fe\u7247\u5904\u7406\u51fd\u6570\uff0c\u5c06\u8986\u76d6\u539f\u56fe\u7247\u6587\u4ef6= [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[6],"tags":[],"class_list":["post-741","post","type-post","status-publish","format-standard","hentry","category-code_related"],"_links":{"self":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/741","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/comments?post=741"}],"version-history":[{"count":1,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/741\/revisions"}],"predecessor-version":[{"id":4711,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/741\/revisions\/4711"}],"wp:attachment":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/media?parent=741"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/categories?post=741"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/tags?post=741"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}