Şimdi foruma bir adet edit1 ve bir adet edit2 ekledim.
Burda edit1 in sağında ... şeklinde üç nokta işareti nasıl koyabilirim.
Koyduktan sonra buna basınca veya F6 tuşuna basınca
bu şekide
KAYIT ARAMA EKRANI
FİLTRE FİLTRE
ADI KODU
ALİ MEHMET 1002
HÜSEYİN AKBAŞ 1003
MEHMET ALİ DUMAN 1004
KAZIM AKYILDIZ 1005
HİKMEK DİK 1006
bu şekilde bir kayıt ekranı nasıl yapabilirim ve getirebilirim. Bu kayıt arama ekranından istediğim ismi seçincede adı kısmında yazan değer edit1 e kodu kısmında yazan değerde edit2 ye nasıl alabilirim.
örnek olması için jpg olarak da ekledim.
Teşekkürler.
Kayıt arama ekranı
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
-
- Üye
- Mesajlar: 93
- Kayıt: 01 Eki 2008 07:04
Kayıt arama ekranı
- Dosya ekleri
-
- kayıt arama.rar
- Yukarıdaki sorunun jpg olarak gösterilmiş hali.
- (30.56 KiB) 108 kere indirildi
Re: Kayıt arama ekranı
1. sorunun cevabı jedi bileşenlerinden jvbuttonedit ile yapabilirsin.
2. sorunun cevabı kullandığın veritabanına göre değişir. ancak forumda arattırırsan istemediğin kadar döküman bulabilirsin.
2. sorunun cevabı kullandığın veritabanına göre değişir. ancak forumda arattırırsan istemediğin kadar döküman bulabilirsin.
-
- Üye
- Mesajlar: 93
- Kayıt: 01 Eki 2008 07:04
Re: Kayıt arama ekranı
Burda sql server 2000 kullanıyorum. araştırdım ama mantığını yapadım bir ipucu gösterirseniz sevinirim.Lost Soul yazdı:1. sorunun cevabı jedi bileşenlerinden jvbuttonedit ile yapabilirsin.
2. sorunun cevabı kullandığın veritabanına göre değişir. ancak forumda arattırırsan istemediğin kadar döküman bulabilirsin.
Teşekkürler
Re: Kayıt arama ekranı
a_self_lion yazdı: Burda sql server 2000 kullanıyorum. araştırdım ama mantığını yapadım bir ipucu gösterirseniz sevinirim.
Teşekkürler
bu linkte birden fazla alana göre arama yapma için örnek var.
formuna koyacağın bir query ile bu örneğin uygulayabilirsin.
Re: Kayıt arama ekranı
hangi tarafını istiyorsun ıb konsul u mu ?= SQl tarafınımı
ib consul de wiew yazabilirsin
procedure yazabilirsin
triger yazabilirsin
daha da özelliklerini kullanabilirsin ?????
ib consul de wiew yazabilirsin
procedure yazabilirsin
triger yazabilirsin
daha da özelliklerini kullanabilirsin ?????
-
- Üye
- Mesajlar: 93
- Kayıt: 01 Eki 2008 07:04
Re: Kayıt arama ekranı
sql tarafını bunu nasıl yapabilirim. formda yani F6 ya basınca bir girid veya listbox açılsın üstteki edit den ve grid in Adı alanında ben melsela MEHMET yazınca yazarken veya yazdıktan sonra MEHMET ve MEHTAP gibi kayıtlar alt alta sıralanması mümkün mü? Ve üzerine gelince aktif olan bilgileritesisatçı yazdı:hangi tarafını istiyorsun ıb konsul u mu ?= SQl tarafınımı
ib consul de wiew yazabilirsin
procedure yazabilirsin
triger yazabilirsin
daha da özelliklerini kullanabilirsin ?????
edit1 e edit2 edit3 ... gelsin istiyorum. Ama nasıl yapacağımı bulamadım.
Re: Kayıt arama ekranı
object inspectorden formun KeyPreview = true yapınız.formda yani F6 ya basınca
bir dbgrid ve listbox koyunuz forma ve visible özelliklerini false yapınız.
sonra formun OnKeyDown olayına şunları yazınız. f6 tuşuna basınca listbox ve dbgrid görünür olacak.
Kod: Tümünü seç
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key = vk_F6 then
begin
dbgrid1.visible := true;
listbox1.visible := true;
end;
end;
mükündür.Adı alanında ben melsela MEHMET yazınca yazarken veya yazdıktan sonra MEHMET ve MEHTAP gibi kayıtlar alt alta sıralanması mümkün mü?
bir tane edit1 ekleyin forma ve onchange olayını şunları yazınız. tabi bu kodları kullandığınız veritabanına göre uyarlamanız lazım. ben temel olanı size yazayım.
Kod: Tümünü seç
query1.close;
query1.sql.clear;
query1.sql.add('select * from tablonuzun_adı');
query1.sql.add('where alan_adı LIKE '''+edit1.text+'%''');
query1.open;
buda mümkün. şöyle yapabilirsiniz. dbgridin onMouseDown yordamına şu kodları yazabilirsiniz.Ve üzerine gelince aktif olan bilgileri edit1 e edit2 edit3
Kod: Tümünü seç
edit2.text := query1.FieldByName('alan_adı_1').asstring;
edit3.text := query1.FieldByName('alan_adı_2').asstring;
sizin bunları kendinize uyarlamanız lazım.
iyi çalışmalar.