Esempio n. 1
0
//----------------------------------------------------------------------------
void __fastcall TForm1::Generarindice1Click(TObject *Sender)
{
delete Indice;
Indice=new ABO<TNodoIndice*>();
int numeroLineas=memo->Lines->Count;
int numeroPaginas=0;
for(int i=0;i<numeroLineas;i++)
{ AnsiString linea=memo->Lines->Strings[i];
  procesarLinea(linea,numeroPaginas);
}

}
Esempio n. 2
0
void __fastcall TFormPrincipal::Generar1Click(TObject *Sender)
{
        delete indicePalabras;
        indicePalabras = new tBST<tNodoIndice*>;
        int numPag = 1;
        for (int i=0; i<Memo1->Lines->Count; i++){
            AnsiString linea = Memo1->Lines->Strings[i];
            procesarLinea(linea,numPag);
            }
        //ShowMessage("Indice de palabras generado correctamente!");
        Mostrar1Click(this);
        MostrarFiltro1Click(this);
}