Cita:
Empezado por gaston260
hola CARO , no uso ningun boton para guardar los datos , los datos se generan automaticamente ; el caso es asi ! dentro de un for tengo un edit que toma un valor arbitrario , y solo se tendrian que guardar los datos cuando el edit toma un valor repetido (x) veces , el tema es que el edit toma tantos valores que cuando quiere guardar en un txt , solo guarda un valor !
|
Creo que te entiendo, según el otro hilo que abriste estas utilizando este codigo para verificar si se ha repetido el valor 0, partiendo de eso, debes utilizar una variable donde ir almacenando lo que tienes, nose porque utilizas un Edit, podrías también utilizar otra variable.
Código Delphi
[-]
var
Valor : String;
begin
agenda1 := TStringList.Create;
Try
Valor := '';
for .................
begin
..........................
Valor := Valor + edit1.Text;
if edit1.Text = '0' then
inc(contador)
else
contador := 0;
if contador = 30 then
begin
beep;
Agenda1.Add(Valor); Valor := ''; end;
end;
agenda1.SaveToFile('C:\archivos\MiAgenda1.txt');
Finally
FreeAndNil(Agenda1);
end;
Saluditos