Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Remover del conjunto TSysCharSet un caracter (https://www.clubdelphi.com/foros/showthread.php?t=50119)

pmarin 08-11-2007 18:30:43

Remover del conjunto TSysCharSet un caracter
 
Hola a todos,

tengo un conjunto de caracteres, el cual recibo de una
funcion. Con lo cual no se exactamente los caracteres dentro
del conjunto.

separators : TSysCharSet;

separators := ['.',':','/',AnsiComma];

pero en un momento dado quiero quitar ( o al menos asegurarme )
que en el conjunto no esta un determinado caracter.

¿Se le ocurre a alguien como hacerlo? Agradeceria mucho la ayuda.

Saludos

Pablo

pmarin 08-11-2007 18:47:04

Ya encontre la respuesta:

separators : TSysCharSet;
C : Char; // Caracter a quitar del conjunto

separators := ['.',':','/',AnsiComma];

separators := separators - [AnsiChar(C)];


Saludos

Pablo

Lepe 08-11-2007 18:47:18

TSysCharset no sé exactamente lo que es, cuando es un set of char, puede hacerse así:
Código Delphi [-]
 separators := separators - ['.'];

Saludos

pmarin 08-11-2007 18:53:00

Gracias Lepe,

TSysCharSet es bastante util cuando tienes que pasar un conjunto
de caracteres entre funciones. En concreto, yo la uso con la funcion
ExtractStrings la cual divide la cadena de entrada en trozos delimitados
por los caracteres pasados por el TSysCharSet.

gracias por tu ayuda otra vez

Pablo


La franja horaria es GMT +2. Ahora son las 09:53:34.

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