Recorrer objetos dentro de un TFMXObject

[[AgustinOrtu]]

Al, por cierto

... del tipo TEnumProcResult, pero en cuanto tenga que usarlo no dudaré en crearle su extensión, es decir, su ayudante, escribiendo un método como ghStopWhen o algún nombre similar (se aceptan sugerencias de otros posibles identificadores).

En el framework Spring4D, la interfaz genérica IEnumerable< T > que es implementada por todas las colecciones, tal y como se puede ver en la Wiki o en el código, expone dos metodos llamados TakeWhile, declarados asi:

Código Delphi [-]
    ///  < summary >
    ///    Returns elements from a sequence as long as a specified condition is
    ///    true.
    ///  < /summary >
    function TakeWhile(const predicate: TPredicate< T >): IEnumerable< T >; overload;

    ///  < summary >
    ///    Returns elements from a sequence as long as a specified condition is
    ///    true. The element's index is used in the logic of the predicate
    ///    function.
    ///  < /summary >
    function TakeWhile(const predicate: TFunc< T, Integer, Boolean >): IEnumerable< T >; overload;

Quiza sea mas idiomático ya que TakeWhile, el While le podria recordar a cualquier desarrollador a la estructura de control y de ese modo dar una pista bastante certera de cual es su funcionalidad, sin necesidad de leer documentacion o implementacion

Luego hay otro curioso metodo que puede resultar util (ya que estamos), y es el SkipWhile, que basicamente es lo contrario del anterior

Código Delphi [-]
    ///  < summary >
    ///    Bypasses elements in a sequence as long as a specified condition is
    ///    true and then returns the remaining elements.
    ///  < /summary >
    function SkipWhile(const predicate: TPredicate< T >): IEnumerable< T >; overload;

    ///  < summary >
    ///    Bypasses elements in a sequence as long as a specified condition is
    ///    true and then returns the remaining elements. The element's index is
    ///    used in the logic of the predicate function.
    ///  < /summary >
    function SkipWhile(const predicate: TFunc< T, Integer, Boolean >): IEnumerable< T >; overload;

Un saludo

EDITO:

Por cierto Casimiro, no será posible hacer algo con la sintaxis para los genéricos? Cuando se usan las etiquetas de código:

TList<Integer>

Se convierte en:

Código Delphi [-]
  TList

[jhonny]

Agustín, de pura curiosidad, ¿La función llamada ElementAt implementada en dicha interfaz es con el fin de filtrar la colección o sería más bien con el propio TakeWhile?

[jhonny]

Ahhh caramba, ya me respondí, lo que busco estaría implementado en la función Where, que interesante framework, tendré que estudiarlo está muy interesante. Aunque cosas como esta del Where ya deberían venir por defecto en Delphi, pienso.

[[AgustinOrtu]]

Hola jhonny

El metodo ElementAt es para acceder al elemento mediante un indice

/// <summary>
/// Returns the element at a specified index in a sequence.
/// </summary>
/// <param name="index">
/// The zero-based index of the element to retrieve.
/// </param>
/// <returns>
/// The element at the specified position in the source sequence.
/// </returns>
function ElementAt(index: Integer): T;

Podria decirse que es el equivalente a la propiedad indizada Items de las coleciones de la RTL

Código Delphi [-]
uses
  Generics.Collections;

var
  list: TList< Integer >;
begin
  list := TList< Integer >.Create;
  try
    list.AddRange([1, 2, 3]);
    ShowMessage(list.Items[1].ToString); // imrpime 2
  finally
   list.Free;
  end; 
end;

Usando Spring:

Código Delphi [-]
uses
  Spring.Collections;

var
  list: IList< Integer >;
begin
  list := TCollections.CreateList< Integer >;
  list.AddRange([1, 2, 3]);
  ShowMessage(list.Items[1].ToString); // imrpime 2
  ShowMessage(list.ElementAt(1).ToString); // imrpime 2

[[AgustinOrtu]]

Te recomiendo que veas este seminario online, que es bastante basico pero como introduccion a las colecciones de Spring es mas que suficiente: Enumerators, IEnumerable™ and the Spring Framework

Al comienzo habla sobre los Enumeradores nativos de Delphi, pero a partir de 14:35 se habla de Spring4d

Saludos

[jhonny]

Empezado por AgustinOrtu

Te recomiendo que veas este seminario online, que es bastante basico pero como introduccion a las colecciones de Spring es mas que suficiente: Enumerators, IEnumerable™ and the Spring Framework

Al comienzo habla sobre los Enumeradores nativos de Delphi, pero a partir de 14:35 se habla de Spring4d

Saludos

¡Genial!, gracias por tu recomendación Agustín.

[[AgustinOrtu]]

Una de las cosas mas interesantes es que los enumeradores de Spring tienen ejecucion retardada

Basicamente todos los metodos que retornen IEnumerables (sean subconjuntos de la coleccion inicial, como en el caso del citado Where, o conjutos agregados como por ejemplo el caso del metodo Concat), hasta que no los iteremos por ejemplo en un bucle for-in, nada realmente pasa

Esto es muy poderoso para casos en los que encadenamos operaciones por ejemplo: .Where.Concat.Where.ForEach


Fuente con una explicacion mas detallada y precisa de Stefan Glienke

[jhonny]

Empezado por AgustinOrtu

Una de las cosas mas interesantes es que los enumeradores de Spring tienen ejecucion retardada

Basicamente todos los metodos que retornen IEnumerables (sean subconjuntos de la coleccion inicial, como en el caso del citado Where, o conjutos agregados como por ejemplo el caso del metodo Concat), hasta que no los iteremos por ejemplo en un bucle for-in, nada realmente pasa

Esto es muy poderoso para casos en los que encadenamos operaciones por ejemplo: .Where.Concat.Where.ForEach


Fuente con una explicacion mas detallada y precisa de Stefan Glienke

Pues de verdad que es muy... pero muy interesante dicho tema de ejecución retardada. Segun veo Delphi debería tener dicho framework (Spring4D) o sus caracateristicas ya incluidas.