Para birimi

[esad18]

Merhaba

Kod: (Select All)

procedure Variable1OnCalc(var Value: Variant);
begin

 Value := ISLEMDETAYLARI['YTLISKONTOLUBIRIMFIYATI'] + (ISLEMDETAYLARI['YTLISKONTOLUBIRIMFIYATI'] *    ISLEMDETAYLARI['KDVORANI'] / 100)


end;

Delph ile yazılmış olan bir program kullanmaktayım. Program, içeriğinde bazı kısımlarda kodlama ile devam etmemize izin veriyor. Yukarıda bir değişkene tanımladığım hesaplama var. Hesaplama bu şekilde çalışıyor. YTLISKONTOLUBIRIMFIYATI değişkeni #,0.00;-#,0.00 gösterim biçimiyle çalışıyor, türü de Currency olarak verilmiş. Hesaplamanın sonucunuda  #,0.00;-#,0.00 gösterim biçimiyle görüntülemek istiyorum. Yardımcı olabilirseniz sevinirim.

[hi_selamlar]

(04-10-2022, Saat: 10:10)esad18 Adlı Kullanıcıdan Alıntı: Merhaba

Kod: (Select All)

procedure Variable1OnCalc(var Value: Variant);
begin

 Value := ISLEMDETAYLARI['YTLISKONTOLUBIRIMFIYATI'] + (ISLEMDETAYLARI['YTLISKONTOLUBIRIMFIYATI'] *    ISLEMDETAYLARI['KDVORANI'] / 100)


end;

Delph ile yazılmış olan bir program kullanmaktayım. Program, içeriğinde bazı kısımlarda kodlama ile devam etmemize izin veriyor. Yukarıda bir değişkene tanımladığım hesaplama var. Hesaplama bu şekilde çalışıyor. YTLISKONTOLUBIRIMFIYATI değişkeni #,0.00;-#,0.00 gösterim biçimiyle çalışıyor, türü de Currency olarak verilmiş. Hesaplamanın sonucunuda  #,0.00;-#,0.00 gösterim biçimiyle görüntülemek istiyorum. Yardımcı olabilirseniz sevinirim.

Merhabalar,

https://www.delphican.com/showthread.php?tid=6676

Kolay gelsin.