Ver Mensaje Individual
  #7  
Antiguo 20-04-2012
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Cita:
Empezado por Northern Ver Mensaje
Recorres la jerarquía del TreeView y cada sub-nivel de los nodos los diferencias espacios o tabuladores, bien. Pero cómo llevas eso después al QuickReport ? Qué control utilizas para mostrar los datos ? Un QRLabel/QRMemo con la opción AutoSize a True ? Si son varias páginas el QRLabel/QRMemo se siguen auto-ajustando ?
Hola Northern, yo utilizaría un QrLabel dentro de una banda Detail, el evento OnNeedData y la propiedad Level de cada nodo:

Código Delphi [-]
   //algo así
   Nivel := TreeView1.Items[ItemIndex].Level;
   Case Nivel Of
    0 : QRLabel1.Left := LeftIni;
    1 : QRLabel1.Left := LeftIni+20;
    2 : QRLabel1.Left := LeftIni+40;
   end;
  ..............................................
  ..............................................
  //guardamos Left inicial del QrLabel
  LeftIni := QRLabel1.Left;

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita