tarihe göre arama???

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
deox
Üye
Mesajlar: 4
Kayıt: 03 Tem 2007 08:22

tarihe göre arama???

Mesaj gönderen deox »

arkadaslar ıkı tarıh arası ve verılen tarıhe gore aramayı nasıl yapabılırım???yardımcı olursanız sevınırım.. :roll:
Kullanıcı avatarı
mudipasa
Üye
Mesajlar: 169
Kayıt: 13 Tem 2004 02:25
Konum: Batman

Mesaj gönderen mudipasa »

sayın deox kardeşim. ben denedim oldu.

procedure TForm1.Button1Click(Sender: TObject);
begin
Table1.First;
if Table1.Locate('TARIH',cxDateEdit1.Date,[]) then
ShowMessage('Kayıt Bulundu');
end;

iyi çalışmalar
deox
Üye
Mesajlar: 4
Kayıt: 03 Tem 2007 08:22

Mesaj gönderen deox »

mudipasa yazdı:sayın deox kardeşim. ben denedim oldu.

procedure TForm1.Button1Click(Sender: TObject);
begin
Table1.First;
if Table1.Locate('TARIH',cxDateEdit1.Date,[]) then
ShowMessage('Kayıt Bulundu');
end;

iyi çalışmalar

procedure TForm1.Button1Click(Sender: TObject);
begin
Table1.First;
if Table1.Locate('TARIH',edit1.text,[]) then
ShowMessage('Kayıt Bulundu');
end;


hocam bunu ben sonuc alamadım...ve ben bunun yanında ıkı tarıh arası arama yapmak ıstıorum...yınede ılgınız ıcın saolun..birde DateEdit1 hangi companentta bulunuyor..???
Kullanıcı avatarı
ikurt07
Üye
Mesajlar: 120
Kayıt: 11 Kas 2005 04:21
Konum: Antalya
İletişim:

Selamlar

Mesaj gönderen ikurt07 »

var
T1,T2 : TDateTime;

with FMyAdoQ do begin
SQL.Text := 'SELECT * FROM TABLO WHERE Tarih>=:T1 AND Tarih<=:T2';
Parameters.ParamByName('T1').Value := T1;
Parameters.ParamByName('T2').Value := T2;
Open;
end;
Cevapla