type
TSonderzeichen = array[0..2] of array of WideChar;
const
anzahlSprachen = 3;
tuerkischesAlphabet: array[0..9] of WideChar = (#226, #199, #231, #286,
#287, #304, #305, #238, #350, #351);
kyrillischesAlphabet: array[0..63] of WideChar =(#1040, #1041, #1042,
#1043, #1044, #1045, #1046, #1047, #1048, #1049, #1050, #1051, #1052,
#1053, #1054, #1055, #1056, #1057, #1058, #1059, #1060, #1061, #1062,
#1063, #1064, #1065, #1066, #1067, #1068, #1069, #1070, #1071, #1072,
#1073, #1074, #1075, #1076, #1077, #1078, #1079, #1080, #1081, #1082,
#1083, #1084, #1085, #1086, #1087, #1088, #1089, #1090, #1091, #1092,
#1063, #1094, #1095, #1096, #1097, #1098, #1099, #1100, #1101, #1102,
#1103);
albanischesAlphabet: array[0..anzahlSprachen] of WideChar =(#199, #231, #203, #235);
sonderzeichenArray: TSonderzeichen = (tuerkischesAlphabet,
kyrillischesAlphabet, albanischesAlphabet);