main.dfm

JPG图片压缩,根据设定的图像质量有损压缩图像

object Form1: TForm1
  Left = 302
  Top = 192
  Width = 417
  Height = 225
  Caption = #22270#29255#22788#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 13
  object lbl1: TLabel
    Left = 8
    Top = 29
    Width = 185
    Height = 13
    AutoSize = False
    Caption = #35831#36873#25321#35201#22788#29702#30340#22270#29255#30446#24405#65306
  end
  object Label3: TLabel
    Left = 210
    Top = 27
    Width = 36
    Height = 13
    Caption = #36136#37327#65306
  end
  object btn1: TButton
    Left = 27
    Top = 147
    Width = 75
    Height = 25
    Caption = #22788#29702
    TabOrder = 0
    OnClick = btn1Click
  end
  object btn2: TButton
    Left = 316
    Top = 51
    Width = 75
    Height = 25
    Caption = #27983#35272
    TabOrder = 1
    OnClick = btn2Click
  end
  object btn3: TButton
    Left = 253
    Top = 145
    Width = 81
    Height = 25
    Caption = #36864#20986
    TabOrder = 2
    OnClick = btn3Click
  end
  object edt1: TEdit
    Left = 8
    Top = 53
    Width = 297
    Height = 21
    TabOrder = 3
  end
  object pb1: TProgressBar
    Left = 5
    Top = 117
    Width = 361
    Height = 9
    TabOrder = 4
  end
  object StaticText1: TStaticText
    Left = 13
    Top = 93
    Width = 131
    Height = 17
    AutoSize = False
    Caption = #22788#29702#36827#24230#65306
    TabOrder = 5
  end
  object edt4: TEdit
    Left = 250
    Top = 22
    Width = 57
    Height = 21
    TabOrder = 6
    Text = '20'
  end
  object StaticText2: TStaticText
    Left = 176
    Top = 95
    Width = 123
    Height = 17
    AutoSize = False
    Caption = #22270#29255#24352#25968#65306
    TabOrder = 7
  end
end