Ver Mensaje Individual
  #1  
Antiguo 26-06-2014
Avatar de eennzzoo
eennzzoo eennzzoo is offline
Miembro
NULL
 
Registrado: nov 2013
Ubicación: Argentina
Posts: 59
Reputación: 13
eennzzoo Va por buen camino
Problemas al insertar datos en archivo

Hola, tengo un problema al insertar datos en el archivo m.txt.
El if lo hace bien, el else no. Se tilda el form y me borra todo lo del m.txt

el m.txt es este
26/06/2014
25

Código:
String Mont = TS9->Strings[1];
int Tot;
Tot = Mo + Mont.ToInt();
for(int i=0; i < TS9->Count; i+=2) {
	if (TS9->Strings[i]==("00/00/0000")) {
		TS9->Delete(i+1);
		TS9->Delete(i);
	        TS9->Insert(i, (Now().CurrentDate()));
		TS9->Insert(i+1, Tot);
		TS9->SaveToFile("H:\\m.txt");
	}else {
		TS9->Insert(i+2, (Now().CurrentDate()));
		TS9->Insert(i+3, Tot);
		TS9->SaveToFile("H:\\m.txt");
	}
}
Quizas el problema sea que como esta en un for no va a terminar nunca ya que estoy insertando datos y termina hasta TS->COUNT (y se va incrementando) osea nunca porque va a estar insertando. Creo yo nose.Gracias.
__________________
https://www.facebook.com/riverplateoficial

Última edición por ecfisa fecha: 26-06-2014 a las 22:43:29.
Responder Con Cita