GetModuleCount Example for Delphi

var
   uCount: Cardinal;
begin
   uCount := LEADDicom1.GetModuleCount();
   ShowMessage('Module Count: ' + IntToStr(uCount));
end;