tab tuşunu neden yakalanmıyor...

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
uğur alkan
Üye
Mesajlar: 227
Kayıt: 29 Ağu 2004 04:49
Konum: Istanbul

tab tuşunu neden yakalanmıyor...

Mesaj gönderen uğur alkan »

Amacım butonlar üzerinde tab tuşuyla gezerken her butona ait resmide yan tarafta gösterebilmek...

diğer bütün tuşlarla oluyor ama TAB tuşuyla bu iş olmuyor...



procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
var
domates:integer;
begin
domates:=0;
if key=chr(vk_tab) then
begin
domates:=domates+1;
end;

if domates>10 then
begin
domates:=0;
end;

if domates=1 then
image1.picture.LoadFromFile('c:\xxxx.bmp');
end;
end.


kod bu....

hatam nerede acaba...
acaba taborder'i direkt kullanabilirmiyim ???
:oops:
Bazen sert rüzgarlar eser başını öne eğmekten asla korkma

Kullanıcı avatarı
mepc
Üye
Mesajlar: 184
Kayıt: 26 Eyl 2003 11:39
Konum: Ankara

Mesaj gönderen mepc »

Bu konuyu bayağı bi tartıştık bir kaç gün önce

Yanlış hatırlamıyorsam Tab tuşunu formun keyup olayında yakalayabilirsin.
Bilgi paylaşıldıkça güzeldir.

yusuf simsek
Üye
Mesajlar: 325
Kayıt: 09 Mar 2004 11:18
Konum: Konya
İletişim:

Mesaj gönderen yusuf simsek »

viewtopic.php?t=4779

kolay gelsin...

dostum aynı sorunu ben de yaşadım...

sağolsun üstadlar çözümü buldu...linki incele bi istersen..
Bugün bir kez daha,
Hiç Birşey Bilmediğimi Öğrendim!!!

https://extrayazilim.com

Kullanıcı avatarı
uğur alkan
Üye
Mesajlar: 227
Kayıt: 29 Ağu 2004 04:49
Konum: Istanbul

Mesaj gönderen uğur alkan »

tab tuşunu ipptal etmek istemiyorum çünkü butonların üzerinde bu tuşla gezmeye mecburum...

taborder'i kullanmak mümkünmü acaba ...?
Bazen sert rüzgarlar eser başını öne eğmekten asla korkma

Kullanıcı avatarı
gkimirti
Admin
Mesajlar: 1956
Kayıt: 02 Eyl 2003 04:44
Konum: İstanbul

Mesaj gönderen gkimirti »

amacın butona odaklanınca yanında baska bir image icinde resmi gostermekse
butonun onenter olayını kullanabilirsin
ÜŞENME,ERTELEME,VAZGEÇME
Oğlum Yusuf'un yeni oyunu :mrgreen: Google Play üzerinde
Linear Minimalist Puzzle ve Smash Drift
👉 https://goo.gl/8S31tD 👈
👉 http://bit.ly/2OJos6P 👈

Kullanıcı avatarı
uğur alkan
Üye
Mesajlar: 227
Kayıt: 29 Ağu 2004 04:49
Konum: Istanbul

Mesaj gönderen uğur alkan »

gkimirti arkadaşım çok sagol teşekkür ederim işimi çok kolaylaştırdın...
Bazen sert rüzgarlar eser başını öne eğmekten asla korkma

Cevapla