enterle arama

ecem · Mesaj gönderen **ecem** » 04 Kas 2006 10:41

adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from urun3 where gunes_no=:a2');
adoquery1.Parameters.ParamByName('a2').Value:=edit2.Text;
adoquery1.Open;
slm arkadaşlar yukarıdaki kod butonun onclick olayına yazdım ve gunes_no ya göre arma yapıyor yalnız butona tıklayınca arama oluyo ya ben istiyorum ki entere basınca da arama yapsın nasıl yapabilirim şimdiden ilgilenenler için teşekkürler

Mesaj gönderen **naile** » 04 Kas 2006 10:56

Formumuz bir bilgi hazinesi. Lütfen soru sormadan önce mutlaka arama yapın

Örnet arama:

enter AND arama

İlk aramamdan sonuç elde ettim. Çıkan sonuçlardan biri işinize yarar cinsten:

viewtopic.php?t=8498&highlight=enter+arama

Mesaj gönderen **pro_imaj** » 04 Kas 2006 10:59

Merhaba;

Formun OnKeyDown olayına

Kod: Tümünü seç

if key=vk_Return then
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from urun3 where gunes_no=:a2');
adoquery1.Parameters.ParamByName('a2').Value:=edit2.Text;
adoquery1.Open; 
end;

şeklinde yazarsanız çalışır.

Kolay gelsin.

ecem · Mesaj gönderen **ecem** » 04 Kas 2006 11:08

[Error] Unit1.pas(110): Declaration expected but 'IF' found
[Fatal Error] Project1.dpr(6): Could not compile used unit 'Unit1.pas' bu hataları veriyo
procedure TForm1.Button2Click(Sender: TObject);
if key=#13 then

begin

adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from urun3 where gunes_no=:a2');
adoquery1.Parameters.ParamByName('a2').Value:=edit2.Text;
adoquery1.Open;

end;

if in olduğu kısmı gösteriyo yardımcı olursanız sevinirim

ecem · Mesaj gönderen **ecem** » 04 Kas 2006 11:14

pro_imaj için dediğinizi yaptım çalıştı fakat entere basınca arama yapmıyor

Mesaj gönderen **pro_imaj** » 04 Kas 2006 11:44

ecem yazdı:pro_imaj için dediğinizi yaptım çalıştı fakat entere basınca arama yapmıyor

Hangi olaya yazdığınız acaba?

ecem · Mesaj gönderen **ecem** » 04 Kas 2006 11:48

demişsiniz ya formun on key down olayına yazın oraya yazdım

Mesaj gönderen **pro_imaj** » 04 Kas 2006 11:59

Editin OnKeyDown Olayına yazdığınızdan eminmisiniz?

Emin olmak için

Kod: Tümünü seç

if key=vk_Return then
begin
 Showmessage ('Sorguya başla');

adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from urun3 where gunes_no=:a2');
adoquery1.Parameters.ParamByName('a2').Value:=edit2.Text;
adoquery1.Open;
end;

Mesaj çıkartıp görebilrsin

Saygılarımla.
Kolay gelsin.

Mesaj gönderen **pro_imaj** » 04 Kas 2006 12:00

ecem yazdı:demişsiniz ya formun on key down olayına yazın oraya yazdım

Formun Değil

Editin OnKeyDown Olayına yazacaktınız.

Kolay gelsin.

Mesaj gönderen **rsimsek** » 04 Kas 2006 12:31

Sorunu halen çözemediyseniz şu yöntemi deneyin: Form üzerinde Enter tuşunu algılatmanız için Form'un KeyPreview özelliğini Object Inspector dan True yapmalısınız. Daha sonra Form'un OnKeyDown' una ilgili kodu yazmalısınız. Fakat burada önemli olan nokta madem hem butona basınca hem butondaki & ile başlayan (mesela Bul için Alt+b) ile işlem yapmasını istediğinize göre kod yine buton un OnClick' ine yazılacak. Form'un OnKeyDown'una da ;

Kod: Tümünü seç

if Key = VK_Return then
  btn_BulClick(Self);

şeklinde yazıp butona bastırmış olacaksınız

Daha önce de tekrarladığımız gibi burada önemli bir fark var: Form'un veya herhangi bir nesnenin OnKeyDown olayı tuşa basılı tutulduğunda sürekli tetiklenir. Bu da istenmeyen sonuçlara sebep olabilir. OnKeyDown ve OnKeyPress tuşa bastıkça tetiklendiği halde OnKeyUp tuşu bırakınca bir kez tetiklenir. Gösteriş/estetik açısından bastığınız anda tepki vermemesi sizin için önemli değilse OnKeyUp'ı kullanabilirsiniz