Самый простой способ зашифровать (на мой взгляд) - использовать функцию XOR (компонент Math). Один операнд - данные (или их часть), второй - ключ (или его часть).
Самое приятное, что для расшифровки нуна сделать тоже самое, в той же последовательности.

По поводу проги - делали уже - ищи по форуму..