Слова строки, которые начинаются на гласную и их количество

void __fastcall TForm2::Slova(AnsiString fg)
{
 UnicodeString glas="аеиоуыэюя";
 int d = 0;
 TStringDynArray arr(SplitString(fg, L" "));
    for (int i = 0; i < arr.Length; i++)
    {
      for(int t = 1; t < glas.Length()+1; t++)
      {
        if(arr[i].SubString(1,1)== glas[t])
        {
         ListBox1->Items->Add(arr[i]);
         d++;
        }
      }
    }
   ShowMessage("Количество слов начинающихся с гласной буквы: " + IntToStr(d));
 
}
void __fastcall TForm2::Button1Click(TObject *Sender)
{
  Slova(Edit1->Text);
}
//---------------------------------------------------------------------------

#include <memory>
void __fastcall Slova( String str )
{
  String glas = "аеиоуыэюя";
 
  std::auto_ptr< TStringList > sl ( new TStringList );
  ExtractStrings( TSysCharSet() << ' ', TSysCharSet(), str.c_str(), sl.get() ); // BRcr
 
  for( int i = 0; i < sl->Count; i++ )
    if( sl->Strings[i].IsDelimiter( glas, 1 ) )
      Form1->ListBox1->Items->Add( sl->Strings[i] );
 
   ShowMessage( "Количество слов начинающихся с гласной буквы: "
                + IntToStr( Form1->ListBox1->Count ) );
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  Slova( Edit1->Text );
}

#include <StrUtils.hpp>

                                                 //---------------------------------------------------------------------------
 
#include <iostream.h>
#include <conio.h>
#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include <vcl.h>
//---------------------------------------------------------------------------
void stv(char s[256]){
char *sl,max_sl[256], sdump[256];
int i=0,im,n;
cout<<"Vvedit zadanuu stroku:"<<endl;
gets(s);
strcpy(sdump, s);
int minLen = 99;
for(int j=1;(sl=strtok(j?s:NULL,".,?-!:; "))!=NULL;j=0)
{
i++;
if(strlen(sl)<minLen) minLen = strlen(sl);
}
 
cout<<"Slova minimalnoi dlini: \n";
 
for(int j=1;(sl=strtok(j?sdump:NULL,".,?-!:; "))!=NULL;j=0)
{
if(strlen(sl)==minLen) cout<<sl<<" ";
}
 
}
 
 
 
 
int main ()
{ char s[256];
stv(s);
getch();
return 0;
}
 
 
 
 
 
//---------------------------------------------------------------------------