كيف.......

مغلق

بدأه ANTR في 14 أغسطس 2005 · 3 رد · 592 مشاهدة · في لغة Delphi

مشاركة: واتساب X فيسبوك تيليجرام

#114 أغسطس 2005 في 11:16 صاحب الموضوع

السلام عليكم

كيف يمكن معرفة رقم الأسكي او كيف معرفة ارقم لوحة المفتايح في برنامجي

اي عند الضغظ على Enter يخبرني ان رقم Enter=13 وهكذا

وشكرأُ

#214 أغسطس 2005 في 11:26

السلام عليكم

يمكن ذلك باستخدام التابع ORD يعطيك رقم الاسكي للمحرف

مثل

ord(A) = 65
[CODE]
و يمكنك استخدام التابع chr لاعطاءك المحرف من الرقم تابع عكسي

chr(65) = A

يمكن فعل كل هذا على احد الاحداث التالية

onkeyup

onkeydown

onkeypress

رب اجعلني مقيم الصلاة ومن ذريتي ربنا وتقبل دعاء.

لا تنسى: "العقل مثل العضلة كلما استخدمته أكثر كلما ازدادت قوته"

#314 أغسطس 2005 في 11:28

يمكن ذلك :D

وذلك في حدث KeyDown في الفورم

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
Label1.Caption:=IntToStr(Key);
end;

end.

:rolleyes: :rolleyes: :rolleyes:

..................بسم الله الرحمن الرحيم..................

وتعاونوا على البر والتقوى ولا تعاونوا على الإثم والعدوان

.............................................................................................................................

.............................................................................................................................

#414 أغسطس 2005 في 13:27

مرحبا

المرفق ملف HELP يحتوي جميع الرموز وما يقابلها في الأسكي

إننا محكومون بالأمل وما يحدث الآن ليس نهاية العالم

هذا الموضوع مغلق.