Ver Mensaje Individual
  #3  
Antiguo 27-10-2006
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.549
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Asignar los datos, puedes hacerlo con la propiedad Text; Así sólo debes hacer un bucle que recorra las líneas.

Código Delphi [-]
var
  i:Integer;
begin

  // Asignar filas y columnas
  SG2.RowCount := StringGrid1.RowCount;
  SG2.ColCount := StringGrid1.ColCount;
  // Otras propiedades
  SG2.DefaultRowHeight := StringGrid1.DefaultRowHeight;

  // Ancho de columnas
  for i := 0 to (StringGrid1.ColCount - 1)  do begin
    SG2.ColWidths[i] := StringGrid1.ColWidths[i];
  end;

  // Asignar el contenido
  for i := 0 to (StringGrid1.RowCount - 1) do begin
    SG2.Rows[i].Text := StringGrid1.Rows[i].Text;
  end;
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita