Como faço este programa em delphi?

Question

São tres blocos separados.
1 - O botão btdDtPagto deve adicionar à data armazenada em dtpData2, o número (de dias) digitado em edDias, calculando assim uma data futura, que será exibida em lblDtPgto.
2 - O botão btnVenc deve interpretar a data armazenada em dtpData3 como uma data de compra
e calcular as datas de vencimento das prestações, que vencem no mesmo dia, mas em meses
diferentes.
3 - O timer deve exibir a hora atual em lblHora e o tempo de uso do programa em lblTempo.

Answer 1

Sua pergunta está mal formulada, faltou dizer a quantidade de parcelas para o item 2.

Para o item 1:

no evento OnClick do botão, coloque o sequinte código

var i: integer;
begin
try
i:=strtoint(edDias.text);
dtpData2:=dtpData2+i;
except
messagebox('Valor inválido!');
end;
end;


Para o item 3, faça o seguinte

1)crie uma variável global para guardar o instante de início do programa
Por exemplo : var Inicio: Tdatetime;
2) no OnCreate do form coloque o código: Inicio:=now;
3) No envento do timer, faça o seguinte:
lblHora.caption:=formatdatetime('hh:nn:ss',now);
lblTempo.caption:=formatdatetime('hh:nn:ss',now-inicio);

Answer 2

Opa opa, mande pra mim que faço pra vc, mais tera um custo