Tema: Urgente!!
Ver Mensaje Individual
  #3  
Antiguo 19-11-2012
cloayza cloayza is offline
Miembro
 
Registrado: may 2003
Ubicación: San Pedro de la Paz, Chile
Posts: 947
Reputación: 25
cloayza Tiene un aura espectacularcloayza Tiene un aura espectacular
Cita:
Empezado por ecfisa Ver Mensaje
Hola gonzabec.

Si lo acomodé correctamente, lo primero que veo es que no incrementas el valor de 'i', por lo que no salis del ciclo while:
Código Delphi [-]
var
  encontrado: Boolean;
  i: Integer;
begin
  encontrado:=false;
  i:= 1;
  while (i <= Listas.sgCanciones.RowCount -1) do
  begin
    if (Listas.sgCanciones.Cells[0,i] = txtBuscador.Text) then
    begin
          encontrado := True;
          break;
    end;
      //Listas.sgCanciones.RowCount:= Listas.sgCanciones.RowCount+1; Para que aumentar el número de filas del Grid...?

    Inc(i); // <=== por ejemplo aquí
  end
  //Creo interpretar que cuando lo encuentra debe posicionarse en la fila correspondiente...
 
  if encontrado then
     Listas.sgCanciones.Row:=i;
end;

Saludos.
Si no es así...olvida lo que digo.

Un abrazo
Responder Con Cita