こんにちは 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;
誰かがエラーを修正するのを手伝ってくれますか?