Someone

void Vaistine::Rasti(char *p, char *f, int m){   for (int i=1; i<m; i++) {      if ((strstr(E[i].pav, p) != NULL) && (strstr(E[i].forma, f) != NULL)) {         Form1->Isvesti(E[i].pav, E[i].forma, E[i].kiekis, E[i].kaina);      }     else Form1->Isvesti("nu", "k1", 5, 2);   }}