Extension to JQWpaint

[zsleo]

Request: can you please implement a .OnAfterSave for JQWpaint as you have done for JQImage

TIA

[Alexander Bulei]

Hi zsleo,

No need, since the Image have onAfterSave:

delphi code

procedure TIWForm10.IWAppFormCreate(Sender: TObject);
begin
  IWCGJQImage1.OnAfterSave:= IWCGJQImage1AfterSave;
end;

procedure TIWForm10.IWCGJQButton1JQButtonOptionsClick(Sender: TObject; AParams: TStringList);
begin
  IWCGJQWPaint1.ExportToImage(IWCGJQImage1);
  IWCGJQImage1.SaveImage('C:\temp_wpaint.png');
end;

procedure TIWForm10.IWCGJQImage1AfterSave(Sender: TObject; const AFileUrl: string);
begin
  sleep(0);
end;

Best Regards.

[zsleo]

Sorry! I completely missed that... I will try later today.

Thanks