[feliz-58]

Empezado por ecfisa

Hola.

Si no entendí mal el problema, tendría que quedar así:

Código Delphi [-]
...
Var
  Precios, Neto, Impuesto, ITBIS : Real;
Begin
  if SG.Row = SG.FixedRows then // ¿ estamos la línea de cabeceras ?
    SG.Row := SG.Row + 1;  // avanzar una linea
  //----------------------------------------------------------
  {
     ... el resto de tu código 
  }
  //----------------------------------------------------------
  SG.RowCount := SG.RowCount + 1; // Agregar otra línea
  SG.Row := SG.Row + 1;           // el siguiente ingreso irá en la línea agregada
end;

Saludos

"Fuera de Rango"

creo que lo enfocaste mal, me explico, la primera vez que se va a trabajar con el Grid, esta la cabecera mas 1 fila vacia, con mi codigo, "lleno" esa fila vacia y finalmente agrego la linea siguiente, es decir queda asi:

Código Delphi [-]
Var
Precios, Neto, Impuesto  : Real;
Begin
SG.Row := SG.Rowcount - 1;
 //----------------------------------------------------------
  {
     ... el resto del código 
  }
  //----------------------------------------------------------
SG.RowCount := SG.RowCount + 1;

Seria igual a esto:

---Cabecera---
---Primer articulo---
---Fila Vacia-----

con mi codigo, cada vez que agrego un articulo, al final tengo que dejar la siguiente linea, porque si agrego la linea antes de agregar el articulo, la primera vez, quedaría una fila vacia Arriba, es decir.

Código Delphi [-]
Var
Precios, Neto, Impuesto  : Real;
Begin
SG.RowCount := SG.RowCount + 1;
SG.Row := SG.Rowcount - 1;
 //----------------------------------------------------------
  {
     ... el resto del código 
  }
  //----------------------------------------------------------

---Cabecera---
---Fila Vacia-----
---Primer articulo---