Bu uyarı delphi 7 gibi eski sürümlerde geliştirdiğiniz uygulamaları delphinin yeni sürümlerine taşıdığınızda çıkar genel olarak kodunuzu şu şekilde değiştirmelisiniz //  if Key in [‘k’..’k’] + [‘K’..’K’] then btn_kasa.Click; // eski kod if CharInSet(Key, [‘k’..’k’, ‘K’..’K’]) then btn_kasa.Click; // yeni kod sebebi http://stackoverflow.com/questions/19419239/charinset-compiler-warning-in-delphi-xe4 linkte güzel bir şekilde açıklanmış.

uses crt; var i:integer; s:string; begin for i := 0 to 255 do begin s:=''; case (i) of 32..47, 58..64, 91..96, 123..255 : s:='Ozel : '; 48..57 : s:='Sayi : '; 65..90,97..122: s:='Harf : '; end; if s<>'' then writeln(s,' ',i,' ',chr(i)); end; readln; end.   Delphi procedure TForm1.FormCreate(Sender: TObject); …