Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

Gönderen Konu: Quick Report Sayı Formatlama Yardım  (Okunma sayısı 403 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı selchuk

  • Delphi 6 Level 3
  • ***
  • İleti: 274
  • Rep: +0/-0
  • Cinsiyet: Bay
    • Arma Ticari Sistem
Quick Report Sayı Formatlama Yardım
« : 16 Ekim 2011 00:10:01 »
Merhaba Arkadaşlar,

Veri tabanında text formatında olan rakamların yazıldığı bir alan var.
Bu alanı Quick Reportta QRDBText olarak bağladım.

sorunum rakamları formatlayamıyorum. Örnek : 1000,5 gibi bir sonucu ben 1.000,50 şeklinde yazdırmak istiyorum.
Mask alanına #,##0.00 gibi denemeler yaptım fakat alan veritabanında text olduğu için fayda etmedi.

Bu konu hakkında yardımcı olabilecek varmı?


Knowledge is power (Bilgi Güçtür)

Çevrimdışı sabanakman

  • Global Moderatör
  • *****
  • İleti: 796
  • Rep: +13/-0
  • Cinsiyet: Bay
  • Delphi Sürümü: e) Hepsi
Ynt: Quick Report Sayı Formatlama Yardım
« Yanıtla #1 : 17 Ekim 2011 00:55:35 »
Burada değerin tipi sayısal olduğu sürece #,##0.00 biçiminde verilen maske ondalık kısmı 2 hane olarak sonuç üretir. Ondalık ayraç karakterinize dikkat etmenizde fayda var. Virgül yerine nokta ile deneme yapın bir de. Kendi bilgisayarımda deneme yaptım ve TQRExpr nesnesinin Expression özelliğine 1000.5 değeri ve Mask özelliğine de #,##0.00 yazarak istediğiniz sonucu alabildim.
Şaban Şahin AKMAN

Derin olan kuyu değil kısa olan iptir

Çevrimdışı selchuk

  • Delphi 6 Level 3
  • ***
  • İleti: 274
  • Rep: +0/-0
  • Cinsiyet: Bay
    • Arma Ticari Sistem
Ynt: Quick Report Sayı Formatlama Yardım
« Yanıtla #2 : 17 Ekim 2011 03:11:18 »
Hocam sorun değer tipinde,
Değer tipi text alan.
Ama rakam olarak kullanılmış.

100
115,2
1987,15
2000
11,6

gibi rakamlar var ve alan tipi metin (Access veritabanı) alan tipini değiştirme şansımız yok. Bin ayıracı kullanarak raporda formatlı gözükmesini istiyorum, bir türlü olmadı.
Knowledge is power (Bilgi Güçtür)

Çevrimdışı sabanakman

  • Global Moderatör
  • *****
  • İleti: 796
  • Rep: +13/-0
  • Cinsiyet: Bay
  • Delphi Sürümü: e) Hepsi
Ynt: Quick Report Sayı Formatlama Yardım
« Yanıtla #3 : 17 Ekim 2011 09:06:57 »
QRDBText'in onPrint olayında müdahele etmeniz gerekebilir o zaman. Zira metin alanlar için bu maskeleme pek bir işe yaramaz.
Kod: [Seç]
procedure TForm1.QRDBText1Print(sender: TObject; var Value: String);
begin
  Value:=FormatFloat('#,##0.00',StrToFloat(Value));
end;
Şaban Şahin AKMAN

Derin olan kuyu değil kısa olan iptir

Çevrimdışı selchuk

  • Delphi 6 Level 3
  • ***
  • İleti: 274
  • Rep: +0/-0
  • Cinsiyet: Bay
    • Arma Ticari Sistem
Ynt: Quick Report Sayı Formatlama Yardım
« Yanıtla #4 : 17 Ekim 2011 15:00:30 »
Hocam oldu. İlginize ve bilginize çok teşekkür ederim.

Knowledge is power (Bilgi Güçtür)