Cita:
Empezado por jpgonzalez
Código Delphi [-]if (Listas.sgCanciones.Cells[0,i] = txtBuscador.Text) then begin
encontrado := True;
break;
end
else begin
Listas.sgCanciones.RowCount:= Listas.sgCanciones.RowCount+1; end;
Por lo que entendi de tu codigo, estas pasando al siguiente de la lista cuando lo encuentras, en lugar de pasar al siguiente si no lo haces.
Abrazo!
|
Amigo lo que sucede es que al incluir la linea:
Código Delphi
[-]
Listas.sgCanciones.RowCount:= Listas.sgCanciones.RowCount+1;
El ciclo se tornará infinito, ya que le estas agregando una nueva fila al grid...
