Saatte +10 ekleme

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
Serhat
Üye
Mesajlar: 203
Kayıt: 27 Tem 2014 11:10

Saatte +10 ekleme

Mesaj gönderen Serhat »

Selam...

Şimdiki saatte +10 Saat nasıl ekleye bilirim...

Kod: Tümünü seç

 MaskEdit1.Text := FormatDateTime('hh:nn:ss', Now+10);
Kullanıcı avatarı
sabanakman
Kıdemli Üye
Mesajlar: 3077
Kayıt: 17 Nis 2006 08:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Re: Saatte +10 ekleme

Mesaj gönderen sabanakman »

Kod: Tümünü seç

uses DateUtils;

procedure TForm1.Button1Click(Sender: TObject);
begin
  MaskEdit1.Text:=FormatDateTime('hh:nn:ss', IncHour(Now,10));
end;
Şaban Şahin AKMAN
_________________
Derin olan kuyu değil kısa olan iptir. - .
ercan_elo_bil
Üye
Mesajlar: 26
Kayıt: 11 Tem 2014 11:13

Re: Saatte +10 ekleme

Mesaj gönderen ercan_elo_bil »

merhaba
ben genelde şöyle kullanırım
10 saat ekleme;
TimeTmp := now + encodetime(10,0,0,0);
10Dk ekleme
TimeTmp := now + encodetime(0,10,0,0);
10Gün ekeleme
DateTmp := now + encodedate(0,0,10);

kolay gelsin...
....
Garbage Collector, Delphi çöp üretmez çöpü bulup temizlemeye asla gerek yoktur... :D
akdatilla
Üye
Mesajlar: 292
Kayıt: 02 Nis 2006 06:04
Konum: Antalya

Re: Saatte +10 ekleme

Mesaj gönderen akdatilla »

t:=t+(10/24);
Cevapla