s.a.
Paradox veritabanı ile hazırlanmış bir tablonun Dbgridde gösterimi esnasında numerik alanları '0.00,;' formatı ile kuruşlu olarak gösteriyorum.(örn: 12.250,00). Ancak bu durumda içeriği 0(sıfır) olan alanları da '0,00' olarak gösteriyor. Ben içeriği 0 olan kayıtları göstermesini istemiyorum yani bu alanlar gridde gözükmesin. Nasıl yapabilirim, nasıl bir format kullanmalıyım. TŞK.
kuruşlu sayısal alanlarda format sorunu
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
- White Rose
- Üye
- Mesajlar: 726
- Kayıt: 06 Tem 2005 09:41
- Konum: Güneyden
- İletişim:
- White Rose
- Üye
- Mesajlar: 726
- Kayıt: 06 Tem 2005 09:41
- Konum: Güneyden
- İletişim:
bu zamanda paradox kullanmak ? Neyse bu önemli değil;
çözüldü mü bu sefer sorununuz?
Kod: Tümünü seç
procedure TFormX.FieldName_GetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
if Sender.AsInteger=0 then Text:=''
else Text:=Sender.AsString;
end;
Hocam öncelikle ;
1- Paradox vt'deki alanını $(money) olarak ayarlamalısın.
2 - Kullandığın displayformatlarını 0.00,## olarak değiştirirsen sorunun kalmaz.
Eğer bunlarda işe yaramıyorsa bu işlemlerden sonra karşılaştığın sorunu yazarsan daha iyi olur...
Kolay gelsin...
1- Paradox vt'deki alanını $(money) olarak ayarlamalısın.
2 - Kullandığın displayformatlarını 0.00,## olarak değiştirirsen sorunun kalmaz.
Eğer bunlarda işe yaramıyorsa bu işlemlerden sonra karşılaştığın sorunu yazarsan daha iyi olur...
Kolay gelsin...
Var olmaya değer her şey bilinmeye de değerdir. Çünkü bilgi varlığın bir imgesidir. Onda iyi ve kötü aynı anda bulunmaktadır...
- White Rose
- Üye
- Mesajlar: 726
- Kayıt: 06 Tem 2005 09:41
- Konum: Güneyden
- İletişim:
s.a.
Hocam paradox kullanmamın sebebi yaptığım proje 7-8 yıllık ve halen
piyasada kullanıldığı için, o zamanlar paradoxla yapmıştım mecburen.
sorunu da aşağıdaki şekilde hallettim.
procedure TMusHrkEkr.MusharMSH_BRCGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
if Sender.AsInteger=0 then
Text:=''
else
Text:=FormatFloat('0.00,;',Sender.AsFloat);
end;
tşk.
Hocam paradox kullanmamın sebebi yaptığım proje 7-8 yıllık ve halen
piyasada kullanıldığı için, o zamanlar paradoxla yapmıştım mecburen.
sorunu da aşağıdaki şekilde hallettim.
procedure TMusHrkEkr.MusharMSH_BRCGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
if Sender.AsInteger=0 then
Text:=''
else
Text:=FormatFloat('0.00,;',Sender.AsFloat);
end;
tşk.