unit1.cpp

来自「<<C++Builder 6实用编程100例>>随书光盘」· C++ 代码 · 共 86 行

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include <mmsystem.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
        char c;
        String S;
        int type;
        for(c='A';c<='Z';c++)
        {
                S=String(c)+":";
                type=GetDriveType(S.c_str());
                if(type==DRIVE_CDROM)
                        ComboBox1->Items->Add(S);
        }
        if(ComboBox1->Items->Count==0)
        {
                Button1->Enabled=false;
                Button2->Enabled=false;
                ComboBox1->Items->Add("抱歉，没有找到光驱。");
        }
        else
                ComboBox1->ItemIndex=0;
        Memo1->Clear();
        Button1->Enabled=true;
        Button2->Enabled=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
        Button1->Enabled=false;
        Button2->Enabled=false;
        Memo1->Lines->Add("Opening...");
        String s;
        s="open "+ComboBox1->Items->Strings[ComboBox1->ItemIndex]+" type cdaudio alias cd";
        mciSendString(s.c_str(), 0, 0, 0);
        s="set cd door open";
        mciSendString(s.c_str(), 0, 0, 0);
        Memo1->Clear();
        Button2->Enabled=true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
        Button1->Enabled=false;
        Button2->Enabled=false;
        Memo1->Lines->Add("Closing...");
        String s;
        s="open "+ComboBox1->Items->Strings[ComboBox1->ItemIndex]+" type cdaudio alias cd";
        mciSendString(s.c_str(), 0, 0, 0);
        s="set cd door Closed";
        mciSendString(s.c_str(), 0, 0, 0);
        Memo1->Clear();
        //读取光驱中光盘卷标与序列号
        char volname[255],filename[100];
        DWORD sno,max,fileflag;
        char* str=(ComboBox1->Items->Strings[ComboBox1->ItemIndex]).c_str();
        if(GetVolumeInformation(str,volname,255,&sno,&max,&fileflag,filename,100))
        {
                Memo1->Lines->Add("光驱中光盘卷标为:");
                Memo1->Lines->Add(String(volname));
                Memo1->Lines->Add("光驱中光盘序号为:");
                Memo1->Lines->Add(String(sno));
        }
        else
                Memo1->Lines->Add("光驱中没有发现光盘");
        Button1->Enabled=true;
}
//---------------------------------------------------------------------------