0

こんにちは Delphi で jpg 画像の品質を下げようとしています。問題は、私のコードでこのエラー E2010 Incompatible types: 'TPersistent' and 'string' が発生することです。

私のコードはこれです:

   TForm1.Button4Click procedure (Sender: TObject);
   var
     imagen2: TJpegImage;
   begin

     image2: = TJpegImage.Create;
     imagen2.Assign ('c:/test.jpg');
     imagen2.CompressionQuality: = 60;
     imagen2.SaveToFile ('c:/test.jpg');

   end;

誰かがエラーを修正するのを手伝ってくれますか?

4

2 に答える 2