Duda con QuickRep en c++ builder 6

[ecfisa]

Hola Luis Miguel.

'DataSet' es un nombre que usé por convención, ya que TDataSet es la clase base de todos los componentes que pueden representar datos de una tabla.

Tenes que usar el evento AfterScroll del DataSet que referencia la tabla donde está el campo con la ruta+nombre_imágen. Por tu primer mensaje creo entender que es un ADOQuery. (desconozco el nombre que le hayas dado)

Saludos.

[LuisMiguel]

Saludos ecfisa
Su ejemplo me funciono a la perfeccion, solo tengo un pequeño problemita y es que de la forma que lo hice me muestra la misma imagen para todos los datos que muestro en el QuickRep.
Me explico mejor:
Esta es la forma como obtengo las datos de mi tabla

ADOQueryCalculos->SQL->Clear();
           ADOQueryCalculos->SQL->Add("SELECT * from Resultado");
           ADOQueryCalculos->Open();
           String  DataSetRUTA=ADOQueryCalculos->FieldByName("Imagen")->AsString;

Si pusiera en el DataSetAfterScroll el código para mostrar la imagen no me reconocería el DataSetRUTA,por eso lo puse seguidamente del codigo anterior:

QRImage1->Picture = NULL;
          if (FileExists(DataSetRUTA->AsString))
          QRImage1->Picture->LoadFromFile(DataSetRUTA->AsString);

Como ve de esta forma en DataSetRUTA solo se almacenaria el primer valor de la Imagen y me mostraría los restantes datos con esa misma imagen.
Finalmente lo que quisiera lograr es mostrar en el QuickRep las imagenes de esta forma:
Nombre PA SA Imagen // campos mostrados en el QuickRep
DA MA NA Imagen1
--- --- -- Imagen2
--- --- -- Imagen3
Saludos y muchas gracias por la ayuda.

[ecfisa]

Hola.

Creo que no me he explicado con claridad, voy a intentarlo paso a paso.

• Crea un campo persistente en el TADOQuery que por defecto se llamará el nombre de tu quey ADOQueryCalculos + el nombre de campo que tenga tu tabla; suponiendo que el nombre de campo sea RUTA el nombre sería: ADOQueryCalculosRUTA.
  
• En el TQuickRep poné un componente TQRSubDetail, no un TQRBand con su propiedad BandType = rbSubDetail ya que no es lo mismo. En la propiedad DataSet del TQRSubDetail poné ADOQueryCalculos y agregá un TQRImage dentro de esta banda.
  
• Luego en el evento AfterScroll (ADOQueryCalculosAfterScroll) agregá:
  

  void __fastcall TForm1::ADOQueryCalculosAfterScroll(TDataSet *DataSet) {
    QRImage1->Picture->LoadFromFile(ADOQueryCalculosRUTA->Value);
  }

• Por último y para probarlo agrega un TButton y este código para el evento OnClick:
  

  void __fastcall TForm1::Button1Click(TObject *Sender) {
    QuickRep1->Preview();
  }

De ese modo tiene que funcionarte sin problemas.

Saludos.

[dmartinezn]

Podria explicar como crear un campo persistente en el TADOQuery, eso es una duda que tambien me ha surgido y que no habia visto!
Saludos.

[ecfisa]

Empezado por dmartinezn

Podria explicar como crear un campo persistente en el TADOQuery, eso es una duda que tambien me ha surgido y que no habia visto!
Saludos.

Si como no. De modo visual es muy sencillo, doble click sobre el componente TADOQuery -> se abre el editor de campos -> click botón derecho sobre el editor de campos -> Aparecerán estas opciones:

• Add fields : Abre una ventana para seleccionar los campos disponibles para agregar.
• New field: Se utiliza para crear un nuevo campo, como por ejemplo un campo calculado.
• Add all fields: Agrega todos los campos disponibles.

Saludos.