GetModuleCount Example for Delphi

var
   nCount: Integer;
begin
   nCount:= LEADDicomDS1.GetModuleCount ();
   ShowMessage('Module Count: ' + IntToStr(nCount));
end;