GARANTIR DESCONTO

Fórum Formulário de Login Único #265958

19/01/2005

0

Estou montando um sistema onde o Cliente necessite que ele abra sem Login. Só que por exemplo se alguem for fazer uma venda abrirá ai um formulário para entrar com a senha para habilitar o form venda.

A minha dúvida é a seguinte:

Como posso fazer com que se o formulário de login for cancelado o form venda não seja criado?

Eu crio o Form Login no evento OnCreate do Form Venda mas se eu cancelar o form login (ALT+F4, ou outro comando qualquer) ele vai abrir o Form Vendas.

Queria usar somente um form login para o programa todo. É possivel?

Desde já agradeço
Marcelo


Marcelo_mileris

Marcelo_mileris

Responder

Posts

19/01/2005

Edumarc

Vc pode fazer da seguinte forma:

no menu antes de vc abrir o form.de logon faça assim:

application.createform(tflogon,flogon);
flogon.showmodal;
if flogon.liberado = true then
begin
application.createform(tfvenda,fvenda);
fvenda.showmodal;
fvenda.free;
end;
flogon.destroy;

no evento onactivate do flogon coloque:
liberado := false;

crie a variavel global no flogon
liberado : boolean;

faça a regra de validação não se esquecendo de setar liberado := true
feche o form o sistema já abrirá a venda.

Espero ter ajudado.


Responder

Gostei + 0

19/01/2005

Dopi

Experimente usar:

Application.Terminate

dentro do OnCreate do seu Form principal, caso o Login não ocorra com sucesso...


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar