запись в файл:
Код:
var myFile:textfile;
AssignFile(myFile, 'Test.txt');
ReWrite(myFile);
WriteLn(myFile, login+':'+pass); //login и pass это логин и пароль
CloseFile(myFile);
чтение из файла:
Код:
AssignFile(myFile, 'Test.txt');
Reset(myFile);
while not Eof(myFile) do
begin
ReadLn(myFile, text);
if text=login1+':'+pass1 then GOOD //login1 и pass1 логин который ввел пользователь
else BAD!!
end;
CloseFile(myFile);
Но лично я бы это не использовал
не надежно это как то. Еще очень советую записывать в файл именно хеши а не просто логин и пароль, например можешь юзать md5 в интернете много примером реализации этой функции(сам не вывешиваю,так как он довольно объемный)