![]() |
| Clomosy Resmi Forum Sitesidir. Amacımız kullanıcılarımıza, iş ortaklarımıza, danışmanlara, yazılımcılara programlarımız hakkında destek ve bilgi vermektir. |
date |
Yanıt Yaz
|
| Yazar | |
rabiagnbs
Deneyimli Üye
Kayıt Tarihi: 22 Temmuz 2024 Konum: Konya Durum: Aktif Değil Puanlar: 82 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı rabiagnbs
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
Teşekkürler(0)
Alıntı Cevapla
Konu: dateGönderim Zamanı: 05 Ağustos 2024 Saat 11:45 |
|
güncel tarihi label içerisinde nasıl yazdırabilirim
|
|
|
RabiaGnbs
|
|
![]() |
|
Developer
Forum Yöneticisi
Kayıt Tarihi: 14 Haziran 2023 Durum: Aktif Değil Puanlar: 388 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı Developer
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
Teşekkürler(0)
Alıntı Cevapla
Gönderim Zamanı: 05 Ağustos 2024 Saat 12:10 |
|
Merhaba Rabia,
Aşağıdaki kodu inceler misin: var MyForm:TclForm; myDate : TclDateTime; lbl:TCLLabel; begin MyForm := TclForm.Create(Self); MyForm.SetFormColor('#CBEDD5','',clGNone); myDate := StrToDateTime(Now); lbl := MyForm.AddNewLabel(MyForm,'lbl',''); lbl.text := DateTimeToStr(myDate); MyForm.Run; end |
|
![]() |
|
rabiagnbs
Deneyimli Üye
Kayıt Tarihi: 22 Temmuz 2024 Konum: Konya Durum: Aktif Değil Puanlar: 82 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı rabiagnbs
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
Teşekkürler(0)
Alıntı Cevapla
Gönderim Zamanı: 05 Ağustos 2024 Saat 12:23 |
|
aslında prolabel'da denedim fakat yapamadım. Bir de bu labelın yanına ek olarak istediğim bir yazı daha eklemek istiyordum:
today=StrToDateTime(Now); tarih=seyahatHedef.AddNewLabel(seyahatHedef, 'tarih', ''); clComponent.SetupComponent(tarih,'{ "Align" : "Top", "MarginBottom":450, "Width" :400, "Height":40, "TextColor":"#133f87", "TextSize":15, "TextVerticalAlign":"center", "TextHorizontalAlign":"left", "TextBold":"yes", "BorderColor":"#617bcf", "RoundHeight":10, "RoundWidth":10, "BorderWidth":2, "BackGroundColor":"null" }'); tarih.text = DateTimeToStr(today); |
|
|
RabiaGnbs
|
|
![]() |
|
Developer
Forum Yöneticisi
Kayıt Tarihi: 14 Haziran 2023 Durum: Aktif Değil Puanlar: 388 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı Developer
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
Teşekkürler(0)
Alıntı Cevapla
Gönderim Zamanı: 05 Ağustos 2024 Saat 14:00 |
|
Merhaba Rabia, Aşağıdaki kodu inceler misin: var MyForm:TclForm; myDate : TclDateTime; lbl:TCLLabel; begin MyForm := TclForm.Create(Self); MyForm.SetFormColor('#CBEDD5','',clGNone); myDate := StrToDateTime(Now); lbl := MyForm.AddNewLabel(MyForm,'lbl',''); lbl.AutoSize := true; lbl.WordWrap := True; lbl.text := DateTimeToStr(myDate)+' aaaBB' ; MyForm.Run; end
|
|
![]() |
|
Yanıt Yaz
|
|
| Tweet |
| Forum Atla | Forum İzinleri ![]() Kapalı Foruma Yeni Konu Gönderme Kapalı Forumdaki Konulara Cevap Yazma Kapalı Forumda Cevapları Silme Kapalı Forumdaki Cevapları Düzenleme Kapalı Forumda Anket Açma Kapalı Forumda Anketlerde Oy Kullanma |