Последние записи
- О сколько нам открытий чудных.. или о делении на 0 в Delphi без ошибки и в Lazaus с ошибкой
- Сессия сбивается на null при переходе на другую страницу
- Посчитать количество русских букв в Memo (Delphi XE2)
- Подсчет количества повторов построчно в Microsoft Office Access, как в Excel (Счётесли)
- Подсчет и поверка контрольной суммы CRC16
- Как сделать так, чтобы от систем авто получать данные на смартфон?
- Генерация и синтез звуковых волн
- Язык Си. Вернуть указатель на выделенную память malloc() на массив указателей типа char через аргументы функции
- Удалить все комментарии JS в текстовом файле
- Массовое переименование label на форме
30th
Июл
Поиск и замена заданной строки в тексте
Posted by Chas under Delphi
В программе есть возможность создавать пользователя, при этом стандартный пароль ему дается «1234», надо сделать так чтобы при первом его заходе в систему ему вылезало окошко с просьбой изменить пароль, не знаю как найти и заменить пароль в текстовом файле.
Stilet
Допустим так:
Код:
with TStringList.Create do begin
LoadFromFile('пароли');
if Values[Log3]='' then begin
Values[Log3]:=InputBox('Хей, юзер','Введи пароль','');
SaveToFile('пароли');
end else
пароль правильный. Есть такой юзер.
free;
end;Похожие статьи
пеллетные котлы
Пеллетный котел Emtas
Наши форумы по программированию:
- Форум Web программирование (веб)
- Delphi форумы
- Форумы C (Си)
- Форум .NET Frameworks (точка нет фреймворки)
- Форум Java (джава)
- Форум низкоуровневое программирование
- Форум VBA (вба)
- Форум OpenGL
- Форум DirectX
- Форум CAD проектирование
- Форум по операционным системам
- Форум Software (Софт)
- Форум Hardware (Компьютерное железо)