Tablo Alanları
Borç = Float
Alacak = float
ParaBirimKodu = String
Borç ve alacağın görüntü formatını değiştirmek için
AdoBorc.DisplayFormat:="###.###.###,00TL" kullanıyorum. Gayet başarılı çalışıyor. Fakat tüm listeye aynı formatta işlem yapıyor. Ben Parabirimkodu alanıma bağlı olarak formatın değişmesini istiyorum.
Resimde de görüldüğü gibi son kayıtta 36,00TL olmalı. Komutu basit zaten if parabirimkodu='TL' then displayformat=....TL ama nereye yazacağımı tam olarak bulamadım.
Her satırda ayrı displayformat
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Re: Her satırda ayrı displayformat
Kod: Tümünü seç
procedure TfrmCariHareket.AdoHareketCHBorcGetText(Sender: TField;
var Text: string; DisplayText: Boolean);
begin
DisplayText:=true;
Text:=formatfloat('###,###,##0.00'+ AdoHareketCHParaBirimKodu.Value , Sender.AsFloat );
end;