Dicas - Data em InputBox

Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Para efetuar o download você precisa estar logado. Clique aqui para efetuar o login
Confirmar voto
0
 (0)  (0)

Veja nesta dica, como utilizar o ImputBox para controlar datas em suas aplicações Delphi.

 

 Data em InputBox  
    
  Em um programa com contas a pagar e contas a receber, você precisa pegar a data do próximo vencimento, caso o pagamento fosse parcial, então ai vai uma idéia use o imputBox......

procedure Verifica_Data;
var vdata : string;
begin
    vdata := EmptyStr;
    while vdata = EmptyStr do
begin
      try
        vdata := InputBox(Informe a Data,Data,DateToStr(Date));
        StrToDate(vdata);
      Except
        vdata := EmptyStr;
      end;
end;
    Edit1.Text := vdata;
end;
 

 
Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Receba nossas novidades
Ficou com alguma dúvida?