sql sorgulama

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
akgun83
Üye
Mesajlar: 106
Kayıt: 26 Eyl 2003 11:34

sql sorgulama

Mesaj gönderen akgun83 »

kolay gelsin,
delphi 5 + sql server 2000 kullanıyorum.
delphi ile sql e bir sorgu gönderdiğimde bir alan için "3760506949688241.0000" gibi bir değer dönüyor. ancak bu değeri delphi tarafında
qz.Fields[0].AsFloat
satırı ile aldığımda "out of range" hatası veriyor çünkü float sınırlarını aşıyor. sözkonusu değer extended. bu değeri nasıl extended bir değişkene atabilirim?
umarım yardımcı olabilirsiniz. teşekkürler.
Kullanıcı avatarı
ALUCARD
Üye
Mesajlar: 1270
Kayıt: 27 Eyl 2003 10:12
Konum: Samsun
İletişim:

Mesaj gönderen ALUCARD »

hocam sorunun cevabı bu başlıkta var

viewtopic.php?t=8199&highlight=float+extended
بِسْمِ اللهِ الرَّحْمنِ الرَّحِيمِ
Forumun 365. Üyesi
Hiç Bir Şey İnsan Kadar Yükselemez ve Alçalamaz

Erkan ÇAĞLAR
Kullanıcı avatarı
lazio
Moderator
Mesajlar: 1527
Kayıt: 11 Tem 2003 04:55
Konum: İstanbul

Mesaj gönderen lazio »

qz.Fields[0].Value; olarak Double bir değişkene atayabilirsin..
DeveloperToolKit

..::|YeşilMavi|::..
Kullanıcı avatarı
akgun83
Üye
Mesajlar: 106
Kayıt: 26 Eyl 2003 11:34

Mesaj gönderen akgun83 »

selam,
öncelikle cevaplar için teşekkürler, ancak maalesef yardımcı olamadı.
uzun uğraşlar sonunda şu yöntemi buldum -ki işe yarıyor-

öncelikle sql de dönen değerin sınırları aşmasını engellemek için 1000 e böldüm;
qz.Close;
qz.SQL.Clear;
qz.SQL.Add('select sum(mhborc)/1000,sum(mhalac)/1000 from MH');
qz.Open;
daha sonra bunları extented olarak tanımlanan değişkene atayıp, 1000 ile çarptım;
wdevb := qzCOLUMN1.AsFloat;
wdeva := qzCOLUMN2.AsFloat;
wdevb := wdevb*1000;
wdeva := wdeva*1000;
bu şekilde çalışıyor.
teşekkürler, kolaygelsin.
Cevapla