Ir para conteúdo
Fórum Script Brasil
  • 0

Formatar Edits


Arckyz

Pergunta

1 resposta a esta questão

Posts Recomendados

  • 0

Ao atribuir um valor para seu Edit utilize a função FormatFloat('0.00', valor):

Ex.: Edit1.Text := FormatFloat('0.00', 125.50);

Para garantir que ao sair do campo, após o usuário digitar algo (numérico) você pode escrever no evento OnExit do seu edit algo mais ou menos assim:

begin
 // esta parte é para o caso de você querer que quando o texto ficar 
 // em branco, seja assumido o valor zero. Do contrário, você não
 // deve executar o try except se Text = ''
  if Edit1.Text = '' then  
    Edit1.Text := '0';
  try
    Edit1.Text := FormatFloat('0.00', StrToFloat(Edit1.Text));
  except
    Edt1.SetFocus;
    ShowMessage('Deve ser informado um valor');
  end;
end;

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,9k
×
×
  • Criar Novo...