ответ: попробуй
объяснение:
void __fastcall tform1: : button1click(tobject *sender)
{
int count = 0;
tstringlist *list = new tstringlist; // г±г®г§г¤г*гґг¬ г±гїгёг±г®гє
list-> loadfromfile("f: \\гљгіг«гјгігёг*\\info.txt");
memo1-> text = list-> text;
list-> delimitedtext = memo1-> text;
memo2-> text = list-> delimitedtext;
for (int i=0; i < list-> count; i++)
{
if ( list-> strings[i].length() < = 4 )
{
count++;
}
}
label1-> caption = inttostr(count);
delete list;
list = null;
}
