Delphi Forum

Yardım ve önerileriniz için teşekürler kuri_TL...
1500 satırlık bir Dbase nin böyle bir sorguda çakılmasına şaşırdım .. bu iş gruplandırılarak yapılamazmı idi diye de kafamda bir soru işareti kaldı..gruplandırılarak niçin saydırılmıyor..mantığını çözemedim...
Kolay gelsin..

SELECT DISTINCT A.MDRLK, A.MRK,
(SELECT COUNT(*) FROM HAREKET Z WHERE Z.MDRKL = A.MDRLK AND Z.MRK = Z.MRK AND Z.ATIP = 'D5') D5_SAYISI,
(SELECT COUNT(*) FROM HAREKET Z WHERE Z.MDRKL = A.MDRLK AND Z.MRK = Z.MRK AND Z.ATIP = 'D4(DZ)') D4DZ_SAYISI,
(SELECT COUNT(*) FROM HAREKET Z WHERE Z.MDRKL = A ...

MDRLK-----MRK--------ATIP
ALEMDAR SANAYI D4(DZ)
ALEMDAR SANAYI D5
ALEMDAR SANAYI D4(TM)
ALEMDAR SANAYI D4(TM)
ALEMDAR SANAYI D4(DZ)
ALEMDAR SANAYI D4(DZ)
ALEMDAR SANAYI D5
ALEMDAR SANAYI D5
ALEMDAR SANAYI D4(TM)
ALEMDAR SANAYI D4(TMKR)
ALEMDAR SANAYI D5
ALEMDAR SANAYI D5
ALEMDAR SANAYI D5
ALEMDAR ...

Selamlar,

Group by'ı kaldırın, çünkü grup kullanmıyorsunuz SUBQUERY kurmuşsunuz.

Bir de öyle deneyin

Kolay Gelsin

Merkezlere makina(D3,D4 v.b) girişler birden fazla olduğu için group by kullanmayınca aynı merkez alt alta giriş sayısı kadar sıralanıyor fakat makina sayı alanları yine sıfır(0 ...

MDRLK........... MRK ..........ATIP
-------------------------------------------------
Alm............. ..Alk.............. D4
Alm................slk...............D4
Alm................slk...............D4
Alm................slk...............D5 ...

Teşekürler Mustafa Bey..
Kolay gelsin

Seçilen datayı cd ye yazdırabilen bir komponent veya kod var mı?
Kolay gelsin

Queryde displayformat ile formatladım fakat quick Reporta gönderdiğimde tekrar formatsız şekline dönüşüyor...
(TnumericField(Query1.FieldByName('ORT')).DisplayFormat:='#,###'
qr de kullandığın component ne dbqrlabel mi yoksa qrlabel mi
eğer qrlabel kullanıyorsan olmaz
dbqrlabel kullanman lazım ...

ALUCARD yazdı:buraya gelen veri eğer tablodan veya qery den geliyorsa onun displayformat ının formatlarsan formatlı olur

Queryde displayformat ile formatladım fakat quick Reporta gönderdiğimde tekrar formatsız şekline dönüşüyor...
(TnumericField(Query1.FieldByName('ORT')).DisplayFormat:='#,###';)

Çalışma anında oluşturulan Quick Repotta float alanı(26,22222222222222) nasıl 26,2 ye formatlarız.. displayformat gibi bir komut varmı???
Kolay gelsin..

mege yazdı: displayformat

TNumericField(Query1.FieldByName('ORT').displayformat:='#,###';
ile problemi çözdüm..
Teşekürler Mustafa ve Mege Hocam..
kolay gelsin...

Mustafa Hocam
* Display formatı çalışma anında atayabilirsiniz. Örnek kodlar forumda olması lazım. demişsiniz


...Formu araştırdım çalışma anında display format atamayla ilgili kod bulamadım .. bir örnek kod yazabilirmisiniz veya bunu hangi bileşenin(query,grid) hangi eventına yazacağız (ORT alanı ...

if Combobox2.TEXT='1.UCAYLIK' then
begin
form39.query1.sql.add('Select s1.sicil,s1.tik as OCAK,s2.tik as SUBAT,s3.tik as MART,');
form39.query1.sql.add('((s1.tik+s2.tik+s3.tik)/3) as ORT,stat,adres from kontur s1,astatik');
form39.query1.sql.add('INNER JOIN ucret s2 on(s1.sicil=s2.sicil)');
form39 ...

naile yazdı:hangi vt kullanıyorsunuz? Gerçi hemen hepsinde Round vardır sanırım.

Dbase kullanıyorum ... fonksiyonu query nin Sql inde kullanacağım..

Arkadaşlar oluşturulan sanal alanın formatını sql query sinde belirleyeceğimiz bir yöntem, fonksiyon yok mu???

Query de sql kullanarak alanların toplamını aldırıp başka bir kolonda ortalamasını aldırttığımda ortalama virgülden sonra 12 basamak çıkıyor. Bunu yuvarlatılmış bir basamak şekline Queryde sql kullanarak hangi fonksiyon veya komutla yapabiliriz. ??