ANTICHAT - Показать сообщение отдельно - Криптографический алгоритм

Я в паскале не силен, на C\C++ выглядеть это будет примерно так:

Код:

string BlowfishCrypt(string key, string text)  // вот так выглядит твоя функция в
 //  общем виде
...
Edit3.Text = BlowfishCrypt(Edit1.Text, Edit2.Text); //отдаем функции шифрования ключ 
 // и текст
// собственно говоря она должна вернуть зашифрованный текст прямо в твой Edit3

Этот код примерный, так что не гарантирую что будет работать as is, но думаю разобраться не долго даже с минимальным опытом программирования.
P.S. Кстати чаво сам то не реализовал?=) В Википедии вроде все ясно для 32 битного блока.