IsAsyncOperations Example for Delphi

   if(LEADDICOMNet1.IsAsyncOperations (LEADDICOMNet1.hPDU) = True)then
   begin
      ShowMessage('AsyncOperations enabled');
      //get the operations counts
      ShowMessage('Invoked ' + IntToStr(LEADDICOMNet1.GetInvokedOperationsCount(LEADDICOMNet1.hPDU)));
      ShowMessage('Performed ' + IntToStr(LEADDICOMNet1.GetPerformedOperationsCount(LEADDICOMNet1.hPDU)));
      //now disable it
      LEADDICOMNet1.SetAsyncOperations(LEADDICOMNet1.hPDU, False, 0, 0);
   end
   else
   begin
      ShowMessage('AsyncOperations disabled');
      //now enable it
      LEADDICOMNet1.SetAsyncOperations(LEADDICOMNet1.hPDU, True, 0, 0);
   end;