Que bien
, me gustan, otra opción para evitar dicha asignación es el típico:
Código Delphi
[-]TabControl1.EnumObjects(
function (vObjeto: TFMXObject): TEnumProcResult
begin
if (vObjeto is TLabel) then
begin
ShowMessage('Encontré el Label, ¡victoria!');
Result := TEnumProcResult.Stop;
end
else
Result := TEnumProcResult.Continue;
end
);
Pero ya que estamos en día programadoril (jejeje vaya día), se me ocurre que podríamos crear un IfThen genérico para estos casos.