QuickReport... se puede hacer un GroupHeader con variables ?

[[oscarac]]

buenos dias
estoy realizando un reporte el cual debe "quebrar" de acuerdo a los digitos que se solicite previamente (en un form)

cuando coloco lo siguiente en "Expression"

Código Delphi [-]
qryBalanceIntegralGasto.Cuenta

el reporte me "quiebra" por la cuenta, lo que me gustaria es que el reporte quiebre de acuerdo a el "nivel" de la cuenta

Código Delphi [-]
 
Copy (qryBalanceIntegralGasto.Cuenta,1, StrtoInt(frmBalanceIntegral.edtDigito.Text))

pero no me funciona

alguien tuviera una idea?.... mientras seguire probando

gracias por la atencion

[[oscarac]]

les cuento que ya lo solucione con un truco (al menos el que se me ocurrio)
en la instruccion del query es que "capturo" la cuenta al nivel que quiero y luego hago el quiebre por ese campo

Código Delphi [-]
StrSql := 'select Left(CG.cuenta, ' + edtDigito.Text + ') As CNivel, CG.Cuenta, P.Descripcion , ' +
             'Sum (Enero) As m01, ' +
             'Sum (Febrero) As m02, ' +
             'Sum (Marzo) As m03, ' +
...
...
...
             'From tblCuentaGasto CG ' +
             'Left Join tblPlanContable P on CG.Empresa = P.Empresa and CG.Periodo = P.Periodo and CG.Cuenta = P.Cuenta ' +
               ' where CG.Empresa = ' + QuotedStr(dmGlobal.g_CodigoEmpresa) + ' and CG.Periodo = ' + QuotedStr(Copy(dmGlobal.g_Periodo,1,4)) +
               ' group by  Left(CG.CUENTA, ' + edtDigito.Text + '), CG.Cuenta, P.Descripcion'

ahora me sale otra pregunta... (q seguire investigando)

me gustaria que si los digitos de la cuenta (edtDigito.Text) sea igual al nivel maximo de la cuenta... entonces no haga el quiebre...
se podra?

[[oscarac]]

me emociona descubrir que puedo solucionar los temas con un poco de ingenio

ya solucione el segundo tema

Código Delphi [-]
procedure TqrBalanceIntegralGasto.QuickRepBeforePrint(Sender: TCustomQuickRep;
  var PrintReport: Boolean);
begin
  if Length(Trim(qryBalanceIntegralGastoCNivel.AsString)) = StrToInt(AnsiRightStr(dmGlobal.g_nivelCuenta,1)) then
    QRGroup1.Expression := '';
end;

Simplemente antes de la impresion pregunte si el nivel solicitado era igual al nivel maximo de la cuenta si e asi borro la expresion en el Group

les dejo los comentarios quiza a alguien le pueda ayudar

saludos

[[ElKurgan]]

Muchas gracias... Las soluciones de uno siempre son de mucha ayuda para otros

Saludos