Tüm Platformlar için Hızlı Uygulama Geliştirme Kitap Yayın Süreci
Kitap gözden geçirilmek üzere BTG (Bilgi ve Teknoloji Grubu) 'na gönderildi. 05.10.2018-14:10
BTG (Bilgi ve Teknoloji Grubu) tarafından iki sayfalık bir reklam tasarımı bekleniyor. 08.10.2018 - 15:30
Kitap basım talebi değerlendirilmek üzere matbaaya bildirildi. Matbaadan basım süreci hakkında bilgi bekleniyor. 15.10.2018 - 15:34
Kitap 1.000 adet basım talebi ile matbaaya gönderildi. 16.10.2018 - 16:50

Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Virgülden sonraki sıfırlar - çözüldü
#1
Hayırlı ramazanlar,

Parasal işlemler konusunda benzer bir çok konu açtım, halen sıkıntıları çözemedim, çarpma işlemi yaptırırken noktayı virgüle çevirip ürün adet * fiyat = sonuç buluyorum,

Sorunu örnek ile anlatmaya çalışacağım:

Karpuz kilosu 1,75 * 2 = 3,5 çıkıyor
Arabanın adeti 7,000 * 2 = 14 çıkıyor  (14.000) olması lazım virgülden sonraki atılan sıfırları nasıl göstere bilirim?




          
 for I := 0 to Items.Count - 1 do
        begin
          Fiyat := StrToFloat(NoktaConvert(Items[I].SubItems[3]));
          Adet := StrToInt(Items[I].SubItems[4]);
          Items[I].SubItems[5] := FormatCurr(',0.###', (Fiyat * Adet));
Cevapla
#2
Sonucu nerede gösteriyorsunuz?

“Do. Or do not. There is no try.”
Cevapla
#3
ondalık ayıracın virgül olduğu için 7,000 7 bin değil 7'dir 7 bin yazmak istiyorsan 7.000,000 ya da 7000,000 olarak yazmalısın
Cevapla
#4
Cevabı zaten soru başlığında vermişsiniz. Kurmanız gereken mantık. Önce virgülün pozisyonunu bulmak daha sonra kendisinden sonra gelen karakterler içinde sıfırları saydırmak.
daha önce ki sorularınızdan birinde nokta ve virgül sayısını nasıl alacağınıza dair bir çok örnek kod verildi.
Amatör Küme Bilgisayar Programcısı
WWW
Cevapla
#5
Merhaba,

FormatSettings.DecimalSeparator:=',';
(10.000,00)

FormatSettings.DecimalSeparator:='.';
(10,000.00)

Bu şekilde dener misin?
Cevapla
#6
Bu sorunu bir türlü çözemedim, onlarca versiyon denedim fakat hiçbiri olmadı.

0,75 TL
1,75 TL
22,30 TL
75.500 TL
79.550,30 TL bu ve benzeri fiyatları aynı işlemde kullandığımda sürekli hatalar alıyorum?
Cevapla
#7
(30-06-2017, Saat: 01:04)serhat Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlBu sorunu bir türlü çözemedim, onlarca versiyon denedim fakat hiçbiri olmadı.

0,75 TL
1,75 TL
22,30 TL
75.500 TL
79.550,30 TL bu ve benzeri fiyatları aynı işlemde kullandığımda sürekli hatalar alıyorum?

Bence ne yapmak istediğinizi tam olarak anlatın örnek kasa kaydı programı yapıyorum kullanıcı klavyeden xxx rakamlarına sonra virgüle sonra virgülden sonra ki yy rakamlarını yazıyor kayıt edilmesi göstermesi gereken sonuç zzzz ama kaydetiği sonuc aaa deyin
bu rakamlar
0,75 TL (yetmiş beş kuruş)
1,75 TL (bir tl yetmiş beş kuruş)
22,30 TL (yirmi iki tl otuz kuruş)
75.500 TL (yetmiş beş bin beşyüz tl)
79.550,30 (yetmiş dokuz bin beş yüz elli tl otuz kuruş) mudur?

“Do. Or do not. There is no try.”
Cevapla
#8
(30-06-2017, Saat: 01:47)masteryoda Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlBence ne yapmak istediğinizi tam olarak anlatın örnek kasa kaydı programı yapıyorum kullanıcı klavyeden xxx rakamlarına sonra virgüle sonra virgülden sonra ki yy rakamlarını yazıyor kayıt edilmesi göstermesi gereken sonuç zzzz ama kaydetiği sonuc aaa deyin
bu rakamlar
0,75 TL (yetmiş beş kuruş)
1,75 TL (bir tl yetmiş beş kuruş)
22,30 TL (yirmi iki tl otuz kuruş)
75.500 TL (yetmiş beş bin beşyüz tl)
79.550,30 (yetmiş dokuz bin beş yüz elli tl otuz kuruş) mudur?

Evet bu şekilde fiyat listesi; bu fiyatları aynı işlemde kullandığımda hatalar alıyorum, bir türlü toplama işlemini yaptıramıyorum. Yardımcı olursanız sevinirim.
Cevapla
#9
Merhaba,
Yapımış olduğunuz bu işlem;
Ekranda veri girişi esnasında mı kullanılıyor?
Tablodaki verileri ekranda gösterme aşamsında mı kullanılıyor?
Kullanıcının veri girişi esnasında gerçekleşiyor ise, veri giriş aşamasının optimize edilmesi gerekir. Eğer tablodaki verileri göstermek için kullanıyorsanız, verileri ekrana yansıtmadan önce bu işlem daha kolay yapılabilir.
Kolay gelsin.
Cevapla
#10
Selam; Listview deki var satış fiyatlarını adetle çarpıyorum toplam fiyatı yine listview işliyorum daha sonrasın tüm satışın toplam fiyatını almak istiyoum



for I := 0 to Items.Count - 1 do
       begin
         Fiyat := StrToFloat(Items[I].SubItems[3]); // FİYAT
         Adet := StrToInt(Items[I].SubItems[4]); /// ADET
         Items[I].SubItems[5] := FormatCurr(',0.###', (Fiyat * Adet)); // FİYAT * ADET = TOPLAM FİYATI



yaptıktan sonra örnek vererek açıklayayım:

Elma  22,75 * 5 = 113,75
Sakız  0,75 * 3 = 2,25
Araba 75.000,10 * 2 = 150.000,20

113,75 + 2,25 +  150.000,20 = bu ürünlerin toplamını almak istiyorum, Umarım anlatabilmişimdir.
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  [Çözüldü] Otomatik artan alan değerlerini sıfırlama Lord_Ares 3 61 4 saat önce
Son Yorum: Lord_Ares
  [ÇÖZÜLDÜ] Query ismini değişken olarak göndermek Lord_Ares 14 261 12-10-2018, Saat: 12:33
Son Yorum: Lord_Ares
  [Çözüldü] SQL insert ederken autoincrement alan Lord_Ares 10 182 06-10-2018, Saat: 21:08
Son Yorum: Lord_Ares
  CxGrid'de Runtime Filtreleme (Çözüldü) yhackup 1 76 03-10-2018, Saat: 17:04
Son Yorum: adelphiforumz
  [ ÇÖZÜLDÜ ] RAD Studio Community Edition ? Mr.Developer 3 206 11-09-2018, Saat: 10:20
Son Yorum: Mr.Developer



Konuyu Okuyanlar: 1 Ziyaretçi