FormKeyDown sorunu ??

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
Shou
Üye
Mesajlar: 260
Kayıt: 26 Ağu 2011 02:00

FormKeyDown sorunu ??

Mesaj gönderen Shou »

Merhabalar benim 2 tane form var ilk form açılıyor güncelleme kontrol ediyor sonraki form açıyor şöyle bir sorunum var

2 ci form da formkeydown olayı şöyle yaptım :

Kod: Tümünü seç

procedure TFormGuncelleme2.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin if ((ssAlt in Shift) and (key=VK_F4)) then key:=0; // (F4)
Application.MessageBox(PChar('Lütfen 2 kapat tuşunu kullanınız..'),
PChar('G-Defender : [Anti-Hile]'), MB_OK); end;
Keyprewiew : true yaptım form da. fakat bu kod ilk açışta çalışıyor sonraki form geçtiginde çalışmıyor ama 2 form'dada kodlar ekli neden böyle yapıyor yada formkeydown olmadan başka türlü nasıl alt + f4 engelleyebilirim, şimdiden teşekkürler..
Cevapla