[eennzzoo]

Empezado por escafandra

Creo que no habéis entendido a eennzzoo, tiene razón, no se borra del archivo.

Quizas eennzzoo está buscando un ajuste como este:

void DeleteData(TStrings *TS, String dni)
{
  int ix = TS->IndexOf(dni);

  if (ix != -1) {
    if (MessageBox(0,"¿ Desea borrar los datos ?","",MB_YESNO)==IDYES) {
      TS->Delete(ix+2);
      TS->Delete(ix+1);
      TS->Delete(ix);
      Lista->SaveToFile(ExtractFilePath(Application->Name)+"file.txt");
    }
  } else
    MessageBox(0,"No se encontró una persona con ese DNI","", MB_OK);
}

Saludos.

Ahora si funciona. Pero en vez de ser Lista->SaveToFile es TS->SaveToFile. Gracias.