for (int i=0; i<ListBox1->Items->Count;i++)
{
if (ListBox1->Items->Strings[i].SubString(0, Edit1->Text.Length())==Edit1->Text)
{
ListBox1->Selected[i]=true;
}
else
{
ListBox1->Selected[i]=false;
}

}