Delphi Forum

Hayırlı günler. Yaptığım uygulamada Edit1Change ile kayıtları görmek istiyorum.

Bunu yapmanızı önermem. O kadar yoğun veritabanı sorgusu yerine ara butonu gibi bir buton tıklama ile arama yapması daha sağlıklı olacaktır.

Hatanız SQL komutuna ADD() kullanarak ekleme yapmak. Ancak siz her ...

Hayırlı günler. Yaptığım uygulamada Edit1Change ile kayıtları görmek istiyorum.
Delphi XE7 kullanıyorum.

ADOQuery1 SQL ine

SELECT ID, A1, A2,
CONCAT (A1, A2) AS ARA
FROM KAYITLAR
ORDER BY ID DESC

yazarak formda kayıtlarımı görüntülüyorum. ancak "ARA" sütununun içerisinde içeren bir kelime ...

https://learn.microsoft.com/en-us/sql/t-sql/functions/getdate-transact-sql?view=sql-server-ver16


procedure TForm3.Button1Click(Sender: TObject);
begin
ADOQuery2.Filter:=('SELECT * FROM HTF_KAYITLAR WHERE A21 = GETDATE()');
ADOQuery2.Filtered:=true;
end;

işin içine saat te girdiği için boş ...

Merhaba,

Filter ile değil SQL ile yapmanız daha sağlıklı olacaktır.
Filtreleme için aşağıdaki şekilde deneyebilirsiniz. Sistemin tarih formatına göre FormatDateTime için düzenleme gerekebilir.

procedure TForm3.Button1Click(Sender: TObject);
begin
ADOQuery2.Filtered := False;
ADOQuery2.Filter ...

Hayırlı günler. Delphi XE7 kullanıyorum. Yaptığım uygulamada butona basınca bu gün yaptığım kayıtları görmek istiyorum.
A21 Sütunu tabloda DateTime tanımlı. Aşağıdaki kod ile yapmaya çalışıyorum. Program çalışınca
hata vermiyor ama butona basınca bu günkü kayıtlarıda göstermiyor. Açaba nerede ...

SELECT
T1.YIL,
T1.SIRA,
T1.STOK,
T1.ADRES,
T2.SIPARIS_NU,
CASE
WHEN T2.SIPARIS_NU LIKE '%K%' THEN 365
WHEN T2.SIPARIS_NU LIKE '%M%' THEN 730
ELSE 0
END AS GARANTI_SURE,
T2.GARANTI_BAS_TA,
DATEADD(DAY,
CASE
WHEN T2.SIPARIS_NU LIKE '%K%' THEN 365
WHEN T2.SIPARIS_NU LIKE '%M ...

SQL Server 2012’de veri tabanım ve XE7 kullanıyorum. Benim yapmak istediğim kısaca şöyle. 2 Tane tablom var.
TABLO1 = YIL, SIRA, STOK, ADRES
TABLO2 = YIL, SIRA, STOK, SİPARİŞ_NU, GARANTI_BAS_TA
Aşağıdaki sorgu ile YIL. SIRA, STOK, ADRES, SIPARIS_NU, GARANTİ_SURE, GARANTI_BAS_TA, GARANTI_BITIS_TA ...

SQL Server 2012’de veri tabanım ve XE7 kullanıyorum. Benim yapmak istediğim kısaca şöyle. 2 Tane tablom var.
TABLO1 = YIL, SIRA, STOK, ADRES
TABLO2 = YIL, SIRA, STOK, SİPARİŞ_NU, GARANTI_BAS_TA

Tablo ve Sütunlarım var. Bu tablolar ile tek bir sorguda;
1_ İki tabloda da YIL ve SIRA aynı ...

SQL Server 2012’de veri tabanım ve XE7 kullanıyorum. Benim yapmak istediğim kısaca şöyle. 2 Tane tablom var.
TABLO1 = YIL, SIRA, STOK, ADRES
TABLO2 = YIL, SIRA, STOK, SİPARİŞ_NU, GARANTI_BAS_TA

Tablo ve Sütunlarım var. Bu tablolar ile tek bir sorguda;
1_ İki tabloda da YIL ve SIRA aynı olanları ...

select KAYITLAR.ID, A1, A2, SOZLESME.S2, S3, S14
from KAYITLAR
INNER JOIN SOZLESME ON KAYITLAR.A1 = SOZLESME.S1

SQL string inin düzenli yazmanı öneririm. A1, A2 hangi tablonın? başında alias yada tablo isimleri yok. ayrıca formatlı şekilde yazarsan hatayı bulman dahada kolay olacaktır.
"ON ...

join'lerde kartezyen çarpım yapar. Burada Kayıtlar tablosunda A1 alanı, Sözleşme tablosundaki S1 alanına eşit olan tüm kayıtları eşleştirip, getirir.

Tabloların içeriğini bilmeden yorum yapmak zor ancak bu tarz durumlarda, en güzeli gelen kayıtlara bakıp, hangisini 1istemiyorsanız elemektir ...

Hayırlı günler. KAYITLAR ve SOZLESME isimli iki tane tablom var.
Bunları birleştirip çalıştırdığımda sorguda istediğim kayıtları değilde kayıtları tekrarlayarak astronomik fazla kayıt gösteriyor.
Sorgumdamı bir yanlışlık var veya tablolarımı hatalı oluşturdum acaba anlayanadım. Tablolarımı SQL ...

Hayırlı günler diliyorum.
Ben form1 de kayıt ekliyor ve butona basınca yaptığım kaydı Rave rapor ile görüntülüyorum.
Form1 in açılması özelliğine yeni kayıt olarak ayarlı ve form açılınca elitleri dolduruyorum. Rapor açınca ise form1 yeni açılmış gibi kayıt ekleme sayfası gibi editler boş oluyor ...

ertank yazdı: 25 Şub 2025 04:40 Merhaba,

Filtreyi açtıktan sonra

Kod: Tümünü seç

if ADOQuery_Garanti.RecordCount > 0 then
begin
...
end;

Şeklinde bir kontrol ekleyebilirsiniz.

Teşekkür ediyorum hocam

Hayırlı günler formda stok ve seri numarası grince daha önce gelip gelmediğini görüyorum ve
aşağıdaki kod ile geliş tarihini ve garanti bitiş tarihini karşılaştırıp E13'e 'GARANTİSİ DEVAM EDİYOR'
veya '-' yazdırıyorum.
Hataya sebep olan ise stok ve seri girince daha önce gelmemiş ise kayıt ...