Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

giovano

SHowmessage/Set.focus e Maximizar

Recommended Posts

olá pessoal!

 

para passar de um campo para outro usei o seguinte:

 

if key = #13 then

dbedit_nome.Set.focus;

 

o caso é o seguinte, um certo campo dbedit está configurado para no final (ao gravar o cadastro) dar um showmessage informando 'impossível cadastrar, verifique os campos obrigatórios' caso ele não for preenchido...

o fato é que eu queria mudar isso que aprendi, quero fazer a mensagem aparecer já no momento em que dou o enter para passar para o próximo campo, pra não deixar ir até o final e ter que voltar no início do cadastro.

 

exemplo: nome (preenche e enter) se estiver vazio, não passar para o próximo campo (endereço), dar a mensagem (campo obrigatório) e ao clicar OK nesas mensagem fazer o cursor ficar ali mesmo no campo 'nome'..

 

e se não for pedir demais: como faço para maximizar toda a aplicação, pois a tela maximiza mas a aplicação fica no canto superior direito do memso tamanho. ou é melhor desabilitar o maximizar? como?

 

gente, agradeço a equipe responsável pelo fórum

espero ter sido claro e não estar usando espaço de forma errada para tal.

 

 

saúde a todos.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Bom dia....

 

Para fazer a verificação ao sair do edit ou dbedit você pode usar o evento onExit.

 

procedure TForm1.Edit1Exit(Sender: TObject);
begin
  if Trim(Edit1.Text) = '' then
  begin
    ShowMessage('Por favor, digite a informação.');
    Edit1.SetFocus;
  end;
end;

Para desabilitar o maximizar tem a propriedade BorderIcons que contém a opção de desabilitar o maximizar, minimizar.

 

Espero ter ajudado!

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.