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 10:10

Saatte +10 ekleme

Mesaj gönderen Serhat » 12 May 2015 01:00

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: 3040
Kayıt: 17 Nis 2006 07:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Re: Saatte +10 ekleme

Mesaj gönderen sabanakman » 12 May 2015 01:31

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: 15
Kayıt: 11 Tem 2014 10:13

Re: Saatte +10 ekleme

Mesaj gönderen ercan_elo_bil » 12 May 2015 02:21

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 05:04
Konum: Antalya

Re: Saatte +10 ekleme

Mesaj gönderen akdatilla » 13 May 2015 01:09

t:=t+(10/24);

Cevapla