[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/ Там исходшик Дешифратор или Шифратор называется.
Ну короче посмотри.

[TitiS]

Да причем тут шифровка?! Народ да вы ще?

[Decoding]

to TitiS

В чем проблема? Нормально функция работает, даже если в ней есть символ переноса строки - Decode_new.zip

Ну и с Memo ничего сложного, просто функции немного модифицировать пришлось - Decode_memo.zip

[TitiS]

Decoding, не получается...

[TitiS]

Извеняюсь, поставил всем Мемо свойства скроллбаров и переноса строк - получилось:

(http://denasoft.xost.ru/good.jpg)

Сейчас попробую это впихнуть в свою программу. Если получится сообщу. Хотя в принципе если и не получится сообщу =)

[TitiS]

Пишу с плохой вестью, Decoding.
Программу доделал, использовав твой метод шифровки с Memo. Всё, уже написана справка, хотел инсталлятор на сайте размещать, но не тут то было... Решил воспользоваться программой сам (кстати, кому не лень могут прочитать хотя бы вступление о программе: http://denasoft.xost.ru/keybook.htm) и каково было моё огорчение, когда я увидел, что половина паролей была сохранена не верно...

Короче, наверно придётся забить на программе. Потому что моя идея не может быть реализована полностью, походу...

[Decoding]

если хочешь, скинь исходник проги на мыло (decoding@narod.ru), гляну…

[TitiS]

Как только сяду на комп, обязательно скину. Буду только благодарен за помощь