Пароль для входа в программу

[Дашкевна]

заменила и отчистила
только вот теперь он вот что выдает

[Error] Project1.dpr(15): Undeclared identifier: 'ok'
[Error] Project1.dpr(15): Operator not applicable to this operand type

[vovk]

ой ой ой извеняюсь, хотел под твоё переделать и недопеределал в общем я там сейчас поправлю можеш опять скопировать, или просто вместо этого

  while ok and (Password.Text<>'123') do

напиши так

while (ModalResult=1)  and (Password.Text<>'123') do

[Дашкевна]

а-а-а-а-а-а работает

vovk
огромное спасибо!!!!!!!
вот теперь я знаю как это делать!!!!!!

я вот тут думала и назрел такой вопрос,например человек не знающий delphi хочет изменить пароль,возможно ли создать на основной форме что-то,что сможет выполнить такую функцию?

[vovk]

тогда надо предусмотреть место где храить пароль, а не хранить его в программе, к примеру можно хранить в реестре.

[Дашкевна]

не подскажешь как это сделать?если конечно я тебя не одолела со своими заморочками
просто жуткий интерес появился

[vovk]

тут про работу с реестром оч много есть, поиском по форуму можно найти, потом попробовать найденное осмыслить и применить. А вот если в процессе будт вопросы то пожалуйста... но это уже другая тема

[Serg-Grin]

Вот самое простое решение создать пароль. Кидаешь на форму Edit, Button, Label. Дальше прописываешь в button:

procedure TForm1.Button1Click(Sender: TObject);
var
s: string;
begin
s:=('Ваш пароль');
if edit1.Text<>s then
label1.Caption:='Пароль неверный';
if edit1.Text=s then
label1.Caption:='Пароль верный';
end;
end.

Например, если верный вместо label1.caption, прописываете Form2.Show; - или что Вам задумаеться !

[GFox]

Получается, что пароль можно изменить, только при компиляции, как сделать чтоб можно было изменить пароль в самой программе?

[artemavd]

GFox, читайте пост №26 от товарища vovk

[Serge_Bliznykov]

тогда надо предусмотреть место где храить пароль, а не хранить его в программе, к примеру можно хранить в реестре.

Немножко уточню.
Ни в коем случае нельзя хранить сам пароль. Обычно хранится hash (он же хэш, он же - контрольная сумма).
Например, MD5.
для введённого программу пароля вычисляется контрольная сумма, если она совпала с той, что хранится (в реестре/ini файле или где угодно), то пароль ввели правильный, иначе - неверный пароль!

При этом надо учесть, что там, где будет хранится пароль - это будет доступно всем и каждому. Поэтому:
1) имя параметра должно быть нейтральное. Например, InitValue
2) неплохо было бы хранимый пароль (хэш) чем нибудь простенько зашифровать.. хоть тем же XOR ....

но это уже другая тема

согласен. лучше бы это вынести в другую тему. Согласно правилам форума - один вопрос - одна тема на форуме!