|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Форма авторизации пользователя
Уважаемые специалисты.
Помогите новичку, курсовая горит. Имеется MySQL сервер на которой крутится моя база, установлен и настроен драйвер ODBC. Имеется форма авторизации пользователя с edtUsername: TEdit; edtPasswd: TEdit; edtHostname: TEdit; Помогите с кодом соединения с сервером, и при введении правильных данных и нажатии кнопки "Войти" появлялась рабочая форма. Прежде чем что то сделать проверь: сделал ли бэкап. |
#2
|
|||
|
|||
Влепи создание формы (причем не как обычно в проекте, а как обычно в других местах: AuthForm := TAuthForm.Create(nil)) в коде самого проекта перед созданием основной формы. А дальше все как обычно:
Код:
if ShowModal <> mrOk then begin AuthForm.Free; Exit; end; |