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.
Gö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: 354 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı Developer
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
|
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.
|
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: 354 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı Developer
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
|
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 |