[TitiS]

Стыдно с таким вопросом писать в форум, но нужна помощь в написании функции:
допустим есть файл 1.db. В нём пароли представлены следующим видом:

gkpNew[ЗАШИФРОВАННЫЙ
(пусть будет символ #13... ПАРОЛЬ] gkpEnd
gkpNew[ЗАШИФРОВАННЫЙ ПАРОЛЬ]gkpEnd

и так до бес конечности. Бошка уже не варит и поэтому , надо написать функцию, которая бы выдовала мне такой вид:
[РАСШИФРОВАННЫЙ ПАРОЛЬ]
[РАСШИФРОВАННЫЙ ПАРОЛЬ]
...
Расшифровка по типу: function DecryptString(InString: string): string;

Поможете, правда? =)

[Redstason]

Ты можешь поподробнее описать задачу?
Пароли это одном столбце один из столбцов БД? и как они зашифрованы?

[TitiS]

Не, с базами данных это не имеет ни чего, написал db лишь для примера. Способ шифровки не имеет значения, это уже реализованно, мне осталось только написать вот эту функцию. Например в цикле ищет gkpNew и всё что до gkpEnd - зашифрованный код, который будет расшифровывать с помощью функции DecryptString(instring: string): string; и результат писать в другое место (скажем memo.lines.add()). эти действия надо будет повторять до конца файла... Эх, сам бы написал да позабыл много... Хотя на javascript мог бы и написать

[X-rem]

Чувак там надо не много по другому реализовать

--------
ЗАШИФР ПАСС
ЗАШИФР ПАСС
ЗАШИФР ПАСС
--------

Каждый на новой строке. Тогда могу помочь.

[TitiS]

X-rem, это я и сам могу, но мне надо именно так как я написал в первом посте. Дело в том, что пароли в зашифрованном виде могут быть с символом переноса строки, а мне надо, чтобы результат был нормальный.

[X-rem]

Ну я тебе щяс помочь не смогу. Посмотри исходник на http://www.delphisources.ru/ Там исходшик Дешифратор или Шифратор называется.
Ну короче посмотри.