Как в потоке организовать открытие флешки

if(GetDriveType(Edit1->Text) == DRIVE_NO_ROOT_DIR)(или что то вроде этого
повторить команду много много раз)
else
 открыть диск) и остановить проверку

ProgressBar1->Position = 0;
char disk[100];
strcpy( disk, Edit1->Text.c_str( ) );
bool ready = false;
do {
        ready=DirectoryExists(disk); // ïûòàåìcÿ îòêðûòü êîðíåâóþ äèðåêòîðèþ
        Application->ProcessMessages();
} while (!ready);
try {
        ShellExecute( Handle, "open", disk, NULL, NULL, SW_RESTORE );
        dt = Now( ); // ôîðìàò äàòû
        Log->Lines->Add( DateToStr( dt ) + " " + TimeToStr( dt ) + " " + " - " + "Îòêðûò äèñê: " + "(" + Edit1->Text.SubString(1,2) +")" );
        ProgressBar1->Position = 100;
} catch (...) {
 ещё раз и раз стучу к диску;}

void __fastcall TMain::WMDeviceChange( TMessage &Message ) {
    if ( Message.Msg == WM_DEVICECHANGE && Message.WParam == 0x8000 ) {
        char DiskLabel[MAX_PATH];   //метка диска
        WORD OldErrorMode;  //отключаем показ ошибок
        AnsiString disk;   //переменная disk типа  AnsiString
        DWORD dr = GetLogicalDrives( );  // функция возвращает битовую маску
        for ( int x = 1; x < 26; x++ ) { // проходимся циклом по битам
            if ( ( dr >> x ) & 1 ) {     // узнаём значение текущего бита, если единица - диск с номером x есть
                disk = AnsiString( ( char )( 65 + x ) ) + "://"; // получаем литеру диска
                OldErrorMode = SetErrorMode( SEM_FAILCRITICALERRORS ); // убираем показ ошибок
                bool ready = DirectoryExists(disk); // пытаемcя открыть корневую директорию
                if (ready)
                {   // пытаемcя открыть корневую директорию
                    UINT DriveType = GetDriveType( disk.c_str( ) ); // получаем тип диска
                    if ( DriveType != DRIVE_CDROM & // исключаем CDROMы
                            DriveType != DRIVE_FIXED & // исключаем  HDD
                            DriveType != DRIVE_RAMDISK &  // исключаем  Ram disk
                            DriveType != DRIVE_REMOTE &     //исключаем FDD
                            DriveType != DRIVE_NO_ROOT_DIR &    //исключаем повреждённые диски
                            DriveType != DRIVE_UNKNOWN)       //исключаем неизвестные диски
                    {
                    PlaySoundW( L"alert.wav", 0, SND_ASYNC );   //проигрываем звук
                            GetVolumeInformation( disk.c_str( ), DiskLabel, MAX_PATH, NULL, NULL, NULL, NULL, 0 );    //получаем Имя диска
                            // для отчета
                            dt = Now( ); // полный формат даты
                            Log->Lines->Add( DateToStr( dt ) + " " + TimeToStr( dt ) +
                                             " " + " - " + " Подключен накопитель: " "(" + ( disk.SubString(1,2) ) +
                                             ")" + " " + DiskLabel + "" );     //указываем в Лог время,дату, имя диска.
                        Edit1->Text=disk;         //результат в Edit1
                            Button6->Click();     //жмяк на кпопку
                        }

ProgressBar1->Position = 0;
char disk[100];
strcpy( disk, Edit1->Text.c_str( ) );
bool ready = false;
do {
 ready=DirectoryExists(disk); // пытаемcя открыть корневую директорию
 Application->ProcessMessages();
} while (!ready);
try {
 ShellExecute( Handle, "open", disk, NULL, NULL, SW_RESTORE );
 dt = Now( ); // формат даты
 Log->Lines->Add( DateToStr( dt ) + " " + TimeToStr( dt ) + " " + " - " + "Открыт диск: " + "(" + Edit1->Text.SubString(1,2) +")" );
 ProgressBar1->Position = 100;
} catch (...) {

void __fastcall TMain::WMDeviceChange( TMessage &Message ) {
    if ( Message.Msg == WM_DEVICECHANGE && Message.WParam == 0x8000 ) {

void __fastcall TMain::WMDeviceChange( TMessage &Message ) {
    if ( Message.Msg == WM_DEVICECHANGE && Message.WParam == 0x8000 ) {