Edit

[voron.kz]

привет!у меня вопрос....как уствновить на пароль Edit?.....нужно что б при нажатии на speedbutton пароль принимался и происходил переход на другую форму....а если пароль не верен то перехода не было.....заранее спасибо!!!

[SERG1980]

if edit1.text=password then form2.show

[voron.kz]

[Error] Unit2.pas(46): Undeclared identifier: 'password' в чем ошибка?хорошо не буду....спасибо!

[SERG1980]

Сообщение от voron.kz

[Error] Unit2.pas(46): Undeclared identifier: 'password' в чем ошибка?хорошо не буду....спасибо!

Блин блинский ну это же в качестве примера...ну да ладно

var password:string;
.....
password:='12348569';

надеюсь сейчас понятно
ЗЫ password это ваш эталонный пароль с которым вы будете сравнивать текст в эдите. Кстати он не обязательно должен быть 12348569

[voron.kz]

извините,но не работает....переходит на другую форму....когда вводишь и не вводишь пароль.....на кнопку или edit ставить надо?

[raxp]

чи у вас личка отключена...

procedure tform.editkeypress...;
begin
 if (edit.text= 'password') and (key=#13) then
  form2.show;
end;

[voron.kz]

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

чи у вас личка отключена...

procedure tform.editkeypress...;
begin
 if (edit.text= 'password') and (key=#13) then
  form2.show;
end;

все равно переходит на другую форму....не работает....этот код вставлять в MaskEdit1?а в кнопку надо что нибудь писать?

[raxp]

эм... ну-ка приложите свой проект, взглянем на кишочки...

upd
-------

можите постучать в ky_voron@mail.ru или 558807584

если не секрет, какой гриф секретности? тут как-бы... удобнее

[voron.kz]

можите постучать в ky_voron@mail.ru или 558807584

[voron.kz]

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

эм... ну-ка приложите свой проект, взглянем на кишочки...

upd
-------
если не секрет, какой гриф секретности? тут как-бы... удобнее

программку сюда не выложу....секретно...