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); } }