Ver Mensaje Individual
  #2  
Antiguo 19-11-2015
Avatar de AgustinOrtu
[AgustinOrtu] AgustinOrtu is offline
Miembro Premium
NULL
 
Registrado: ago 2013
Ubicación: Argentina
Posts: 1.858
Reputación: 15
AgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en bruto
Un prototipo en Delphi, ya lo pasaras/afinaras para c++

Código Delphi [-]
function ObtenerFilas(x,y z: Integer; ADataSet: TDataSet): TList< Integer >;
var
  ValA, ValB: Integer;
begin
  Result := TList< Integer >.Create; // nro de filas que cumplen la condicion1
  ADataSet.DisableControls;
  try
    ADataSet.First;
    while not ADataSet.Eof do
    begin
      ValA := ADataSet.FieldByName('A').AsInteger;
      ValB := ADataSet.FieldByName('B').AsInteger;
      if CumpleCondicion1(x, y, z, ValA, ValB) then
        Result.Add(ADataSet.RecNo);
      
      ADataSet.Next;
    end;
  finally
    ADataSet.EnableControls;
  end;
end;

Con eso obtendrias la lista de filas que cumplen con la condicion1. Despues deberias procesar esa lista y ver si hay 10 consecutivas. Con esa misma lista podrias pintar el DBGrid tranquilamente

Última edición por AgustinOrtu fecha: 19-11-2015 a las 04:24:32.
Responder Con Cita