HAcer algo similar a la Combinacion de correspondencia de Word

[Nuria]

Hola!

Simplemente cuando selecciona un campo que quiere añadir a la plantilla hago lo siguiente:

  // Campos--> TComboBox donde tengo los nombres de los campos .
  //  Editor ---> TRichEdit. 
  // Cuando selecciona un campo del comboBox...
  Editor.SelText:= '<<' + Campos.Items.Strings[Campos.ItemIndex]+ '>>';

Así me creo la plantilla. Es de tipo texto pero la puedes guardar con la extensión que quieras. Luego para sustituir los campos hago lo siguiente:

      // Valor ---> Array donde estan los valores de los campos...
     // Sustituyo campos
      for i:= 0 to Length(Campos) - 1 do begin
        texto := '<<' + Campos[i] + '>>';
        // busco la  de la string a sustituir...
        posi := Editor.FindText(texto,1,longi,[stSetSelection]);  
        while posi >= 0 do begin
          MainForm.Editor.selStart :=  posi;
          MainForm.Editor.SelLength := Length(texto) ;
          // Sustituyo el texto....
          MainForm.Editor.SelText := valor[i];
          posi := Editor.FindText(Texto,posi,longi,[stSetSelection]);
        end;
      end;

Empezado por oliverinf

quisiera saber si usas algun editor de reportes com Quick Report o algun otro.

De momento no. Aunque creo que al final tendré que utilizar alguno, ya que estoy teniendo algún problemilla a la hora de imprimir ciertas cosas...Hilo

Bueno espero haberme explicado bien. Cualquier duda ya sabes...

Saludos!