Delphi. UniGUI. Делаем систему регистрации / авторизации на сайте

Сделаем систему регистрации / авторизации на сайте. При успешной авторизации, система должна запоминать нас на 72 часа – сделаем это через куки. Вот что у нас получится в итоге.


Сначала регистрируемся

Нажали на “Вход”

Авторизовались, и вот что мы видим

Шаг 1 – подготовка панелей

У меня это выглядит так. В Main я создал панельку, которую при запуске выравниваю по верхнему краю. Вход и регистрация у меня находятся на одной панели, а “Выйти” и почта пользователя на разных панелях.

ШАГ 2 Создание форм регистрации, входа, профиля пользователя

Подробно распишу  форму входа. По остальным по аналогии. Суть одна. Итак. Вот как форма входа выглядит в дизайнере. BorderStyle я выставил в None. Добавил UniImage для отрисовки креста закрытия.

Также в ExtEvents формы добавил такую обработку для границ формы

Вот кодом

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

Код формы

 

Как сделать капчу на форме?

Ссылка

Форма регистрации

Форма профиля

ШАГ 3 – обработчики в Main

В принципе, лучше было бы убрать верхнюю панельку в отдельный модуль, но это в след. версии, а сейчас пока так.

Обработчик на ссылку “Вход”

Ссылка “Выход”

Ссылка “Регистрация”

Ссылка “Профиль”

ШАГ 4 – Запоминание пользователя

При успешной авторизации записываем куки в браузер, в данном случае на 72 часа

Полный код

Узнавание при загрузке

Полный код

Забывание пользователя

Все основные моменты описал. Ниже привожу код модуля Main. По вопросам – пишите на почту.

 

This entry was posted in Delphi. Bookmark the permalink.

Leave a Reply