DonanımHaber Mini sürüm 2 Ocak 2026 tarihi itibariyle kullanımdan kalkacaktır. Bunun yerine daha hızlı bir deneyim için DH Android veya DH iOS uygulamalarını kullanabilirsiniz.
Arama butonu
Bu konudaki kullanıcılar: 1 misafir
3
Cevap
395
Tıklama
0
Öne Çıkarma
Delphi'de Digital Saat Yapımı Hakkında
C
21 yıl (1364 mesaj)
Binbaşı
Konu Sahibi

slms

çok basit bir digital saat yaptım kodu aşağıda;
------------------------------------
var
DateTime : TDateTime;
str : string;
begin
DateTime := Time;
str := TimeToStr(DateTime);
Label1.Caption := str;
end;
------------------------------------

yapmak istediğm şu örneğin saat 12:45:25 olduğunda bir showmessage göstereceğim nasıl yapabilirim


saygılar,



B
21 yıl (825 mesaj)
Yüzbaşı

var
DateTime : TDateTime;
str : string;
begin
DateTime := Time;
str := TimeToStr(DateTime);

if str='12:45:25' then ShowMessage('Alarm...');

Label1.Caption := str;
end;


Bu mesaja 1 cevap geldi.
C
21 yıl (1364 mesaj)
Binbaşı
Konu Sahibi

B
21 yıl (825 mesaj)
Yüzbaşı

Birsey Degil... Kolay gelsin..



DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.