int main(int argc, char** argv) {
char cad[80]="hola pepe";
int l;
char *paux;
l=longitud(cad);
fflush(stdin);
leerPalabra(cad);
fflush(stdin);
leerCadena(cad);
strcpy(cad,"hola pepe");
paux=hallarSubcadena("hola pepe","epe");
paux=hallarSubcadena("hola pepe","epo");
paux=hallarSubcadena("hola pepe","pep");
paux=hallarSubcadena("hola pepe","");
paux=suprimirSubcadena(cad,"pep");
paux=suprimirSubcadena(cad,"ola");
paux=suprimirSubcadena(cad,"epe");
paux=insertarCadena(cad,", ¿cómo estás?",strlen(cad));
paux=suprimirSubcadena(cad,", ¿cómo estás?");
paux=insertarCadena(cad," vecino",4);
paux=suprimirSubcadena(cad," vecino");
paux=suprimirSubcadena(cad,"hola");
paux=insertarCadena(cad,"hello ",0);
paux=concatenar(cad,", ¿Cómo estás?");
paux=buscaChar(cad,'C');
paux=concatenar(cad,", ¿Cómo estás?");
paux=concatenar(cad,". Espero que bien.");
paux=concatenar(cad,", ¿Cómo estás?");
paux=sustituir(cad,", ¿Cómo estás?","");
paux=sustituirChar(cad,'e','U');
}
//---------------------------------------------------------------------------
void TFormPrincipal::procesarLinea(AnsiString linea,int &numPag)
{
int longLinea = linea.Length(); // 1..Length
int i = 1;
string pal;
while (i <= longLinea){
leerBlancos(linea,i);
leerPalabra(linea,i,pal,numPag);
}
}
