Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Делфи _ Parol

Автор: Гость 29.10.2007 20:34

Ya xocu votchto skajem v forme bil odin edit i odin button v pole edit yesli ya pravilno napisal parol to eta forma izmenilas i etot samiy i edit i buttona uje ne bilo sovsem druqiye vesi bili skajemv forme budet tolko odna kartina kak edo delat?
Zaraniyem bolsoye spasibo za otvet

Автор: Better Kind 29.10.2007 23:23

Куча вариантов. Вот например два:
-=1=-
Запрос пароля идет на отдельной форме, на которой есть только Edit и Button.
При запросе пароля вызываем это окно модально и проверяем правильность пароля:
Повесим на обработчик нажатия кнопки такой код:

Код
procedure TForm1.Button1Click(Sender: TObject);
begin
  if Edit1.Text='pass' then
{действия при верном пароле}
  Close; // закрываем эту форму, например
  // или Hide скрываем, например
else {Пароль не верный - выход, или
        другие действия}
end;


-=2=- Другой вариант - с одной формой. Уровни доступа разделены на панели (Panel).
При запросе пароля - скрываем все рабочие панели и показываем Панель пароля.
Тот же код, только при верном пароле - скрываем панель пароля (Panel.Visible:=false;) и показываем нужную (Panel2.Visible:=true;)


Автор: klem4 30.10.2007 22:35

М
гость, специально для любителей писать транслитом есть тег [ translit ] [ / translit ]