PDA

View Full Version : تابع keypress



MohsenTi
یک شنبه 14 تیر 1388, 11:22 صبح
سلام دوستان من تو دلفی می خوام وقتی دکمه ی control +p فشار داده شد از صفحه پرینت گرفته بشه و من این کار رو به صورت زیر انجام دادم

procedure myform.FormKeyPress (sender:Tobject;Key:char);
begin
if (key=chr(vk_control and ord('p')) ) then QR1.perview();
end;
حالا می خوام ببینم چرا وقتی نشانگر موس تو یه ادیته یا کلا فکوس رو فورم نیست این تابع اجرا نمیشه ؟

Felony
یک شنبه 14 تیر 1388, 12:23 عصر
وقتی فوکوس روی فرم نیست چه دلیلی داره که این عملیات صورت بگیره ؟
در هر صورت برای اینکه این کلید ها رو بتونید وقتی فرم در حالت فوکوس نیست تشخیص بدید باید کلیدهای Ctrl و P رو هوک کنید .