Hi, Saya juga baru saja mengalami masalah yang sama, yaitu ingin
dapat mentrap penekanan tombol pada MDI Form. Saya inginnya agar
dapat mengetahui status dari tombol caps lock, nums lock,dll pada
saat pengguna menekan tombol tersebut, apakah tombol 2 tersebut aktif
atau tidak dan menuliskannya di status bar.
Namun sayangnya MDI Form tidak akan bisa membaca penekanan tombol
pada event OnKeyDown, OnKeyPress,atau OnKeyUp meski property
KeyPreview telah diaktifkan. Untuk penjelasan lebih lanjut dapat anda
lihat pada
http://groups.google.com/groups?
q=delphi+keypreview+on+mdi+form&start=20&hl=en&lr=&ie=UTF-8&oe=UTF-
8&edition=us&selm=VA.00006425.00ea7f77%
40antispam.compuserve.com&rnum=27
untuk Mengatasi masalah shortcut, bisa dengan anda membuat menu yang
memiliki shortcut, maka otomatis akan dipanggil menu tersebut. Atau
dengan membuat event OnShortCut pada form MDI. Contohnya sebagai
berikut:
procedure TForm1.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
var
ShiftState: TShiftState;
begin
ShiftState := KeyDataToShiftState(Msg.KeyData);
if (ssAlt in ShiftState ) and (Msg.CharCode = ord('S')) then
ShowMessage('Simpan');
end;
Semoga membantu
--- In [EMAIL PROTECTED], "Yohanes Kurniadi"
<[EMAIL PROTECTED]> wrote:
> Thanks buat replynya.
>
> Maksud saya adalah, mentrap keydownnya pada Main MDI Form (Main
form),
> dimana kondisi Main MDI Form tersebut tidak ada Child sama sekali.
> Jadi misalnya menekan key 'Alt-S' maka akan muncul Child1.
> Jadi mentrap keydownnya pada Main MDI Form, bukan pada MDIChild.
>
> Thanks,
> Yohanes
>
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Rent DVDs from home.
Over 14,500 titles. Free Shipping
& No Late Fees. Try Netflix for FREE!
http://us.click.yahoo.com/ArdFIC/hP.FAA/3jkFAA/i7folB/TM
---------------------------------------------------------------------~->
Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/