9 respuestas en este tema

[TiammatMX]

Pues éso, chic@s, tengo varios campos que gracias a Fenareth y sus respuestas, ahora contienen texto RTF, con formatos bonitos, etcétera..., pero que a la hora de desplegarse en un TDbGrid se ven como un batiburrillo de letras, códigos y hasta groserías aparecen... 

¿Hay alguna manera (que no sea utilizando componentes de terceros, ya saben, la imposición que tengo) de mostrar los campos con contenido RTF en texto plano, solamente en el TDbGrid?

[Fenareth]

Y no hay modo de guardar el texto con formato en un campo y recuperarlo donde sea necesario, y en otro guardarlo sin formato para cuando lo necesites así ?

Saludox !

[Caral]

Hola
Pregunto:
No se puede ver en un memo ?.
Saludos

[TiammatMX]

Y no hay modo de guardar el texto con formato en un campo y recuperarlo donde sea necesario, y en otro guardarlo sin formato para cuando lo necesites así ?...

Estás de acuerdo conmigo que ésto es DUPLICAR datos, lo cual no es muy conveniente en un entorno de trabajo con altos volúmenes de captura. Y más cuando el espacio en el servidor es crítico para el usuario.

...No se puede ver en un memo ?...

Sí, se ve en un TMemo, PERO como ya contiene los códigos RTF, es ilegible a simple vista.

[Fenareth]

Hola
Pregunto:
No se puede ver en un memo ?.
Saludos

Si amigo se visualiza donde quieras, pero en todo caso mostraría todos los carácteres "raros" que le dan formato al texto y no nada más el texto que es lo que creo que necesita TiammatMX....

Saludox !

[egostar]

Estás de acuerdo conmigo que ésto es DUPLICAR datos, lo cual no es muy conveniente en un entorno de trabajo con altos volúmenes de captura. Y más cuando el espacio en el servidor es crítico para el usuario.

Te estresas demasiado amigo, el texto lo puedes cargar en un RichEdit (lo creas en tiempo de ejecución) y asignas el texto en un campo calculado del DBGrid.

delphi

CampoCalculado.AsString := RichEdit1.Lines.Text;

Saludos

[Caral]

Hola
Puedes poner un richedit en el dbgrid, no ?
Saludos

[Caral]

Hola
Aqui tienes un TRichEdit dentro (aparentemente) de un DBgrid.
Tal vez te de alguna idea.
Saludos
Cambia la dirección en el adoconnection para que lo puedas correr.

Archivos adjuntos

•  3427_0b3b5cd418bb890521ee44291a6722e54a7d35bd.zip   33,59KB   3 descargas

[TiammatMX]

Te estresas demasiado amigo...

Si supieras como me tienen...  ... entenderías por qué ando como que en el stress que casi es scincoo o sseiss... jajajajajaja

...el texto lo puedes cargar en un RichEdit (lo creas en tiempo de ejecución) y asignas el texto en un campo calculado del DBGrid.

delphi

CampoCalculado.AsString := RichEdit1.Lines.Text;

...

Ésta solución sí me gusta, matarili lirilón..., ¿sería mucha molestia que funjas como el guía de ésta pobre alma en pena, si no es mucho pedir? Paso a pasito, sil vous plait...

...tienes un TRichEdit dentro (aparentemente) de un DBgrid...

Gracias, Caral..., el problema es que NO quieren el TRichEdit dentro del TDbGrid, sino sólo desplegar el texto contenido en el campo SIN los códigos RTF. De todas maneras, compañero, muy muy agradecido.

[TiammatMX]

Como siempre, la solución en varios pasos.

Paso 1.- Al TADOQuery que utilizo para obtener los datos de la rejilla, debo extraerle los nombres de campos hasta llegar al evento OnGetText de cada uno.

Paso 2.- En el dicho evento OnGetText, le incluímos un poquito de código de ésta manera:

delphi

procedure TfrmPrncpl.QueryCampoGetText(Sender: TField; var Text: String; DisplayText: Boolean);
var
  redtTemporal : TRichEdit;
  sTexto : string;
begin
  redtTemporal := TRichEdit.Create(Self);
  with redtTemporal do
  begin
    Parent := frmPrncpl;
    redtTemporal.Text := Query.FieldValues['Campo'];
    redtTemporal.PlainText := True;
    sTexto := redtTemporal.Lines.Text;
    Destroy;
  end;
  Text := sTexto;
end;

Como podemos apreciar, creo un TRichEdit "al vuelo", lo utilizo como "traductor" de los datos contenidos en el campo y devuelvo el texto resultante para ser mostrado en el TDbGrid.

Añado la solución para futuras referencias, sobre todo, mías... jajajajajaja