saatten dakika çıkarmak

[digitdigitman]

arkadaşlar
maskedite yazılan bir saatten örneğin 09:00 , 12:00 ,15:15 gibi saatlerden sorgu çalışmadan önce 00:01 saat yani 1 dakika çıkarmam lazım
yani kullanıcı 09:00 yazdığı halde benim bunu 08:59 olarak kullanmam lazım baktım forumlara ama saatler için ayrı dakikalar için ayrı işlemlerden bahsediliyor. anlayamadım
yardım ederseniz sevinirim
teşekkürler

[xxxjedixxx]

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
var Saat: TTime;
begin
  Saat := StrToTime(Edit1.Text); // yazılan saat
  Saat := Saat - EncodeTime(0, 1, 0, 0); // 1dk'yı çıkarıyoruz
  Edit2.text := TimetoStr(Saat);
end;

[SimaWB]

IncMinute

Keşke önce forumda arama yapsaydınız:
viewtopic.php?f=2&t=28045

[digitdigitman]

yardımınız için teşekkür ederim. bu arada forumda yeniyim. arama yapmadan soru sormamaya dikkat ediyorum. ama verdiğiniz linke ulaşamadım. arama kriterlerinden yazmadığım kalmadı