Delphi Forum

tears

select PERNO,MAKNO,TARİH,SUM(TOPLAMBEKLEME) AS TOPLAM from
BEKLEMELER where MAKNO='B203' and TARİH>=:T1 AND TARİH<=T2
group by PERNO

Şöyle Yapsan :

select PERNO,MAKNO,TARİH,SUM(TOPLAMBEKLEME) AS TOPLAM,BEKLEMENEDENI from
BEKLEMELER where MAKNO='B203' and TARİH>=:T1 AND TARİH<=T2
group by ...

tears

merhaba,

SELECT
Stok_kodu, Stok_Aciklama,
(CASE WHEN Fisturu = 1 THEN Sum(Miktar) ELSE 0 END) AS Miktar,
(CASE WHEN Fisturu = 2 THEN Sum(Tutar) ELSE 0 END) AS Tutar
FROM StokHareket
GROUP BY Stok_kodu, Stok_Aciklama

Kusura bakmayın yoğunluktan biraz geç oldu ama.
Bunu kullanın. :D ...

tears

bende mege hocamın önerisini sunacaktım ama o benden hızlı çıktı.

Ado ile bağlantı yaparken sadece read olarak açmak!!!

kolay gelsin.

tears

Acaba bi şey sorabilirmiyim?

cd yi alan kullanıcılar bu programa veri girip çıkacaklar mı? yani veri kaydı yapılacak mı? yoksa seadece izleme amaçlı mı?

Kolay gelsin.

tears

MSSQL serverda case diye bi komut var onu kullanırsan satırları çok kolay bi şekilde sütun yapabilirsin. if olayına hiç girmeden.

Kolay gelsin...

tears

Merhaba,

1- Elimde bu tarz sayılardan oluşan 60 sütun 400 satırdan oluşan bi veri var.
Bunlar çok hassas sayılardan oluşan bi text dosyası. Bundaki sayıları teker teker alıp bi diziye atmam gerekli. Ama strtodouble gibi bi fonksiyon yok anladığım kadarıyla. Ayrıca bunu string olarak almadan ...

tears

Kod: Tümünü seç

 var
 asd : array of array of integer;
  i, j :integer;
begin
  SetLength(asd, 10);
  SetLength(asd[3], 10);
  i:= 3;
  j:= 3;
  asd[i,j] := 5;
  showmessage('deneme');

böyle yapınca düzeldi mege hocam. saolasın bu dinamik dizi olayını biraz açarmısın acaba?

tears

Bunun nedeni veritabanı cd de çalışmaz. çünkü Read Only dir.

Bunu bir setup hazırlayarak ve bu setupla veritabanı ve exe yi harddiske atıp oradan çalıştırırsanız problem kalmaz sanıyorum...

Kolay Gelsin.

tears

Kod: Tümünü seç

 var
 asd : array of array of integer;
  i, j :integer;
begin
  SetLength(asd, 10);
  i:= 3;
  j:= 3;
  asd[i,j] := 5;
  showmessage('deneme');
end;

buda benim yazdığım kod hatayı

Kod: Tümünü seç

asd[i,j]:=5;

satırında veriyor.

tears

merhaba

delphinin dinamik dizi helpinde aşağıdaki kod var.

var
A : array of array of string;
I, J : Integer;
begin
SetLength(A, 10);
for I := Low(A) to High(A) do
begin
SetLength(A[I], I);
for J := Low(A[I]) to High(A[I]) do
A[I,J] := IntToStr(I) + ',' + IntToStr(J) + ' ';
end;
end ...

tears

dinamik bir treeview oluşturmaya çalışıyorum. tablosu gayet basit.
FolderID FolderName ParentID

Kullanıcı yeni klasör dediği zaman seçili olan klasörü bulup onun altına ad kısmı boş olan yeni bir klasör açmak istiyorum. Klasör adını kullanıcı girdikten sonra yazmam gereken parentID yi nasıl ...

tears

ben mssql server.

yukarısını iyi okumadığım için oldu galiba.

özür dilerim...

tears

SELECT
mkodu,
SUM(Atipinden) AS Atipinden,
SUM(Btipinden) AS Btipinden,
SUM(Ctipinden) AS Ctipinden
FROM
(
SELECT
mkodu,
(CASE WHEN odemetipi = 'A' THEN SUM(tutar)END) AS Atipinden,
(CASE WHEN odemetipi = 'B' THEN SUM(tutar)END) AS Btipinden,
(CASE WHEN odemetipi = 'C' THEN SUM ...

tears

Kod: Tümünü seç

SELECT mkodu,
        (CASE WHEN odemetipi = A THEN SUM(tutar)END) AS Atipinden,
        (CASE WHEN odemetipi = B THEN SUM(tutar)END) AS Btipinden,
        (CASE WHEN odemetipi = C THEN SUM(tutar)END) AS Ctipinden
FROM odeme
GROUP BY mkodu

denersen sanırım olmalı...

kolay gelsin...

tears

İlginiz için teşekkürler.

deneyip size haber veririm.

Delphi Forum

46 uygun sonuç bulundu

double değişkeninin kullanımı

dinamik diziler

treeview create