Ver Mensaje Individual
  #2  
Antiguo 03-01-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
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;
Responder Con Cita