Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Tarih büyük harf
#11
Şöyle deneyin

Procedure TarihlerVeGunlerBuyuk;
var
  i : Integer;
begin
  for i := Low( FormatSettings.LongMonthNames ) to High ( FormatSettings.LongMonthNames )
    do FormatSettings.LongMonthNames[i]  := FormatSettings.LongMonthNames[i].ToUpper;

  for i := Low( FormatSettings.ShortMonthNames ) to High ( FormatSettings.ShortMonthNames )
    do FormatSettings.ShortMonthNames[i]  := FormatSettings.ShortMonthNames[i].ToUpper;

  for i := Low( FormatSettings.LongDayNames ) to High ( FormatSettings.LongDayNames )
    do FormatSettings.LongDayNames[i]  := FormatSettings.LongDayNames[i].ToUpper;

  for i := Low( FormatSettings.ShortDayNames ) to High ( FormatSettings.ShortDayNames )
    do FormatSettings.ShortDayNames[i]  := FormatSettings.ShortDayNames[i].ToUpper;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  i : Integer;
begin
  // Örnek Aylar
  for i := Low( FormatSettings.LongMonthNames ) to High ( FormatSettings.LongMonthNames )
    do Memo1.Lines.Add( FormatSettings.LongMonthNames[i] );
  // Örnek Günler
  for i := Low( FormatSettings.LongDayNames ) to High ( FormatSettings.LongDayNames )
    do Memo1.Lines.Add( FormatSettings.LongDayNames[i] );

  TarihlerVeGunlerBuyuk();

  // Örnek Aylar
  for i := Low( FormatSettings.LongMonthNames ) to High ( FormatSettings.LongMonthNames )
    do Memo2.Lines.Add( FormatSettings.LongMonthNames[i] );
  // Örnek Günler
  for i := Low( FormatSettings.LongDayNames ) to High ( FormatSettings.LongDayNames )
    do Memo2.Lines.Add( FormatSettings.LongDayNames[i] );
end;



wuwhgnfrocmvy17l6d9w.png
Saygılarımla
Muharrem ARMAN

guplouajuixjzfm15eqb.gif


Cevapla
#12
(22-01-2019, Saat: 10:51)adelphiforumz Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.Selamlar
@Fesih ARSLAN hocamın örneğini incelerken dikkatimi çeken bir yer oldu
System.Character içerisinde "function ToUpper(const S: string): string; overload; inline; deprecated 'Use TCharHelper';"
şeklinde ifadeler yer alıyor buradaki "Use TCharHelper" tam olarak neyi ifade ediyor bir açıklamamı yoksa bir referans mı bu konuda bilgisi olan var mı
eğer yanlış bilmiyorsam tanımlama içerisinde "deprecated" kullanımı bu yapının artık kullanılmadığını ve geriye dönük uyumluluk için ifade anlamına geliyordu


Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.

Merhaba,
Deprecated ifadesi Delphi'nin geriye dönük kod uyumluluğunun bir göstergesidir. Daha önceden geliştirilen bir metodun yeni (modern, gelişmiş vb.) sürümünün yazıldığını, önceki metodun kullanımdan kaldırılmasının daha uygun olacağı, yeni metodun, yeni OS üzerinde daha etkin çalışacağı gibi daha bir çok mana çıkarabiliriz.
Deprecated olarak nitelendirilen metodların mutlaka alternatifleri oluyor. Bu metodların kullanılması durumunda  derleme anında bir uyarı verilecektir. 
Örnek,
   
Bu durumda, geliştiriciye yeni metodun hangi kütüphanede olduğunu gösteren bir uyarı (Use...) verecektir.
Use tavsiyesine uyulması uygulama performansını olumlu yönde etkileyecek ve yeni OS üzerinde daha etkin çalışacaktır.

Sizin vermiş olduğunuz örnek kütüphanede (System.Character) içerisinde tanımlı TCharacter static recordu'nun yerine daha yeni/sorunsuz olan; Char tipine yardımcı TCharHelper static record'u kullanmanız öneriliyor.
While true do; Hayat döngüsü, kısır değildir! Yapılan bir yanlış, o döngünün dışına çıkmanızı sağlayacaktır.
WWW
Cevapla
#13
(22-01-2019, Saat: 11:31)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.
(22-01-2019, Saat: 10:51)adelphiforumz Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.Selamlar
@Fesih ARSLAN hocamın örneğini incelerken dikkatimi çeken bir yer oldu
System.Character içerisinde "function ToUpper(const S: string): string; overload; inline; deprecated 'Use TCharHelper';"
şeklinde ifadeler yer alıyor buradaki "Use TCharHelper" tam olarak neyi ifade ediyor bir açıklamamı yoksa bir referans mı bu konuda bilgisi olan var mı
eğer yanlış bilmiyorsam tanımlama içerisinde "deprecated" kullanımı bu yapının artık kullanılmadığını ve geriye dönük uyumluluk için ifade anlamına geliyordu


Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.

Merhaba,
Deprecated ifadesi Delphi'nin geriye dönük kod uyumluluğunun bir göstergesidir. Daha önceden geliştirilen bir metodun yeni (modern, gelişmiş vb.) sürümünün yazıldığını, önceki metodun kullanımdan kaldırılmasının daha uygun olacağı, yeni metodun, yeni OS üzerinde daha etkin çalışacağı gibi daha bir çok mana çıkarabiliriz.
Deprecated olarak nitelendirilen metodların mutlaka alternatifleri oluyor. Bu metodların kullanılması durumunda  derleme anında bir uyarı verilecektir. 
Örnek,

Bu durumda, geliştiriciye yeni metodun hangi kütüphanede olduğunu gösteren bir uyarı (Use...) verecektir.
Use tavsiyesine uyulması uygulama performansını olumlu yönde etkileyecek ve yeni OS üzerinde daha etkin çalışacaktır.

Sizin vermiş olduğunuz örnek kütüphanede (System.Character) içerisinde tanımlı TCharacter static recordu'nun yerine daha yeni/sorunsuz olan; Char tipine yardımcı TCharHelper static record'u kullanmanız öneriliyor.

Merhabalar,

Bilgi ve paylaşımınız için teşekkürler.

Kolay gelsin.
Amaç, bilginin de/aklın da zekat'ını vermek.
Cevapla
#14
@Fesih ARSLAN Hocam Teşekkürler bugünde eksik bildiğimize +1 ekledik, yanlış bildiğimizi düzeltmiş olduk
Bu dünyada kendine sakladığın bilgi ahirette işine yaramaz. 
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Mysql Parçalı Tarih Sorgulama bkantur 7 463 04-06-2019, Saat: 13:32
Son Yorum: FiRewaLL
  [ÇÖZÜLDÜ]Tarih ve Saat aralığı sorgulama wiseman 39 1.894 23-04-2019, Saat: 17:17
Son Yorum: wiseman
  Tarih Sorgulama OZCANK 11 895 05-04-2019, Saat: 08:13
Son Yorum: m_ekici
Thumbs Up tarih sorunsalı ! forumcuali 1 364 06-03-2019, Saat: 08:29
Son Yorum: Tuğrul HELVACI
  CalendarView tarih değeri dilo 4 912 31-10-2018, Saat: 03:14
Son Yorum: Ahmet İPEKÇİ



Konuyu Okuyanlar: 1 Ziyaretçi