editlerin içindeki değere göre arama

[sarp_halit]

Merhaba arkadaşlar,

ASP, ASP.NET, PHP ve C# ile yaptığım arama işlemini Delphide deneyince açıkta kaldım
özetlemek gerekirse:

bir form üzerinde ( arama formu) 5 tane edit var. bunların doluluklarına göre sorgu kurmak istiyorum. onExit olaylarında global olarak tanımlayacağım sorguyu değiştirebilirim ya da buton basılınca da bu sorguyu oluşturabilirim. Sorun eğer doluysa düzgün çalışması ama ilk önce dolu olup sonra boş olunca hala diğer sorguyu çalıştırması:

ana sorgu

Kod: Tümünü seç

SELECT * FROM TABLO WHERE DEGER IS NOT NULL

eğer edit doluysa bunun sonuna

Kod: Tümünü seç

AND ALAN1=:deger1

aynı şekilde diğer editler için de aynı kontrolü yapıp ona göre ekleme yapacak. eğer editlerde herhangi bir değer yoksa ana sorguyu çalıştıracak.

bunu yukarıda bahsettiğim platformlarda

Kod: Tümünü seç

string sorgu = "SELECT * FROM TABLO WHERE DEGER IS NOT NULL";
if(kutucuk!=null||kutucuk!=""){
sorgu= sorgu + " AND ALAN1=@deger1";
}else if ...

şeklinde yapabiliyorum. bir de kullandığım parametreleri editler doluysa o zaman eklemek istiyorum. bunu nasıl yapabilirim?

[tinekci]

cozum zaten c# cokta farklı degıl arkadasım

function TForm1.SorguDondur: String;
var
Sorgu: String;
Begin
sorgu := "SELECT * FROM TABLO WHERE DEGER IS NOT NULL";

if Edit1.Text<>"" Then Sorgu:=Sorgu+' and ALAN1=@p1';
if Edit2.Text<>"" Then Sorgu:=Sorgu+' and ALAN2=@p2';
if Edit3.Text<>"" Then Sorgu:=Sorgu+' and ALAN3=@p3';
if Edit4.Text<>"" Then Sorgu:=Sorgu+' and ALAN4=@p4';
if Edit5.Text<>"" Then Sorgu:=Sorgu+' and ALAN5=@p5';

result:=Sorgu;
end;


yukarıdakı fonksiyon sana sorgu cumlecıgını dondurur. Ancak Query' ye parametre gonderırıken
gene yukarıdaki gıbı edit leri kontrol etmelısın. yoksa olmayan parametreye deger gonderırsın

[sarp_halit]

çok teşekkür ederim. işime çok yaradı. eline ve emeğine sağlık