PDA

Ver la Versión Completa : Resaltar letras en fastreport


josepicd
25-11-2015, 16:15:49
Buenas, estoy lanzando un listado con TfrxReport y necesito hacer lo siguiente.

Es un listado de palabras, por ejemplo

casa
florero
avion
barco

Las palabras estan en un arreglo, como este


pal[1].word := 'casa';
pal[1].tonica := 2;
pal[2].word := 'florero';
pal[2].tonica := 5;
pal[3].word := 'avion';
pal[3].tonica := 4;
pal[4].word := 'barco';
pal[4].tonica := 2;


Necesito que se resalte la letra tonica, con un subrayado, negrita, otro color, etc... algo que me ayude a marcar la letra indicada en "tonica".

casa
florero
avion
barco


Tengo en el "BeforePrint"


procedure TfrmMain.rptBeforePrint(Sender: TfrxReportComponent);
var pal : TfrxMemoView;
begin
pal := rpt.FindObject('word') as TfrxMemoView;
if pal = nil then exit;
pal.Text :=
end;


¿Por donde lo cojo?, ¿Alguna idea de como hacerlo?

Gracias

cloayza
25-11-2015, 20:12:35
Claro que se puede, a ver si esto te ayuda.

Fastreport tiene la posibilidad de utilizar etiquetas HTML.
Por ejemplo
<b> : Negrita
<i> : Italica
<u>: subrayado
<sub>: subindices
<sup>: superindice
<font color>: color de la fuenta

Texto en <b>Negrita</b>
Texto en <i>italic</i>
Texto en <b><i>Negrita e Italic</i></b>
E=mc<sup>2</sup>
A<sub>0=B<sup>2</sup>



pal[1].word := 'c<B>a</B>sa';
pal[1].tonica := 2;
pal[2].word := 'flor<B>e</B>ro';
pal[2].tonica := 5;
pal[3].word := 'avi<B>o</B>n';
pal[3].tonica := 4;
pal[4].word := 'b<B>a</B>rco';
pal[4].tonica := 2;


Ademas el control que usas para desplegar en el informe debe tener la propiedad AllowHTMLTags a true
Espero te ayuda

josepicd
26-11-2015, 17:03:11
Ok, muchas gracias. Tema resuelto. Un 10 amigo.