كنترل object ها با key press

[lord_viper]

با سلام
یه یه برنامه دارم که توش 2 تاmemoهست درkey down memo1جلوif key=7 then
چی بنویسم که اگه توmemo1مثلا gرو فشار دادم توmemo2مثلا fنوشته بشه
با تشکر

[Delphi Skyline]

if key = 13 then
memo1.Text:=memo1.Text+' a ';

البته اگر اشتباه منظورتونو اشتباه نگرفته باشم .

[Delphi_Developer]

if key = 13 then
memo1.Text:=memo1.Text+' a ';

البته اگر اشتباه منظورتونو اشتباه نگرفته باشم .

این کد شما باعث میشه که اگه توی Memo دکمه Enter رو فشار بدی به محتویات Memo یه a اضافه بشه .

اما ببین دوست عزیز شما باید اول کدهای Ascii مربوط به دکمه ها رو داشته باشی مثلا کد مهرداد که نوشته 13 - 13 مربوط به دکمه Enter هست شما باید کد مربوط به دکمت رو بدونی که برای این کار هم من قبلا یه برنامه واسه کار خودم نوشتم که برات میذارمش البته خودت هم میتونی همچین برنامه ای بنویسی اما خوب من
گفتم دیگه من آمادشو برات بذارم
موفق باشی :sunglass:

[lord_viper]

با سلام
ببینید من می خوام تو memo1می نویسم s تو memo2نوشته بشه t کدهایascii رو دارم می خوام بدونم بعد ازif key=71 then چی بنویسم تو keydownدرmemo1
با تشکراز دوستان

[MSK]

بابا بنده خدا که داره یه چیز دیگه میگه!

من که از متن ایشون چیز دیگه ای برداشت میکنم!

ایشون فرمودن ما تو ممو اول حرف s رو تایپ میکنیم در ممو دوم مثلا f تایپ میشه!
کد شما باعث میشه در ممو دوم متن ممو اول مضاف بر یک a چاپ بشه!

شما بای یه همچین کدی وارد کنید:



if key='s' then memo2.text:=memo2.text+'f';