Delphi Forum

Hakan Can

Şuna benzer bir SQL cümlesi kullanabilirsin:

SELECT
  T1.*
FROM
 (
  SELECT
    FIRST 10 *
  FROM NET_MIKTAR
  ORDER BY MAYIS DESC
 ) T1
UNION ALL
SELECT
  T1.*
FROM
 (
  SELECT
    FIRST 10 *
  FROM NET_MIKTAR
  ORDER BY MAYIS ASC
 ) T1

Hakan Can

Şahsen ben böyle bir ihtiyacı en kestirmeden SQL ile hallederdim.

Basit bir SQL komutu bu işlemlerin sonucunu döndürür. Misal:

SELECT 2*3+5*3/3-3+1 AS SONUC FROM RDB$DATABASE //FireBird için sonuç 9 çıkıyor.

SELECT 2*3+5*3/3-3+1 AS SONUC // MS SQL için de sonuç 9 çıkıyor.

Ne özel bir komponent ...

Hakan Can

Şuna benzer bir SQL komutu kullanabilirsin:

Kod: Tümünü seç

ALTER TABLE SIPARISLER ADD CONSTRAINT FK_SIPARISLER_URUN_KODU FOREIGN KEY (URUN_KODU) REFERENCES URUN (URUN_KODU) ON UPDATE CASCADE ON DELETE CASCADE;

Hakan Can

Bildiğim iki tane ana yöntem var mizan raporunu alabilmek için.

Bir tanesi Hesap Planına triggerlarla BORC, ALACAK bilgilerini yazmak. Bu mizan raporunun tabloda direk gözükmesi anlamına geliyor. Triggerlarda verdiğim örnekteki LIKE komutunu kullanarak UPDATE-INSERT edebilirsin.

Diğeri ise şu an ...

Hakan Can

NOT EXISTS şeklinde sorguyu yapmak gerekiyor:

Kod: Tümünü seç

SELECT
  T1.IDNO,
  T1.ADI,
  T1.SOYADI
FROM MASTER T1
WHERE NOT EXISTS (SELECT T2.IDNO FROM DETAIL T2 WHERE T2.IDNO = T1.IDNO AND T2.YILI = 2008)

Hakan Can

WHERE şartında LIKE komutunu kullanırsan hızlanabilir:

Kod: Tümünü seç

WHERE f.hesapkodu LIKE h.hesapkodu || '%'

gibi.

Hakan Can

OnCalcFiels eventi ile ilgili araştırma yapman daha uygun olur. cxGrid içinde çözmek çok daha kompleks.

Yapman gereken hangi DataSet componenti kullanıyorsan (TTable, TSQLQuery, TIBTable, TSimpleDataSet,.. vs.) ona bir tane Calculated Field (mesela TUTAR) ilave etmek. Bilahare o DataSet'in ...

Hakan Can

PRIMARY KEY ve TRIGGER performansı düşürür. En azından TRIGGER'ı iptal edip o işlemi Excel dosyasında yapman daha uygun olur.

PRIMARY KEY tablo büyüdükçe INSERT süresini artıracaktır zorunlu olarak. Ama olması da gerekiyor.

Test amaçlı her ikisi için iptal edip (hem teker teker hem ikisini de ...

Hakan Can

NUMBER(4) dediğinde 4 duyarlıklı anlamına geliyor. Yani 4 karakter. FireBird'de zaten bu şekilde tanımlama yapmak mümkün değil. Length 4, Integer yani -2 milyar küsür ile +2 milyar küsür arası sayı anlamına geliyor. NUMBER(10) ancak karşılık gelebilir.

Oracle'ın 38 duyarlılık (harf) yaklaşımı ...

Hakan Can

FireBird'ün external dosyaları TABLE olarak kullanma özelliği var. Yani Text dosyasını tablo gibi kullanabiliyorsunuz.

CREATE TABLE table [EXTERNAL [FILE] 'filespec']..

diye araştırıp detaylı bilgi sahibi olabilirsiniz.

Aynı şekilde MS SQL Server'ın tablolarını aynı formatta kaydetmek gerekiyor ...

Hakan Can

"SELECT * FROM CARI" komutuna cevap vermiyorsa yani yine benzer hata mesajı veriyorsa tahminim tablo adı ile ilgili bir sorun olabilir. "ı" "I" harflerinde büyük küçük farklı algılayabiliyor SQL Server.

SQL Server Management Studio'dan tablo adını kontrol edebilirsen zaten sorununun çözümü ...

Hakan Can

Şu örnekte çözüm olabilir:

procedure TForm1.Button1Click(Sender: TObject);
var
Ws: WideString;
begin
Ws := Edit1.Text + 'A';
case string(Ws)[1] of
'A': ShowMessage('A Bildiniz...');
'B': ShowMessage('B Bildiniz...');
'C': ShowMessage('C Bildiniz...');
else
ShowMessage('Tutmadı...');
end ...

Hakan Can

String bir değişkeni Char bir değişkene atamak için:

Ch := St[1];

diyebilirsin. Ama St değişkeninin en az bir karakter olması gerekiyor. Garanti olsun diye:

St := St + 'X';
Ch := St[1];

diyebilirsin.

Maksadın "Case Of" ile kullanmak ise direk string değişkeni bu şekilde kullanabilirsin:

case ...

Hakan Can

İlla direk SQL cümlesi ile yapmak istiyorsan şuna benzer bir SQL cümlesi kullanabilirsin:

SELECT
SUM(DEGER) AS DEGER
FROM TABLO
WHERE SUBSTRING(DEGER FROM 1 FOR 1) IN ('1', '2', '3', '4', '5', '6', '7', '8', '9') AND
SUBSTRING(DEGER FROM 2 FOR 1) IN ('1', '2', '3', '4', '5', '6', '7', '8', '9 ...

Hakan Can

Şöyle bir SQL cümlesi daha garanti gibi:

Kod: Tümünü seç

SELECT
  FIRST 20 T1.*
FROM
 (SELECT * FROM TBL_MUSTERI ORDER BY IDNO DESC) T1

Delphi Forum

623 uygun sonuç bulundu

Re: select first and skip ile belli sayida order desc yapma

Re: (2*3) değerini nasıL hesaplatıcam.. :oops: :)

Re: Sql Foreign Key Kodları nedir?**Önemli projem eksik kaldı

Re: Firebird sorgu hiz sorunu

Re: SQL Kodu ?

Re: Firebird sorgu hiz sorunu

Re: CxGrid'de fatura satırı hesaplama

Re: Firebird 349051 kaıt ekleme tecrubesi

Re: ORA-01438:value larger than specified precision allowed ...

Re: ETA V8 SQL & FİREBİRD veri aktarımı

Re: Sql'den table silme

Re: String değeri Char tipine çevirmek

Re: String değeri Char tipine çevirmek

Re: Select de sadece sayısal ifadeler gelsin.

Re: Order By, Sum, First Ve Skip