Ver Mensaje Individual
  #6  
Antiguo 07-09-2006
SMTZ SMTZ is offline
Miembro
 
Registrado: nov 2003
Posts: 225
Reputación: 23
SMTZ Va por buen camino
No funcionó

Hola, gracias por la ayuda. No ha funcionado porque no estoy escribiendo una página WEB sino un formulario de Windows, aunque, igualmente, lo he probado.

A parte del "br", he probado el carácter intro (#13), pero no ha funcionado. Ya no se me ocurren más cosas.

Código:
  procedure PrincipalWinForm.InitializeComponent;  
  Begin

    Self.DataGridTableStyle1 := System.Windows.Forms.DataGridTableStyle.Create;
  
    Self.DataGridTextBoxColumn1 := System.Windows.Forms.DataGridTextBoxColumn.Create;
    Self.DataGridTextBoxColumn2 := System.Windows.Forms.DataGridTextBoxColumn.Create;
    Self.DataGridTextBoxColumn3 := System.Windows.Forms.DataGridTextBoxColumn.Create;
    Self.DataGridTextBoxColumn4 := System.Windows.Forms.DataGridTextBoxColumn.Create;
    Self.DataGridTextBoxColumn5 := System.Windows.Forms.DataGridTextBoxColumn.Create;
    Self.DataGridTextBoxColumn6 := System.Windows.Forms.DataGridTextBoxColumn.Create;
    Self.DataGridTableStyle1.GridColumnStyles.AddRange(TArrayOfSystem_Windows_Forms_DataGridColumnStyle.Create(Self.DataGridTextBoxColumn1,
    Self.DataGridTextBoxColumn2, Self.DataGridTextBoxColumn3, Self.DataGridTextBoxColumn4,
          Self.DataGridTextBoxColumn5, Self.DataGridTextBoxColumn6));

    Self.DataGridTextBoxColumn6.TextBox.Multiline := True;
    Self.DataGridTextBoxColumn6.TextBox.WordWrap := True;
    Self.DataGridTextBoxColumn6.HeaderText := 'Linea1 ' + #13 + 'Linea2';

  End;
Gracias igualmente.
Responder Con Cita