Set of string intersection et union

PhilLu 249 Messages postés lundi 9 novembre 2009Date d'inscription 6 mai 2018 Dernière intervention - 6 mai 2018 à 11:16 - Dernière réponse : Cirec 4221 Messages postés vendredi 23 juillet 2004Date d'inscriptionModérateurStatut 11 mai 2018 Dernière intervention
- 6 mai 2018 à 13:07
Bonjour,
Je cherche à utiliser les fonctions + et * sur des set of mais le set of string n'existe pas.
Cette possibilité existe bien dans python.
a = [1,2,3,4,"B"]
b = [2, "B"]
sa = set(a)
sb = set(b)
c = sa.intersection(sb)

Y a t'il une alternative?
Merci d'avance,
Phil
Afficher la suite 

Votre réponse

1 réponse

Cirec 4221 Messages postés vendredi 23 juillet 2004Date d'inscriptionModérateurStatut 11 mai 2018 Dernière intervention - 6 mai 2018 à 13:07
0
Utile
Bonjour,

en Delphi tu peux faire ça:
type
  TA = (s1, s2, s3, s4, sB = ord('B'));
 //TA = (s1=1,s2=2,s3=3,s4=4,sB = ord('B'));

procedure TForm1.Button1Click(Sender: TObject);
var
  st1          : set of TA;
  st2          : set of TA;
begin
  st1 := [s1, s2, s4, sb];
  st2 := [s2, sb];
  if st1 * st2 = [s2, sb] then
    Caption := 'Ok';
end;


Cordialement,
Commenter la réponse de Cirec

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.