-
Total de ítens
4 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Josimar Neves
-
-
Prezados, boa tarde !
Estou desenvolvendo uma tela de login e senha e, como sou iniciante, empaquei em uma situação meia cômica.
Quando eu insiro a senha incorreta, o sistema mostra a mensagem de senha de acesso inválida porém ainda assim abre o sistema.
Não sei como fazer para travar e não deixar que o sistema abra. Segue abaixo o código para verem onde errei. desde já, agradeço !!
procedure TFormLogin.btnentrarClick(Sender: TObject);
begin
if edtsenha.Text = DMDados.QueLoginusuario_senha.Value then
ShowMessage('Olá ' +DMDados.QueLoginusuario_nome.Value+ ' Bem Vindo ao sistema')
else
ShowMessage('Senha de acesso inválida !');end;
procedure TFormLogin.btnsairClick(Sender: TObject);
begin
Close;end;
procedure TFormLogin.edtusuarioExit(Sender: TObject);
begin
if not (DMDados.QueLogin.Locate('usuario_nome',edtusuario.Text,[loPartialKey,loCaseInsensitive])) then
begin
ShowMessage('Usuário não encontrado !');
edtusuario.clear;
edtusuario.SetFocus;
end;end;
procedure TFormLogin.FormShow(Sender: TObject);
begin
edtusuario.SetFocus;
end;end.
-
31 minutos atrás, Felipe E. Resende Mesquita disse:
Bom dia, Josimar Neves.
Você pode procurar nessa parte do fórum:
https://www.projetoacbr.com.br/forum/companies/category/2-consultores/
Tópico movido para local mais indicado.
Obrigado Felipe !
- 2
-
Prezados,
Estou desenvolvendo um PDV Emissor de NFCe. Como sou novo na área, estou a procura de cursos presenciais ou algum programador experiente que possa me dar aulas por conexão remota ou presencial (com valores acessíveis, é claro rs) para dar dicas e que algumas duvidas e bugs sejam retirados, tais como:
- Inserir produto na grid de venda ao bipar com leitor de código de barras;
- Criar botão para cancelar NFCe emitida;
- Imprimir nota na impressora térmica após a emissão;
- Etc...
Desde já, agradeço !
Tela de Login e senha
em Dúvidas não relacionadas ao ACBr
Postado
MFincotto, desde já agradeço pela ajuda e esclarecimento em relação ao tópico.
Pois bem, Após inserir o orientação que me deu, quando vou fazer login, aparece a mensagem " raised exception class Exception with message 'Senha de acesso inválida!'."
Pode ajudar ?
Desde já, agradeço !