Tüm Platformlar için Hızlı Uygulama Geliştirme --->    Kitabımız...      Delphi

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Sayıyı paraya çevirme
#1
Merhaba, 

Kullanıcı edite 150000 sayı girdiğinde editen çıktığında 150.000,00 ₺ olarak para formatına dönüştürüyorum, fatak editen çıktığında değilde ChangeTracking sırasında noktayı otomatik olarak nasıl ekleye bilirim? sürekli hatalar alıyorum.
Örnek: 150.000 olacak sonuna  ₺  işareti de gelmeyecek.



procedure TForm1.xFiyatExit(Sender: TObject);
var
  Money: Currency;
begin
  if xFiyat.Text.length > 3 then
  begin
    Money := StrToFloat(xFiyat.Text);
   xFiyat.Text := FloatToStrF(Money, ffCurrency, 6, 2);
  end;
end;
Cevapla
#2
DevExpress de currency edit var . Textedit yerine onu kullanıyorum. mesela orada formatını yazıyorsunuz ona virgülden sonra kaç hane geleceğini , kullanacağınız simgeyi yazıyorsunuz. Delphi tarafında böyle bir component var mı bilmiyorum.

Mask editi bir inceleyin Telefon numarası formatlı yazdırılıyordu ama edit mask özelliğine currency tarzı birşey ekleniyor mu bilmiyorum.
Cevapla
#3
ESBPCS diye component paketi var (Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol )
Ben para, IP adresi, tarih vb. gibi numerik formatlama gereken her türlü işlerim için yılladır bu firmanın bileşenlerini kullanıyorum ve bundan daha iyisinin olduğunu sanmıyorum Smile
Zaten web sitesini incelerseniz siz de göreceksiniz.

Eğer RAD Studio'yu lisanslı almışsanız, GeTT ile embarcadero sürümünü ücretsiz olarak indirebilirsiniz.
Cevapla
#4
RAD Studio XE 8 den 10.2.2 Tokyo dahil denenmiştir.
Bak-O-Soft firmasının ücretsiz açık kodlu PBEditPack component kullanıyoruz.
Çok başarılı. Noktalı rakamlarla çalışma aynı alanı Text, Integer, Float olarak kullana biliyoruz.
site adresinde demo ve açık kodları var.
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol

Arzu ederseniz kendinize göre özelleştirebilirsiniz.
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Sayfa Çevirme Efekti delphi-x 1 371 17-01-2017, Saat: 08:11
Son Yorum: Fesih ARSLAN



Konuyu Okuyanlar: 1 Ziyaretçi