unit1.dfm

非常实用本人心血研制不是为了更多我需要的代码不会轻易拿出来换东东的关于盘刻录程序代码

        Left = 183
        Top = 23
        Width = 24
        Height = 159
        Align = alRight
        Orientation = pbVertical
        Smooth = True
        TabOrder = 1
      end
      object Li2: TListBox
        Left = 1
        Top = 23
        Width = 182
        Height = 159
        Align = alClient
        ItemHeight = 13
        PopupMenu = PopupMenu3
        TabOrder = 2
        OnDblClick = Li1DblClick
      end
    end
    object Pa2: TPanel
      Left = 186
      Top = 1
      Width = 207
      Height = 183
      Align = alLeft
      Caption = 'Pa2'
      TabOrder = 2
      Visible = False
      object Li1: TListBox
        Left = 1
        Top = 23
        Width = 181
        Height = 159
        Align = alClient
        ItemHeight = 13
        PopupMenu = PopupMenu3
        TabOrder = 0
        OnDblClick = Li1DblClick
      end
      object Panel6: TPanel
        Left = 1
        Top = 1
        Width = 205
        Height = 22
        Align = alTop
        Caption = 'Panel12'
        TabOrder = 1
        object SpeedButton2: TSpeedButton
          Left = 0
          Top = 8
          Width = 9
          Height = 9
          OnClick = SpeedButton1Click
        end
        object SpeedButton5: TSpeedButton
          Left = 184
          Top = 0
          Width = 25
          Height = 25
          Caption = #20851
          OnClick = SpeedButton5Click
        end
        object CDRW1: TButton
          Left = 64
          Top = 0
          Width = 75
          Height = 25
          Caption = 'CDRW-1'
          TabOrder = 0
          OnClick = CDRW0Click
        end
      end
      object ProgressBar1: TProgressBar
        Left = 182
        Top = 23
        Width = 24
        Height = 159
        Align = alRight
        Orientation = pbVertical
        Smooth = True
        TabOrder = 2
      end
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 378
    Top = 38
    object N1: TMenuItem
      Caption = #26174#31034#20219#21153
      OnClick = N1Click
    end
    object N2: TMenuItem
      Caption = #20445#23384#20219#21153
      OnClick = N2Click
    end
    object N3: TMenuItem
      Caption = #20840#37096#21024#38500#20219#21153
      OnClick = N3Click
    end
  end
  object PopupMenu2: TPopupMenu
    Left = 250
    Top = 14
    object N4: TMenuItem
      Caption = #28155#21152#20219#21153
      OnClick = N4Click
    end
  end
  object Q1: TADOQuery
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=..\data\CDRW.mdb;Pe' +
      'rsist Security Info=False'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from cdrw')
    Left = 53
    Top = 345
  end
  object PopupMenu3: TPopupMenu
    Left = 97
    Top = 345
    object N5: TMenuItem
      Caption = #26174#31034#26085#24535
      OnClick = N5Click
    end
  end
  object SkinData1: TSkinData
    Active = True
    DisableTag = 99
    SkinControls = [xcMainMenu, xcPopupMenu, xcToolbar, xcControlbar, xcCombo, xcCheckBox, xcRadioButton, xcProgress, xcScrollbar, xcEdit, xcButton, xcBitBtn, xcSpeedButton, xcSpin, xcPanel, xcGroupBox, xcStatusBar, xcTab, xcTrackBar, xcSystemMenu]
    Options = [xoPreview, xoToolbarBK]
    Skin3rd.Strings = (
      'TCategoryButtons=scrollbar'
      'TPngBitBtn=pngbitbtn'
      'TVirtualStringTree=scrollbar'
      'TVirtualDrawTree=scrollbar'
      'TTBXDockablePanel=Panel'
      'TAdvPanelGroup=scrollbar'
      'TComboboxex=combobox'
      'TRxSpeedButton=speedbutton'
      'THTMLViewer=scrollbar'
      'TDBCtrlGrid=scrollbar'
      'TfrSpeedButton=speedbutton'
      'TfrTBButton=speedbutton'
      'TControlBar=Panel'
      'TTBDock=Panel'
      'TTBToolbar=Panel'
      'TImageEnMView=scrollbar'
      'TImageEnView=scrollbar'
      'TAdvMemo=scrollbar'
      'TDBAdvMemo=scrollbar'
      'TcxDBLookupComboBox=combobox'
      'TcxDBComboBox=combobox'
      'TcxDBDateEdit=combobox'
      'TcxDBImageComboBox=combobox'
      'TcxDBCalcEdit=combobox'
      'TcxDBBlobEdit=combobox'
      'TcxDBPopupEdit=combobox'
      'TcxDBFontNameComboBox=combobox'
      'TcxDBShellComboBox=combobox'
      'TRxLookupEdit=combobox'
      'TRxDBLookupCombo=combobox'
      'TRzGroup=panel'
      'TRzButton=button'
      'TRzBitbtn=bitbtn'
      'TRzMenuButton=menubtn'
      'TRzCheckGroup=CheckGroup'
      'TRzRadioGroup=Radiogroup'
      'TRzButtonEdit=Edit'
      'TRzDBRadioGroup=Radiogroup'
      'TRzDBRadioButton=Radiobutton'
      'TRzDateTimeEdit=combobox'
      'TRzColorEdit=combobox'
      'TRzDateTimePicker=combobox'
      'TRzDBDateTimeEdit=combobox'
      'TRzDbColorEdit=combobox'
      'TRzDBDateTimePicker=combobox'
      'TLMDButton=bitbtn'
      'TLMDGroupBox=Groupbox'
      'TDBCheckboxEh=Checkbox'
      'TDBCheckboxEh=Checkbox'
      'TLMDCHECKBOX=Checkbox'
      'TLMDDBCHECKBOX=Checkbox'
      'TLMDRadiobutton=Radiobutton'
      'TLMDCalculator=panel'
      'TLMDGROUPBOX=Panel'
      'TLMDSIMPLEPANEL=Panel'
      'TLMDDBCalendar=Panel'
      'TLMDButtonPanel=Panel'
      'TLMDLMDCalculator=Panel'
      'TLMDHeaderPanel=Panel'
      'TLMDTechnicalLine=Panel'
      'TLMDLMDClock=Panel'
      'TLMDTrackbar=panel'
      'TLMDListCombobox=combobox'
      'TLMDCheckListCombobox=combobox'
      'TLMDHeaderListCombobox=combobox'
      'TLMDImageCombobox=combobox'
      'TLMDColorCombobox=combobox'
      'TLMDFontCombobox=combobox'
      'TLMDFontSizeCombobox=combobox'
      'TLMDFontSizeCombobox=combobox'
      'TLMDPrinterCombobox=combobox'
      'TLMDDriveCombobox=combobox'
      'TLMDCalculatorComboBox=combobox'
      'TLMDTrackBarComboBox=combobox'
      'TLMDCalendarComboBox=combobox'
      'TLMDTreeComboBox=combobox'
      'TLMDRADIOGROUP=radiogroup'
      'TLMDCheckGroup=CheckGroup'
      'TLMDDBRADIOGROUP=radiogroup'
      'TLMDDBCheckGroup=CheckGroup'
      'TLMDCalculatorEdit=edit'
      'TLMDEDIT=Edit'
      'TLMDMASKEDIT=Edit'
      'TLMDBROWSEEDIT=Edit'
      'TLMDEXTSPINEDIT=Edit'
      'TLMDCALENDAREDIT=Edit'
      'TLMDFILEOPENEDIT=Edit'
      'TLMDFILESAVEEDIT=Edit'
      'TLMDCOLOREDIT=Edit'
      'TLMDDBEDIT=Edit'
      'TLMDDBMASKEDIT=Edit'
      'TLMDDBEXTSPINEDIT=Edit'
      'TLMDDBSPINEDIT=Edit'
      'TLMDDBEDITDBLookup=Edit'
      'TLMDEDITDBLookup=Edit'
      'TDBLookupCombobox=Combobox'
      'TWWDBCombobox=Combobox'
      'TWWDBLookupCombo=Combobox'
      'TWWDBCombobox=Combobox'
      'TWWKeyCombo=Combobox'
      'TWWTempKeyCombo=combobox'
      'TWWDBDateTimePicker=Combobox'
      'TWWRADIOGROUP=radiogroup'
      'TWWDBEDIT=Edit'
      'TcxButton=bitbtn'
      'TcxDBRadioGroup=radiogroup'
      'TcxRadioGroup=radiogroup'
      'TcxGroupbox=groupbox'
      'TOVCPICTUREFIELD=Edit'
      'TOVCDBPICTUREFIELD=Edit'
      'TOVCSLIDEREDIT=Edit'
      'TOVCDBSLIDEREDIT=Edit'
      'TOVCSIMPLEFIELD=Edit'
      'TOVCDBSIMPLEFIELD=Edit'
      'TO32DBFLEXEDIT=Edit'
      'TOVCNUMERICFIELD=Edit'
      'TOVCDBNUMERICFIELD=Edit'
      'trmtoolbarsize=Panel'
      'trmtoolbar=panel'
      'trmtoolbaredit=panel'
      'trmtoolbarborder=panel'
      'trmtoolbaralign=panel'
      'trmtoolbarstandard=panel'
      'trmtoolbaraddintools=panel')
    SkinStore = '(Good)'
    SkinFormtype = sfMainform
    Version = '4.42.12.06'
    MenuUpdate = True
    MenuMerge = False
    Left = 578
    Top = 361
    SkinStream = {
      DD4100005EF60200E6146330F718EC18372E3D5BB831803930042359BE36C4CB
      FB1D3566B6B1A03B29A0A1C339084652739CE10B9EBA10D5CC021A867A47A1CA
      7F2540EC5838C00EEC703F15B88A65606FDB18F72595DEE01A05FFBFD7FF750B
      F9FE6672DEFFA7C5E7EEE20413DE0DFF487C3EAC9C83EA420F8E2DFE69DDDFF2
      C2CCC83543C42403B3618C15EEBF808529D52E359C963DF4C3CB258E450110C1
      462B1E2131DA101F5E416E04AB0598C864E307C686921CD4D66B1098A0155111
      0A2430A2C9A41430393972272A123E693FEA25F893523E846020109B5FE6F914