Закодировались мои исходники

[Florento]

Undeclared identifier 'decode' при наведении мышкой.

И проект так же не компилируется.

Когда пытался использовать кодровщик исходников (не помню какой) для другого проекта.
Может быть такое, что закодировал он и этот файл? И я так понимаю никак уже не раскодировать то, что находится в кавычках?..

[Florento]

Домовой найден!!!

Вот что откопал на компьютере:

function decode(s:String):string;
var i:integer;
begin
result := '+';
for i:=1 to length(s) do begin
if pos(copy(s,i,1),'ЭПЯIБPXS3xpvАО8Р5ЗDбQoВhкКcоeFдiKСэsжяmФЧфтНыVнkOuсУJaRТAмхГЮ4qпе2y7Шаfгью1шr9LTnвUЕДЫйч ZH6иИрзWglЖbлjwЬCEtBХЛцщМdЙzYGЪNЦъЩ|0уM')>0 then
result := result + copy('йцукенгшщзхъфывапролджэячсмитьбюЙЦУКЕНГШЩЗХЪФЫВАПРОЛДЖЭЯЧСМИТЬБЮabcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789 |',pos(copy(s,i,1),'ЭПЯIБPXS3xpvАО8Р5ЗDбQoВhкКcоeFдiKСэsжяmФЧфтНыVнkOuсУJaRТAмхГЮ4qпе2y7Шаfгью1шr9LTnвUЕДЫйч ZH6иИрзWglЖbлjwЬCEtBХЛцщМdЙzYGЪNЦъЩ|0уM'),1)
else result := result + copy(s,i,1);
end;
end;

[Stilet]

Wow!. Что-то типа шифратора Поллиния?
Ну ты хотя бы помнишь что его писал?

[Florento]

Нет, это какой то левый софт закодировал мне исходник, а потом написал "Вставьте эту функцию себе в приложение"))