Declaration
property Quality: integer;
Description
This parameter controls the compression quality for the main image. A value of 1 sets lossless mode.
Increasing values result in higher compression ratios and lower image quality.
Default: 1
Note:
◼UseCodecOptions must be 
true
◼You must set this property before each 
PutFrame call
with TIEWICWriter.Create do
begin
  Open('D:\output.wdp', ioHDP);
  UseCodecOptions := true;
  Quality := 10;
  PutFrame(ImageEnView1.IEBitmap);
  Free;
end;