Ver Mensaje Individual
  #17  
Antiguo 01-01-2018
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Suponiendo que las dimensiones de los StringGrids son iguales, si deseas copiar el contenido de uno a otro:
Código PHP:
void copySG(TStringGrid *source, TStringGrid *target)
{
  for(
int r = source->FixedRows; r < source->RowCount; r++)
    
target->Rows[r]->AddStrings(source->Rows[r]);
}

// Ejemplo de uso:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  
copySG(StringGrid1, StringGrid3);
} 
Si deseas sumar dos TStringGrid y dejar el resultado en un tercero:
Código PHP:
void sumarSG(TStringGrid *s1, TStringGrid *s2, TStringGrid *s3)
{
  
// (se supone que s1 y s2 contienen datos numéricos válidos)
  
for(int r = s1->FixedRows; r < s1->RowCount; r++)
    for(
int c = s1->FixedCols; c < s1->ColCount; c++)
      
s3->Cells[c][r] = s1->Cells[c][r].ToDouble() + s2->Cells[c][r].ToDouble();
}

// Ejemplo de uso:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  
sumarSG(StringGrid1, StringGrid2, StringGrid3);
} 
Son ejemplos orientativos, todo depende de lo que desees hacer y como tengas distribuida la información en los StringGrids...

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita