Tema: Como hacer para totalizar una columna de un stringgrid por valor
Ver Mensaje Individual
  #22  
Antiguo 08-02-2013
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
  
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.735
Reputación: 20
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Ten en cuenta que donde inicializas algunas variables estás utilizando i, que no está inicializada y puede contener basura.

Código Delphi [-]
      // Inicializo romp con el valor de la primera linea
      romp := Trim(Copy(s1[0], 36, 8)); // ROMPER POR AUTORIZACION
      anombre := Trim(Copy(s1[i], 85, 60));  // PRIMER NOMBRE
      aautoriz := Trim(Copy(s1[i], 36, 8)); // PRIMERA AUTORIZACION
      afecha := Trim(Copy(s1[i], 10, 8));   // PRIMERA FECHA AUTORIZACION

Creo que deberías reemplazar la variable i por un 0 en todas estas líneas.
Responder Con Cita