This function is similar to the CompressContent function, however it only compresses the selected page. Looping through all the pages using this function will have the same effect as CompressContent, however it will be possible to provide feedback to the user.
function TDebenuPDFLibrary1811.CompressPage: Integer;
Function DebenuPDFLibrary1811.PDFLibrary::CompressPage As Long
int DPLCompressPage(int InstanceID)