deviceconsts.pas

用于CD/DVD烧录的Delphi源码,包括source和demo

{-----------------------------------------------------------------------------
 Unit Name: Consts
 Author:    Dancemammal
 Purpose:  Constants for CDBurners
 History:  First Pass
-----------------------------------------------------------------------------}

unit DeviceConsts;

interface

const

  MAX_DATABLOCKS = 16;

  {-----------------------------------------------------------------------------
    Const: List of Vendor Names from T10
    Author:    Paul Fisher
    Date:      16-Feb-2005
    Arguments: None
    Result:    None
  -----------------------------------------------------------------------------}

  ScsiVendorNameList =
    '"0B4C=MOOSIK Ltd.",' +
    '"2AI=2AI (Automatisme et Avenir Informatique)",' +
    '"3M=3M Company",' +
    '"3PARdata=3PARdata, Inc.",' +
    '"A-Max=A-Max Technology Co., Ltd",' +
    '"Acer=Acer, Inc.",' +
    '"ACL=Automated Cartridge Librarys, Inc.",' +
    '"Acuid=Acuid Corporation Ltd.",' +
    '"AcuLab=AcuLab, Inc. (Tulsa, OK)",' +
    '"ADAPTEC=Adaptec",' +
    '"ADIC=Advanced Digital Information Corporation",' +
    '"ADSI=Adaptive Data Systems, Inc. (a Western Digital subsidiary)",' +
    '"ADTX=ADTX Co., Ltd.",' +
    '"ADVA=ADVA Optical Networking AG",' +
    '"AERONICS=Aeronics, Inc.",' +
    '"AGFA=AGFA",' +
    '"AIPTEK=AIPTEK International Inc.",' +
    '"AMCODYNE=Amcodyne",' +
    '"Amphenol=Amphenol",' +
    '"ANAMATIC=Anamartic Limited (England)",' +
    '"Ancor=Ancor Communications, Inc.",' +
    '"ANCOT=ANCOT Corp.",' +
    '"ANDATACO=Andataco  (now nStor)",' +
    '"andiamo=Andiamo Systems, Inc.",' +
    '"ANRITSU=Anritsu Corporation",' +
    '"ANTONIO=Antonio Precise Products Manufactory Ltd.",' +
    '"APPLE=Apple Computer, Inc.",' +
    '"ARCHIVE=Archive",' +
    '"ARIO=Ario Data Networks, Inc.",' +
    '"ARISTOS=Aristos Logic Corp.",' +
    '"ARK=ARK Research Corporation",' +
    '"ARTECON=Artecon Inc.  (Obs. - now Dot Hill)",' +
    '"ASACA=ASACA Corp.",' +
    '"ASC=Advanced Storage Concepts, Inc.",' +
    '"ASPEN=Aspen Peripherals",' +
    '"AST=AST Research",' +
    '"ASTK=Alcatel STK A/S",' +
    '"AT&T=AT&T",' +
    '"ATA=SCSI / ATA Translator Software (Organization Not Specified",' +
    '"ATARI=Atari Corporation",' +
    '"ATG CYG=ATG Cygnet Inc.",' +
    '"ATL=Quantum|ATL Products",' +
    '"ATTO=ATTO Technology Inc.",' +
    '"ATX=Alphatronix",' +
    '"AVC=AVC Technology Ltd",' +
    '"AVR=Advanced Vision Research",' +
    '"BALLARD=Ballard Synergy Corp.",' +
    '"BAROMTEC=Barom Technologies Co., Ltd.",' +
    '"BDT=Buero- und Datentechnik GmbH & Co.KG",' +
    '"BENQ=BENQ Corporation.",' +
    '"BERGSWD=Berg Software Design",' +
    '"BEZIER=Bezier Systems, Inc.",' +
    '"BHTi=Breece Hill Technologies",' +
    '"BIR=Bio-Imaging Research, Inc.",' +
    '"BiT=BiT Microsystems (obsolete, new ID: BITMICRO)",' +
    '"BITMICRO=BiT Microsystems, Inc.",' +
    '"BlueArc=BlueArc Corporation",' +
    '"BNCHMARK=Benchmark Tape Systems Corporation",' +
    '"BoxHill=Box Hill Systems Corporation  (Obs. - now Dot Hill)",' +
    '"BREA=BREA Technologies, Inc.",' +
    '"Broadcom=Broadcom Corporation",' +
    '"BROCADE=Brocade Communications Systems, Incorporated",' +
    '"BULL=Bull Peripherals Corp.",' +
    '"BUSLOGIC=BusLogic Inc.",' +
    '"CalComp=CalComp, A Lockheed Company",' +
    '"CALIPER=Caliper (California Peripheral Corp.)",' +
    '"CAMBEX=Cambex Corporation",' +
    '"CAMEOSYS=Cameo Systems Inc.",' +
    '"CANDERA=Candera Inc.",' +
    '"CAPTION=CAPTION BANK",' +
    '"CAST=Advanced Storage Tech",' +
    '"CDC=Control Data or MPI",' +
    '"CDP=Columbia Data Products",' +
    '"CenData=Central Data Corporation",' +
    '"Cereva=Cereva Networks Inc.",' +
    '"CERTANCE=Certance",' +
    '"CHEROKEE=Cherokee Data Systems",' +
    '"CHINON=Chinon",' +
    '"CIE&YED=YE Data, C.Itoh Electric Corp.",' +
    '"CIPHER=Cipher Data Products",' +
    '"Ciprico=Ciprico, Inc.",' +
    '"CIRRUSL=Cirrus Logic Inc.",' +
    '"CISCO=Cisco Systems, Inc.",' +
    '"CLOVERLF=Cloverleaf Communications, Inc",' +
    '"CMD=CMD Technology Inc.",' +
    '"CMTechno=CMTech",' +
    '"CNGR SFW=Congruent Software, Inc.",' +
    '"CNSi=Chaparral Network Storage, Inc.",' +
    '"CNT=Computer Network Technology",' +
    '"COBY=Coby Electronics Corporation, USA",' +
    '"COGITO=Cogito",' +
    '"COMPAQ=Compaq Computer Corporation (now HP)",' +
    '"COMPELNT=Compellent Technologies, Inc.",' +
    '"COMPORT=Comport Corp.",' +
    '"COMPSIG=Computer Signal Corporation",' +
    '"COMPTEX=Comptex Pty Limited",' +
    '"CONNER=Conner Peripherals",' +
    '"CORE=Core International, Inc.",' +
    '"COWON=COWON SYSTEMS, Inc.",' +
    '"CPL=Cross Products Ltd",' +
    '"CPU TECH=CPU Technology, Inc.",' +
    '"CREO=Creo Products Inc.",' +
    '"CROSFLD=Crosfield Electronics (now FujiFilm Electonic Imaging Ltd)",' +
    '"CROSSRDS=Crossroads Systems, Inc.",' +
    '"CSCOVRTS=Cisco - Veritas",' +
    '"CSM, INC=Computer SM, Inc.",' +
    '"CYBERNET=Cybernetics",' +
    '"Cygnal=Dekimo",' +
    '"DALSEMI=Dallas Semiconductor",' +
    '"Data Com=Data Com Information Systems Pty. Ltd.",' +
    '"DATABOOK=Databook, Inc.",' +
    '"DATACOPY=Datacopy Corp.",' +
    '"DataCore=DataCore Software Corporation",' +
    '"DATAPT=Datapoint Corp.",' +
    '"DDN=DataDirect Networks, Inc.",' +
    '"DEC=Digital Equipment Corporation (now HP)",' +
    '"DEI=Digital Engineering, Inc.",' +
    '"DELL=Dell Computer Corporation",' +
    '"DELPHI=Delphi Data Div. of Sparks Industries, Inc.",' +
    '"DENON=Denon/Nippon Columbia",' +
    '"DenOptix=DenOptix, Inc.",' +
    '"DEST=DEST Corp.",' +
    '"DGC=Data General Corp.",' +
    '"DIGIDATA=Digi-Data Corporation",' +
    '"DigiIntl=Digi International",' +
    '"Digital=Digital Equipment Corporation (now HP)",' +
    '"DILOG=Distributed Logic Corp.",' +
    '"DISC=Document Imaging Systems Corp.",' +
    '"DLNET=Driveline",' +
    '"DNS=Data and Network Security",' +
    '"DotHill=Dot Hill Systems Corp.",' +
    '"DPT=Distributed Processing Technology",' +
    '"DSC=DigitalStream Corporation",' +
    '"DSI=Data Spectrum, Inc.",' +
    '"DSM=Deterner Steuerungs- und Maschinenbau GmbH & Co.",' +
    '"DTC QUME=Data Technology Qume",' +
    '"DXIMAGIN=DX Imaging",' +
    '"ECCS=ECCS, Inc.",' +
    '"ECMA=European Computer Manufacturers Association",' +
    '"elipsan=Elipsan UK Ltd.",' +
    '"Elms=Elms Systems Corporation",' +
    '"EMASS=EMASS, Inc.",' +
    '"EMC=EMC Corp.",' +
    '"EMTEC=EMTEC Magnetics",' +
    '"EMULEX=Emulex",' +
    '"ENERGY-B=Energybeam Corporation",' +
    '"ENGENIO=Engenio Information Technologies, Inc.",' +
    '"EPSON=Epson",' +
    '"EQLOGIC=EqualLogic",' +
    '"Eris/RSI=RSI Systems, Inc.",' +
    '"EuroLogc=Eurologic Systems Limited",' +
    '"evolve=Evolution Technologies, Inc",' +
    '"EXABYTE=Exabyte Corp.",' +
    '"EXATEL=Exatelecom Co., Ltd.",' +
    '"EXAVIO=Exavio, Inc.",' +
    '"FALCON=FalconStor, Inc.",' +
    '"FFEILTD=FujiFilm Electonic Imaging Ltd",' +
    '"Fibxn=Fiberxon, Inc.",' +
    '"FID=First International Digital, Inc.",' +
    '"FILENET=FileNet Corp.",' +
    '"FRAMDRV=FRAMEDRIVE Corp.",' +
    '"FUJI=Fuji Electric Co., Ltd. (Japan)",' +
    '"FUJIFILM=Fuji Photo Film, Co., Ltd.",' +
    '"FUJITSU=Fujitsu",' +
    '"FUNAI=Funai Electric Co., Ltd.",' +
    '"FUTURED=Future Domain Corp.",' +
    '"G&D=Giesecke & Devrient GmbH",' +
    '"Gadzoox=Gadzoox Networks, Inc.",' +
    '"GDI=Generic Distribution International",' +
    '"Gen_Dyn=General Dynamics",' +
    '"Generic=Generic Technology Co., Ltd.",' +
    '"GENSIG=General Signal Networks",' +
    '"GIGATAPE=GIGATAPE GmbH",' +
    '"GIGATRND=GigaTrend Incorporated",' +
    '"Global=Global Memory Test Consortium",' +
    '"Goidelic=Goidelic Precision, Inc.",' +
    '"GoldStar=LG Electronics Inc.",' +
    '"GOULD=Gould",' +
    '"HAGIWARA=Hagiwara Sys-Com Co., Ltd.",' +
    '"Heydays=Mazo Technology Co., Ltd.",' +
    '"HITACHI=Hitachi America Ltd or Nissei Sangyo America Ltd",' +
    '"HONEYWEL=Honeywell Inc.",' +
    '"HP=Hewlett Packard",' +
    '"HPQ=Hewlett Packard",' +
    '"HYUNWON=HYUNWON inc",' +
    '"i-cubed=i-cubed ltd.",' +
    '"IBM=International Business Machines",' +
    '"ICL=ICL",' +
    '"ICP=ICP vortex Computersysteme GmbH",' +
    '"IDE=International Data Engineering, Inc.",' +
    '"IFT=Infortrend Technology, Inc.",' +
    '"IGR=Intergraph Corp.",' +
    '"IMATION=Imation",' +
    '"IMPLTD=Integrated Micro Products Ltd.",' +
    '"IMPRIMIS=Imprimis Technology Inc.",' +
    '"INCITS=InterNational Committee for Information Technology",' +
    '"Indigita=Indigita Corporation",' +
    '"INITIO=Initio Corporation",' +
    '"INRANGE=INRANGE Technologies Corporation",' +
    '"INSITE=Insite Peripherals",' +
    '"integrix=Integrix, Inc.",' +
    '"INTEL=Intel Corporation",' +
    '"IOC=I/O Concepts, Inc.",' +
    '"IOMEGA=Iomega",' +
    '"iqstor=iQstor Networks, Inc.",' +
    '"ISi=Information Storage inc.",' +
    '"ISO=International Standards Organization",' +
    '"ITC=International Tapetronics Corporation",' +
    '"IVIVITY=iVivity, Inc.",' +
    '"IVMMLTD=InnoVISION Multimedia Ltd.",' +
    '"JPC Inc.=JPC Inc.",' +
    '"JVC=JVC Information Products Co.",' +
    '"KASHYA=Kashya, Inc.",' +
    '"KENNEDY=Kennedy Company",' +
    '"KENWOOD=KENWOOD Corporation",' +
    '"KODAK=Eastman Kodak",' +
    '"KONAN=Konan",' +
    '"KONICA=Konica Japan",' +
    '"KSCOM=KSCOM Co. Ltd.,",' +
    '"KUDELSKI=Nagravision SA - Kudelski Group",' +
    '"Kyocera=Kyocera Corporation",' +
    '"LAPINE=Lapine Technology",' +
    '"LASERDRV=LaserDrive Limited",' +
    '"LASERGR=Lasergraphics, Inc.",' +