+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: ekran klavyesini tüm metin kutularında kullanmak (/konu-ekran-klavyesini-tum-metin-kutularinda-kullanmak.html)
ekran klavyesini tüm metin kutularında kullanmak - zetyu - 06/01/2017
Örnekte ekran klavyesi mevcut.
ekran klavyesini sadece bir metin kutusunda kullanabiliyorum.
istediğim formda ve üzerine tıkladığım aktif olan tüm metin kutularında ekran klavyesini kullanmak için.
hangi kodu kullanmalıyım.
herhangi bir formdan
ve üzerine tıkladığım herhangi bir metin kutusuna
açılan bir formdan veri nasıl gönderebilirim.
ilginize ve cevabınıza teşekkür ederim.
klavye yapım.rar
(Dosya Boyutu: 186,74 KB | İndirme Sayısı: 3)
Cvp: ekran klavyesini tüm metin kutularında kullanmak - ozanakkaya - 06/01/2017
Merhaba,
genel isimli modüle
Global GeciciKontrolAdi, GeciciFormAdi As Stringkodu eklendi,
klavye formundaki select case kaldırıldı, sadece
Forms(GeciciFormAdi)(GeciciKontrolAdi) = Forms(GeciciFormAdi)(GeciciKontrolAdi) & toReturnkodu mevcut.
Cvp: ekran klavyesini tüm metin kutularında kullanmak - zetyu - 06/01/2017
Teşekkür ederim Ozan bey her zamanki gibi hızlı ve kesin sonuç.
Elinize sağlık.
Enter tuşu
bacspace ve
delete tuşu na koyduğum kodların hiç biri ni çalıştıramadaım.
Bu konudada yardımcı olabilirseniz memenun olururm.
Cvp: ekran klavyesini tüm metin kutularında kullanmak - atoz112 - 06/01/2017
sayın zetyu,
EK'te;
bahsettiğiniz talebinize yönelik olarak;
alternatif bir kullanım amacı ile kolaylık sağlaması adına,kullandığımız bilgisayarlarda hali hazırda mevcut olan EKRAN KLAVYESİ (OSK.Exe) uygulamasının geçerli olması ve harici bir Klavye yapmaya gerek olmaksızın kullanılması için hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.
NOT
yine aynı şekilde,denetime ÇİFT TIKLANDIĞINDA olay yordamı ile çalışmaktadır.
bilginize...iyi çalışmalar,saygılar.
Cvp: ekran klavyesini tüm metin kutularında kullanmak - zetyu - 06/01/2017
Ekran klavyesi başlatılamadı uyarısı geliyor.
Cvp: ekran klavyesini tüm metin kutularında kullanmak - ozanakkaya - 06/01/2017
Enter butonunun kodları
Forms(GeciciFormAdi).SetFocus
SendKeys "{ENTER}"
Forms!frmKeyboard.SetFocus
DoCmd.Closebackspace butonunun kodları
If IsNull(Forms(GeciciFormAdi)(GeciciKontrolAdi)) Then Exit Sub
infield = Forms(GeciciFormAdi)(GeciciKontrolAdi)
If Len(infield) = 0 Then Exit Sub
infield = Left(infield, Len(infield) - 1)
Forms(GeciciFormAdi)(GeciciKontrolAdi) = infieldformda delete butonu yok, delete butonu tıklandığında ne olacağını bilmediğim için yorum yapamayacağım.