/*
StrScan example
The following example uses an edit control and a button on a form. When the button is clicked, the text in the edit control is searched for a wildcard (asterisk character).
VCL example:
*/
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if (StrScan(Edit1->Text.c_str(), '*'))
    ShowMessage("Wildcard found.");
  else
    ShowMessage("Wildcard not found.");
}
CLX example:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if (StrScan(WideCharToString(Edit1->Text.c_bstr()).c_str(), '*'))
    ShowMessage("Wildcard found.");
  else
    ShowMessage("Wildcard not found.");
} 
