[GMGrom]

Дамы и господа, прошу помощи в создании данной программы

[M.A.D.M.A.N.]

Я бы начал так:

Код:

TCardanGrille = array of packed record
  X, Y, Length: Integer;
end;

[Aristarh Dark]

Прикольная тема.
Даем программе какой-нить большой литературный текст (например этот) и текст который требуется зашифровать.
Программа в исходном тексте последовательно ищет по одному символу из шифруемого текста (включая пробелы, знаки препинания и т.п., можно даже и регистр букв правильный подбирать).
На выходе имеем (или не имеем, если не получилось зашифровать) масив позиций "окошек" решетки для данного текста, "окошки" получаются длинной в 1 символ. Далее соседние окошки, если их позиции рядом, можно объединить в окошки длиной 2 и более символов.
Прикольно

[GDSprogramer]

Я уже написал эту программу
Бесплатно можешь скачать ее на моем сайте програм.рф