Discussion :

[chico]

bonjour la compagnie,

comment faire pour ajouter un caractère dans un ensemble de caractère
(attention en dynamique, pas du style ens1 := ens1 + ['e'])

voici mon code :

procedure TfrmParams.Button2Click(Sender: TObject);
var
ens : TSysCharSet; // set of char !!!
i : integer;
s : string;
c : char;
begin
toto := [];
for i := 1 to Length(Edit3.Text) do
begin
s := WideCharToString( @Edit3.text[i] );
c := s[1];
ens := ens + c; // la ca marche pas
end;

ckk1.Checked :=
FindCmdLineSwitch(edt1.text, ens,ckk2.Checked);
end;

merci d'avance

chico el guacamole

[RDM]

Include(Ens, C);

[chico]

Merci beaucoup pour cette réponse,javascript:emoticon(%27%3AD%27)

après cette question, une autre me vient à l'esprit, quel est pour vous l'ouvrage le plus pertinent pour maitriser les rouages de DELPHI/KYLIX ?

chico

[RDM]

franchement: les sources de la VCL/CLX