Discussion :

[gegila]

Bonjour à tous

j'utilise une constante sous cette forme sous Delphi 10 Berlin elle me permet de restreindre lors de la saisie d'une adresse mail une certaine forme

Const CarOK : Set of Char = ['a'..'z','0'..'9','.','@'];

il me donne cet avertissement

[dcc32 Avertissement] UnitFich.pas(386): W1050 WideChar réduit en byte char dans les expressions d'ensemble. Envisagez d'utiliser la fonction 'CharInSet' dans l'unité 'SysUtils'.

Je n'arrive pas utiliser la fonction CharInSet

Avez vous une idée

Par avance Merci

[Paul TOTH]

personnellement je recommande d'utiliser l'option de compilation suivante: {$WARN WIDECHAR_REDUCED OFF} elle fait disparaître le warning lié à l'usage de "C in Chars".

j'ai demandé la réhabilitation de ce code (RSP-13141) car CharInSet qui n'était déjà pas génial est à son tour déprécié pour Char.IsInArray qui n'a plus du tout la flexibilité de l'opérateur "in".

Le pire c'est que lorsque l'on regarde le code compilé, "C in Chars" produit exactement le même code que "case C of" qui n'est pas déprécié.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
begin
  if c In ['a'..'z'] ...
 
  case c of
   'a'..'z': ...
  end;
end;