Пара вопросов.

[Kukkk]

Здравствуйте, вот уже не один день бьюсь над темой,как зашифровать пароль? Причем пароль нужно, чтобы программа шифровала и расшифровывала любой длинны и из разных знаков.

А еще как открыть файл тхт из папки с программой, не зная его имени?

[zetrix]

А еще как открыть файл тхт из папки с программой, не зная его имени?

Пользователь сам его выбирать будет?
Если да, то обычный OpenDialog
Если нет, (но файл точно есть), испольщуй FindFirst, FindNext - т.е. ищешь все файлы *.txt, а потом уже выбираешь какой-нибудь из найденных. (Если txt будет один, то проблем нет, а вот если несколько...)

[Kukkk]

Сообщение от zetrix

FindFirst, FindNext

А как их использовать,можете подробнее объяснить пожалуйста?

[Kukkk]

Кто-нибудь знает как объеденить 2 переменные типа string в одну. То-есть если есть a и b чтобы получить ab в одной переменной?

[Alex21]

Сообщение от Kukkk

Кто-нибудь знает как объеденить 2 переменные типа string в одну. То-есть если есть a и b чтобы получить ab в одной переменной?

a,b,c:string
..
a:='ааа';
b:='bbb';
c:=a+b;
Write(c);

Результат:c = aaabbb

[mrandrey]

Цитата:
Сообщение от zetrix
FindFirst, FindNext

А как их использовать,можете подробнее объяснить пожалуйста?

if FindFirst('*.*',p,r)=0 then
if (r.Attr and fadirectory)<>0then
.........
until (FindNext(r)<>0);