dbedit eğer boşsa sıfır yazdırma

[husonet]

Bence Şu kodu kullansan problem yaşamazsın kayıt esnasında tahminim tablondaki alanında değeri 0 olacaktır.

Kod: Tümünü seç

    if DBEdit1.Text = '' Then
        DBEdit1.Text := '0'

Kolay Gelsin...

[mussimsek]

Merhaba,

her zaman dbEdit gibi bileşenlerle çalışmak yerine direk alanlarla çalışın.

if Table1.FieldByName('abc').AsString = '' then
Table1.FieldByName('abc').AsFloat := 0

gibi.

Kolay gelsin.

[gkimirti]

creation order i goz onunde bulundurmak gerek
olusturulmamıs bir nesneye atıfta bulunuyor olabilirsin

[fahrettin]

programi satir satir calistirarak hatanın hangi satirda verildiğine bakın. O satirdaki ilgili obje henuz create edilmediği icin bu hatayi verir. Mesela dm.maliyet.edit satirinda dm bir datamodulun adi ise acaba o datamodul bu koda calismadan once create edildi mi ?

gibi ve benzeri...

Kolay gelsin...

[hakkus]

Merhabalar,
Bu tür nümerik alanların default değerini 0 (sıfır) olarak belirlerseniz, yeni bir kayıt eklendiğinde yada bu alanın değeri boş geçildiği zaman kendiliğinden sıfır olarak yazılır.
Saygıyla

[mussimsek]

Merhaba,

Access Violation benim dikkatimi çekmedi. Şu ipucunu okuyun : http://www.delphiturkiye.com/ipobjpas.h ... _violation

Kolay gelsin.

[DotCom]

merhaba , arkadaşın problemi aslında dbedit e eğer boş ise 0 yazdırmak degil anladıgım kadar ,,, tüm arkadaşlar nasıl olursa boş oldugunda 0 yazılır buna cvp vermişler...
ben arkadaşa hada güsel bir yol önereyim.

dbeditler ile işlem yaparken

örnegin ;

table1.toplam.value:=table1.deger1.value+table1.deger2.value;

eğer bu şekilde kulanır isen deger1 veya deger2 farketmez birisinde deger olmasa bile otomatikman Sıfır olarak alıyor. böylece eğer boş ise 0 ve boş degilse hesaba kat gibisinden bir algoritma yazmak zorunda kalmazsın. umarım yardımcı olabilmişimdir.