Ver Mensaje Individual
  #1  
Antiguo 06-06-2006
Avatar de BlueSteel
[BlueSteel] BlueSteel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Concepción - Chile
Posts: 2.310
Reputación: 23
BlueSteel Va por buen camino
Eliminar Fila de StringGrid...Consulta

Hola amigos.. tengo una consulta....

Tengo un StringGrid en donde ingreso valores, pero tambien tengo la opcion de eliminar algunos valores

el codigo para eliminar un fila del StringGrid es (rejilla=StringGrid)

Código Delphi [-]
     For i:= Rejilla.Row to Rejilla.RowCount -1 do
             Begin
                  Rejilla.Rows[i][0] := Rejilla.Rows[i+1][0];
                  Rejilla.Rows[i][1] := Rejilla.Rows[i+1][1];
                  Rejilla.Rows[i][2] := Rejilla.Rows[i+1][2];
                  Rejilla.Rows[i][3] := Rejilla.Rows[i+1][3];
             End;
             Rejilla.RowCount := Rejilla.RowCount - 1;

bueno.. el problema se presenta cuando despues de eliminar un elemento... al incorporarle un elementro nuevo.. me borra todo el contenido anterior.. y no he logrado solucionarlo...

el codigo para agregar un item es
Código Delphi [-]
    If Sw_1 = '2' Then Rejilla.RowCount := Rejilla.RowCount +1;
     Rejilla.Cells[0,Rejilla.RowCount-1] := vCC;
     Rejilla.Cells[1,Rejilla.RowCount-1] := CB_Centro.Text;
     Rejilla.Cells[2,Rejilla.RowCount-1] := vMto.Text;
     Rejilla.Cells[3,Rejilla.RowCount-1] := vObs.Text;
     Sw_1 := '2';
Alguien sabe por que puede pasar esto...
__________________
BlueSteel
Responder Con Cita