enter kontrolu

[mehmet_turecan_cakmak]

S.A.

ilk önce herkese kolay gelsin benim sorum şu formumdaki editler olsun memolar olsun bunların arasında tab tuşuyla geçiş yapıyorum benim istediğim enter tuşuyla geçmek yani enter tuşuna bastığımda hem istediğim hesaplamaları yaptıracam hemde bi alttaki edite veya memoya geçecem yardımlarınızı bekliyorum...

iyi çalışmalar...

[gkimirti]

eger hesaplama yaptıracaksan her kontrolun onkeydown eventina ayrıca kod yazman gerek
ama sadece enter ile gecisleri yapayım diyorsan
bir taslak form olustur
bu formu otocreate listesinden cıkart
pencere ozelligini falan fismanını ayarla
ve keydown olayına asagıdakini yaz
tabi ki keypreview true olacak

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
ifKey = 13 then begin
Key := 0;
Perform(WM_NEXTDLGCTL, 0, 0);
end ;
end ;

kullanacagın formları bundan turet

ben bu taslak form olayını cok sevdim
gercekten kullanımı cok rahat ve her bir form icin ugrasmıyorsun

yeni form eklerken
yeni form dedikten sonra gelen pencerede kendi projenin adındaki tabı secersen
projendeki formları gorursun
buradan bu taslak formu sec bunu kullan
kolay gelsin

[P206]

Merhaba,

perform(wm_nextdlgctl,0,0);
ile Tab order ile ayarladığın sıradaki bileşene geçme işlemini yapabilirsin.
Mesela tüm editlerin onkeydow olaylarını birleştirip bu kodu yazabilirsin.

Kolay Gelsim.

[mehmet_turecan_cakmak]

hocam şu taslak form olayını bana biraz anlatırmısın...pek anlamadımda...

[mehmet_turecan_cakmak]

selamlar...

P206 bu tüm editlerin okeydown olaylarını birleştirme nasıl oluyo bunu bir anlatırmısın birde bu kodu formun okeydown olayına yazsam aynı işi görmezmi...

iyi çalışmalar...

[P206]

Merhaba,

Senin dediğin gibi Fromkeydown a da olur Keypreview i true yarsın
.
if key=13 then perform(wm_nextdlgctl,0,0);
şeklinde olur.

Ama Ben bir sebepten dolayı
Mesela Form da 10 adet Edit im var. Sadece bunların 7 sinde entere basılınca next yapmasını istemiştim.
orada edit1 in onkeydown una bu kodu yazdım. istediğim Editlerinde onkeydownlarını edit1keydown yaptım.

Yani her türlü yolla olur sadece senin nasıl kullanacağın önemli.

Kolay Gelsin.

[mehmet_turecan_cakmak]

yardımcı olduğun için teşekkürler P206 çok saol

[Berdem]

Merhaba
süregen bir enter işlemi yapmak istiyorsunuz.Önce edit1 sonra edit2 sonra butona sonra da tekrar edit1 yapmak istiyorum.Bunu nasıl yapabilirim yardımcı olursanız çok sevinirim.

[P206]

Merhaba ,

Şimdi aklıma gelen bir yöntem denemedim ama.
editleri 1 ,2,3,4,5 diye ekle butonu da ekle.
editlerin onkeydown unu edit1keydown yap.
bu olaya
if key=13 then perform(wm_nextdlgctl,0,0);
yaz.
ondan sonra buttonun click olayına
edit1.setfocus
ekle en sonuna. bu seni edit1 e yollayacaktır.
böylece edit1 den her enterla sırayla gidip buttondan sonra edit1 e geleceksin

Kolay gelsin.