UniDBGrid İçerisinde Float Format Ayarlama

[alp.yilmaz]

Merhaba

 

DBGrid ile Hareketli Bakiye Listesi Hazırlıyorum...

Normal Dizayn Aşamasında Bakiye Değişkeninin DisaplayFormat Bölümüne '#,##0.00 (;#,##0.00 (A)'  Yazıp Query i True Yaptığımda Ekranda Değeri Doğru

Gösteriyor..

 

Run-Time Esnasında ise Disaplay Formatın Tamamını Değerin Yanında Gösteriyor.

 

Bu Sorunu Nasıl Giderebiliriz.

 

[selcukcaliskan]

O konuda benim uyguladığım çözümü paylaşayım en azından alternatif olarak değerlendirebilirsin.

 

https://postimg.org/image/n6bagvcqv/

https://postimg.org/image/rgpycghtz/

 

Yazmadım direkt ekran görüntüsü paylaştım. Zaten görüntülerden anlaşıiıyor.

[pro_imaj]

O konuda benim uyguladığım çözümü paylaşayım en azından alternatif olarak değerlendirebilirsin.

 

https://postimg.org/image/n6bagvcqv/

https://postimg.org/image/rgpycghtz/

 

Yazmadım direkt ekran görüntüsü paylaştım. Zaten görüntülerden anlaşıiıyor.

 

Selçuk bey ekran görüntülerini foruma ekli dosya olarak eklerseniz daha kalıcı olur.

İyi çalışmalar.

[pro_imaj]

Merhaba;

Field's leri Query eklemediğim için GetText olayı olmuyor, bu durumda nasıl yapılır?

[selcukcaliskan]

Önce bir procedure tanımlayın örn;

 

procedure TMainFrm.MyFieldGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin

...

end;

 

daha sonra ;

 

procedure TImportFrm.ADOQueryAfterOpen(DataSet: TDataSet);

var
I : Integer;
begin
for I := 0 to ADOQuery.FieldCount - 1 do
ADOQuery.Fields[I].OnGetText := MainFrm.MyFieldGetText;
end;

 

adoquery afteropen eventından çağırın tanımladığınız procedure ü şuanda deneme imkanım yok ama olucakytır eğer bir sorun olursa paylaşın bakalım tekrar.