![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#2
|
|||
|
|||
Richtext Con Reportbuilder
HOLA,, Podrías poner 'marcas' en el richtext como por ejemplo <DIRECCION> y luego en el evento de impresión del richtext sustituir dicha cadena por la que quieras...
Aqui te mando un ejemplo de código. Espero te sirva... Saludos... Código:
procedure TForm13.ppRichText1Print(Sender: TObject); var ccad: tstrings; N:INTEGER; begin ccad := pprichtext1.RichTextStrings; for n := 0 to ccad.count- 1 do begin if (pos('<CAMARON>',ccad.Strings[n] ) >0) then BEGIN CCAD.STRINGS[N] := ANSIREPLACETEXT(CCAD.STRINGS[N], '<CAMARON>','PESCADITO' ); END; end; end; |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
dudas sobre fichas | Cecilio | Varios | 4 | 15-09-2007 15:42:31 |
Dudas sobre Firebird? | juliopag1 | Firebird e Interbase | 2 | 12-09-2005 16:15:40 |
Dudas sobre interfaces... | OscarG | OOP | 3 | 09-09-2005 14:20:50 |
Dudas sobre Locate | silviodp | Conexión con bases de datos | 8 | 28-04-2004 14:59:26 |
Dudas sobre IP | acertij022 | Internet | 0 | 20-05-2003 21:04:29 |
![]() |
|