Ver Mensaje Individual
  #1  
Antiguo 04-11-2011
Avatar de GerTorresM
GerTorresM GerTorresM is offline
Miembro
 
Registrado: nov 2005
Ubicación: Tunja - Boyacá
Posts: 210
Reputación: 19
GerTorresM Va por buen camino
Cool Numero de componentes de Quick Report

Hola a todos:

bien la situación del día es la siguiente:

pretendo mediante codigo
Código Delphi [-]
  for i_local:= 0 to self.ComponentCount -1 do
    if Components[i_local] is TQRLabel then
      Try
        for j_local:= 0 to pListadoDatos.Count do
          begin
            cadena_local:= pListadoDatos.Strings[j_local];
            Posicion_local:= pos('-',cadena_local);
            Tag_local:= StrToInt(copy(Cadena_local,0,Posicion_local));
            if (Tag_local = TQRLabel(Components[i_local]).Tag) then
               TQRLabel(Components[i_local]).Caption:= copy(Cadena_local,Posicion_local,length(Cadena_local)-Posicion_local);
          end;
      Except on e:exception do
         ShowMessage(Components[i_local].Name + ' ' +  e.Message);
      End;

Llenar algunas etiquetas en un reporte, para el efecto guardo lo datos que me interesan escribir en un TStringList y pretendo ubicar el componente en el reporte y colocar el texto que viene de TStringList, bien mi idea era hacer un barrido del reporte, y mirar en los componentes su tag y apartir de eso en los QRLabel escribir su caption.

el problema es que al usar self.ComponentCount en el reporte obtengo siempre un CERO y por ende no hay recorrido, probe los mismo con ControlCount y obtuve el mismo resultado, entonces la pregunta es que propiedad que me permite saber cuantos componentes has en un reporte o en una banda ??


Agradezco de antemano



GerTorresM
Colombia
Responder Con Cita