Muchas gracias, tendre en cuenta tu sugerencia, aunque resolvi con este codigo q me ayudo Egostar
Código Delphi
[-]procedure TModuloReport.frIndicadoresBeforePrint(Sender: TfrxReportComponent);
var
Plan, Real :TfrxMemoView;
Fila :Integer;
begin
Fila := frdsIndicadores.DataSet.FieldByName('Fila').AsInteger;
Plan := frIndicadores.FindObject('frdsCertificoPlan') as TfrxMemoView;
Real := frIndicadores.FindObject('frdsCertificoReal') as TfrxMemoView;
if Fila = 10 then
begin
Plan.DisplayFormat.FormatStr:='0.0000';
Real.DisplayFormat.FormatStr:='0.0000';
end
else
begin
Plan.DisplayFormat.FormatStr:='#,##0.00';
Real.DisplayFormat.FormatStr:='#,##0.00';
end;
end;