Arama butonu
Bu konudaki kullanıcılar: 1 misafir
3
Cevap
388
Tıklama
0
Öne Çıkarma
Delphi'de Digital Saat Yapımı Hakkında
C
20 yıl
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,

DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.

Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.

Üye Ol Şimdi Değil



B
20 yıl
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
20 yıl
Binbaşı
Konu Sahibi

B
20 yıl
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.