Formulários em Delphi
Boa noite
Estou com a seguinte dúvida:
Criei um programa básico em Delphi, porém gostaria de implementar uma tela de login mas não estou conseguindo fazer
com que a tela de login apareça antes do "formulário principal". Como posso fazer? Já tentei mudar a ordem em :
" project > options > forms " , porém se coloco o formulário de login por primeiro da erro de conexão com o banco de dados
e não habilita outras janelas dentro do formulário principal. Alguém poderia me ajudar a resolver esse problema?
Estou com a seguinte dúvida:
Criei um programa básico em Delphi, porém gostaria de implementar uma tela de login mas não estou conseguindo fazer
com que a tela de login apareça antes do "formulário principal". Como posso fazer? Já tentei mudar a ordem em :
" project > options > forms " , porém se coloco o formulário de login por primeiro da erro de conexão com o banco de dados
e não habilita outras janelas dentro do formulário principal. Alguém poderia me ajudar a resolver esse problema?
Carlos Henrique
Curtidas 0
Respostas
Rafael Bosco
04/09/2019
Em Project Manager, vai ter o nome da sua aplicação, exemplo: Programa.exe, aperta CTRL + V, em cima dele, você vai entrar dentro do arquivo .DPR, faça o seguinte:
var TelaLogin: TFrmLogin; Confirmed: Boolean; begin TelaLogin := TFrmLogin.Create(nil); try TelaLogin.ShowModal; Confirmed := TelaLogin.Confirmed; // é uma variavel inserida manualmente do form login do tipo Boolean TelaLogin.Free; end; if Confirmed then // se o login foi feito com sucesso, aí sim você inicia a sua aplicação begin Application.Initialize; Application.MainFormOnTaskbar := True; Application.CreateForm(TForm1, Form1); Application.Run; end;
GOSTEI 0