تشخیص ctrl+c /ctrl+v

[nickandish]

با سلام و سپاس

ببخشید دوستان چطور میشه در رویداد keydown یا keyup یک کنترل TEdit وقتی کلید های ترکیبی ctrl+c /ctrl+v/ctrl+x/ctrl+a رو استفاده می کنیم این کلید ها رو تشخیص بدیم.
من می خوام وقتی روی یک TEdit هستم و ctrl+c میزنم محتوای اون رو توی کلیپ بورد کپی کنم . دستور کپیش رو بلدم . ولی نمی دونم چطور میشه تشخیص داد که مثلا کلیدهای ctrl+c فشرده شدند یاکلید دیگه .
یعنی می خوام در صورت فشردن ctrl+c عمل کپی رو انجام بدم . ولی دستورش رو نمی دونم .
ممنون میشم اگه من رو راهنمایی کنید.

پاینده باشید و تندرست

[BORHAN TEC]

میتونید از کدی مثل زیر استفاده کنید:

void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key, TShiftState Shift)

{
if ( Shift.Contains(ssCtrl ) )
{
if ( ( Key == int ( 'a' ) ) || ( Key == int ( 'A' ) ) )
ShowMessage ( "Ctrl+A" );
if ( ( Key == int ( 'c' ) ) || ( Key == int ( 'C' ) ) )
ShowMessage ( "Ctrl+C" );
if ( ( Key == int ( 'v' ) ) || ( Key == int ( 'V' ) ) )
ShowMessage ( "Ctrl+V" );
if ( ( Key == int ( 'w' ) ) || ( Key == int ( 'W' ) ) )
ShowMessage ( "Ctrl+W" );
}
}

[nickandish]

یک دنیا سپاس از لطف و بزرگواریتونپاینده و تندرست باشید جاودانه