Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Consulta sobre SET's (https://www.clubdelphi.com/foros/showthread.php?t=38888)

dieleo 03-01-2007 16:43:05

Consulta sobre SET's
 
Hola a todos.

Tengo una consulta, si alguien sabe contestarla por favor me ayude.

Sin saber el tamaño de un SET, ni los elementos del mismo,
teniendo solo, por ej. sc : set of char;

. Como hago para recorrer el conjunto.
. Como hago para obtener la cantidad de elementos que tiene.
. Como hago para obtener los elementos que tiene.

Si alguien puede ayudar lo agredeceria.

Gracias.

seoane 03-01-2007 17:12:30

A menos que alguien conozca otra manera, me temo que no queda mas remedio que recorrer los valores posibles y comprobar si se encuentran dentro del conjunto. Algo así:

Código Delphi [-]
var
  i: integer;
  C: Char;
  Conjunto: set of Char;
begin
  Conjunto:= ['a','b','c','d','e','f','g','t','u','v','w','x','y','z'];
  i:= 0;
  for C:= #0 to #255 do
    if C in Conjunto then
    begin
      ShowMessage(C);
      inc(i);
    end;
  ShowMessage(Format('Hay %d elementos',[i]));
end;

dieleo 03-01-2007 17:26:46

Era de la forma que estaba pensando, o sea que depende del tipo de dato que sea el set.
Me imaginaba que existia alguna funcion de delphi para realizar esto, sin tener que recorrerlo dependiendo del tipo de dato.

Gracias.

Si alguien tiene otra solución lo agradeceria.

DarKraZY 03-01-2007 19:43:05

y... ¿por qué no utilizar un array dinámico? De esa forma podrías obtener toda la información.

dieleo 03-01-2007 20:29:58

La pregunta que hice, fue una pregunta por conocimiento, no quiere decir que lo valla aplicar.


Gracias igual.


La franja horaria es GMT +2. Ahora son las 14:34:19.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi