ANTICHAT - Показать сообщение отдельно - [Delphi]/[Pascal] Задай вопрос, получи ответ

Цитата:

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

Добавь в проект новую форму, собственно где и будет поле ввода пароля, пропиши новый unit в секции uses первого юнита.

Код кнопки на первой форме:

Код:

form1.button1click(sender: TObject);
begin
  form1.enabled := false;
  form2.show;
end;

Во втором юните напиши проверку пароля и выполни нужную функцию.

Код:

// checkpass(pass: string): boolean - функция проверки пароля
form2.button1click(sender: TObject);
begin
  if checkpass(edit1.text) then
    MyFunction
  else
    showmessage('Неверный пароль');
end;