کمک در مورد کدهای کیبورد مثل enter ,...

[babak869]

با سلام
من کدهای کلیدهای کیبورد رو احتیاج دارم کسی میتونه به من کمک کنه.
مثلا میدونم که کد کلید Enter برابر #13 است.بقیه کدهارو می خوام
متشکرم

[MSK]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
edit1.Clear;
edit1.Text:=' = #'+inttostr(ord(key));
end;

یه edit بزار توی فرمت و این کد رو براش بنویس.
حالا هر کلیدی فشار بدی واسط کدش رو می نویسه!

[Delphi_Developer]

سلام - - - من قبلا برای کار خودم یه برنامه نوشتم که این کدها رو می داد البته همین کدی که آقای MSK هم گذاشته همین کارو میکنه اما گفتم یه کمکی کرده باشم .

[maisam_ok]

با سلام:
من فکر میکنم ساده ترین راه اینکه در رویداد keydown هر کمپونت از کد زیر استفاده کنی


key=vk_نام کلید

مثلا


key=vk_return
key=vk_up
key=vk_delete
key=vk_escape
key=vk_tab

مخلص شما میثم ثوامری
:mrgreen:

[babak869]

دستتون درد نکنه من مشکلم حل شد.از همگی متشکرم
:flower: