int fi=0;
        if (String(buffer).SubString(1,8)=="USB\\VID_")  {
        ShowMessage(String(buffer));  // AnsiString dsa; dsa=dsa.SubString(dsa.Pos("USB\\"),)
        if (fi==1) Memo1->Text=buffer;
        fi++;                                              }
        }