1 Konuyu açan ugurlu2001

  • ugurlu2001
  • ugurlu2001
  • Uzman Üye
  • Offline
  • Yer: Istanbul
  • Kayıt Tarihi: 11.10.2006
  • İleti: 1,642

Konu: ON KEY LABEL ESC ile bir formu kapatmak.

Uzun bir aradan sonra herkese Merhaba diyorum.

Son dönemde oldukça yoğun bir tempo içindeyim. Bu yüzden sadece Forum a girip hızlıca ne var ne yok bir göz gezdirebiliyorum. 

Sizlere belki çok kolay gelicek ama bir forum un içindeyken ESC tuşuna basıldığında o form otomatik olarak kapansın istiyorum. Ne yapmalıyım?

Yardımlar için şimdiden çok teşekkürler.

Uğur
-------------------------------------------------------------------------------------------------------------
Hayat bir bisiklete binmek gibidir. Pedalı çevirmeye devam ettiğiniz sürece düşmezsiniz. Claude Peppeer
Kusuru söylenmeyen adam, ayıbını hüner sanır.  Türk Atasözü

2 Cevaplayan mrduyar

  • mrduyar
  • mrduyar
  • Uzman Üye
  • Offline
  • Yer: Antalya
  • Kayıt Tarihi: 09.10.2006
  • İleti: 620

Re: ON KEY LABEL ESC ile bir formu kapatmak.

selamlar;

Form.KeyPreview = .T.

Form.Keypress ine
lparameters nKeyCode, nShiftAltCtrl
if nkeycode=27 &&esc
thisform.release
endif
if nkeycode=13 &&enter
endif
sanırım işini görür

Bilmediğin Neyse Yanıldığındır.

3 Cevaplayan ugurlu2001

  • ugurlu2001
  • ugurlu2001
  • Uzman Üye
  • Offline
  • Yer: Istanbul
  • Kayıt Tarihi: 11.10.2006
  • İleti: 1,642

Re: ON KEY LABEL ESC ile bir formu kapatmak.

Çok teşekkür ediyorum. İşimi gayet güzel gördü.

Uğur
-------------------------------------------------------------------------------------------------------------
Hayat bir bisiklete binmek gibidir. Pedalı çevirmeye devam ettiğiniz sürece düşmezsiniz. Claude Peppeer
Kusuru söylenmeyen adam, ayıbını hüner sanır.  Türk Atasözü

4 Cevaplayan taRKan

  • taRKan
  • taRKan
  • Uzman Üye
  • Offline
  • Yer: Ankara
  • Kayıt Tarihi: 12.10.2006
  • İleti: 367

Re: ON KEY LABEL ESC ile bir formu kapatmak.

Benim tercihim şöyle.
Kapat isminde bir düğme koyuyorum bu düğmenin Cancel property'si .T. ESC tuşuna basınca bu düğme çalışıyor düğmenin Clic Event'inde kabaca ThisForm.Release var

/o---------------------o\
     www.haser.com
\o---------------------o/

taRKan's Website