ActiveDelphi

The_Blade · Enviada: Sex Nov 11, 2005 11:17 am Assunto: calculo de datas

Ola, pessoal
Como faço para calcular do dbedit com datas.
ex.
11/11/05 mais dois dias para mostrar em o dbedit 13/11/05.
Desde já agradeço.

[Editado em 11/11/2005 por The_Blade]

adriano_servitec · Enviada: Sex Nov 11, 2005 12:24 pm Assunto: calculo de datas

Ola fiz um exemplo aqui usando dois datatimepicker e um edit

o nome do datatime eh dt1 e dt2

O codigo esta no events onchange do edit

procedure TForm1.Edit32Change(Sender: TObject);
var i:integer;
begin
dt2.OnChange:=nil;
try
i:=StrToInt(edit1.Text);
except
exit;
end;
dt2.Date:=dt1.Date+i;
end;

Vc pode jogar o resultado no seu dbedit

Bom existe outras maneiras postei somente uma que eu uso

Flw
T+
_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree

an.der.son · Enviada: Sex Nov 11, 2005 12:28 pm Assunto: calculo de datas

Eu ia responder primeiro, mas deu [b]PostNuke error[/b] =(

[code]
DBEdit.Text := DateToStr ( StrToDate(DBEdit.Text) + 2 );
[/code]

Abraços
_________________
Estou de volta!!!

adriano_servitec · Enviada: Sex Nov 11, 2005 12:42 pm Assunto: calculo de datas

So por curiosidade Anderson da pra fazer assim?

DBEdit.Text := DateToStr ( StrToDate(DBEdit.Text) \' + quotedstr(Edit1.Text + \' ));

Digo usando um edit no lugar do +2

Nao testei aqui pq nao estou em nenhum banco de dados com data, so foi curiosidade mesmo amigo.

T+

_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree

an.der.son · Enviada: Sex Nov 11, 2005 12:49 pm Assunto: calculo de datas

Pow... acho q naum... vc quer isto eh pra SQL, Certo?

Dai c teria que fazer assim:

[code]
QUERY.SQL.ADD( QuotedStr( FormatDateTime( \'mm/dd/yyyy\', StrToDate(DBEdit.Text) + StrToInt( Edit1.Text ) ) );
[/code]

Abraços
_________________
Estou de volta!!!

adriano_servitec · Enviada: Sex Nov 11, 2005 12:52 pm Assunto: calculo de datas

Obrigado mais uma vez pela ajuda amigo, pelo menos assim aprendo mais e mais, com feras em Delphi como vc

Valeu amigo
T+
_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree