Tony An
Подскажите, норм практика или лучше как-то по-другому?
TSex = (male, female, other);
...
descript_sex: array [male..other] of string = ('М','Ж','Другой');
Во-первых, первым элементом перечислимого типа, я бы рекомендовал делать какой нибудь unknown...
Во-вторых, ты объявил тип TSex, но в объявлении массива его не используешь: description_sex: array[Tsex] ...
В-третьих, сокращать description до descript - ни туда, ни сюда...