[Delphi] Запрос пароля (Простейший) - Форум Cheat-Master.ru
  • Страница 1 из 1
  • 1
Модератор форума: Alowir, Sanoxxx  
Форум » Программирование » Delphi Программирование » [Delphi] Запрос пароля (Простейший)
[Delphi] Запрос пароля (Простейший)
ChesterHelium Дата: Понедельник, 01.05.2017, 00:47 | Сообщение # 1
Боец
Сообщений: 212
Статус: Offline
Создаем 3 формы

на первой форме размещаем кнопку, на кнопку оформляем переход на вторую форму:
Код
procedure TForm1.Button1Click(Sender: TObject);
begin
form2.show;
end;


на второй форме размещаем кнопку "Войти" и 2 едита для логина и пароля соответственно
в варе прописываем переменные login и pass как string
при вводе неправильного пароля прописываем диалоговое окно

Код
procedure TForm2.Button1Click(Sender: TObject);
begin
login:='123';
pass:='123';
if (Edit1.Text=login) and (Edit2.Text=pass) then Form3.Show else MessageDlg('Вы ввели неправильный логин или пароль!',mtError, mbOKCancel, 0);
end;


пс: чтобы пароль был звездочками - в инспекторе, в PasswordChar убрать лишнее и поставить звездочку




Сидим в VK с разных профилей в одном браузере
Бесплатно отправляем смс-сообщения
Обход подписи в 255 символов на SAMP-RP
Способ накрутки личных сообщений в ВК
Халявные дедики
[DELPHI] - Выключение компьютера по Button'у
[DELPHI] - Запрос логина и пароля на форме
Делаем убийственные .BAT файлы
Скрипт для e-mail рассылки до 100к в сутки
Обход авторизации на бесплатных точках WiFi
Флэшка - убийца для быстрого сноса винды
Расширение для Google Chrome - Бесконечный набор сообщения (Бесконечный карандаш)
Заливаем фотографии / смотрим истории в instagram с компьютера
Получаем письма с Америки, Канады, Аляски и т.д. с оф. нашивками пожарных



Сообщение отредактировал ChesterHelium - Вторник, 11.07.2017, 00:39
Форум » Программирование » Delphi Программирование » [Delphi] Запрос пароля (Простейший)
  • Страница 1 из 1
  • 1
Поиск:
Статистика Форума
Лучшие пользователи
Admin [39113]

GеNius [7209]

[CM]Russel [5557]

kenlo763 [4952]

[CM]AGRESSOR [4639]

Snake_Firm [4452]

Сэс [4416]

Artem_Buero [4223]

[CM]Durman [3204]

[CM]Рафаэль [3080]

iMaddy [2855]

sky_Woker [2854]

getrekt [2745]

Новые пользователи
pokotiloroman91 [18:24]

stephensh5 [12:00]

calliesv7 [06:11]

louqm16 [22:14]

artushak [16:32]

Kingpolker [15:42]

leeyv11 [15:12]

Trappa17 [01:00]

Djamalchik [16:40]

ajeense [14:24]

654470559 [08:55]

Newtone [03:01]

godspeed [21:31]