将formstyle设为fsStayOnTop后,为什么此窗体不响应键盘事件?(100分)

  • 主题发起人 主题发起人 cy111111
  • 开始时间 开始时间
请说详细点,具体是哪些键盘事件?
 
没有可能吧,是什么键盘事件?最好看看你的源码。
 
onkeypress事件;想实现按任意键关闭该窗体。
 
to cy111111:
把Form1的KEYPREVIEW属性制为TRUE;
用KEYDOWN事件吧。
if key>0 then close;
TRY;
 
Agree with shanys .
 
soryy!还是不行
 
不可能不行啊。在KeyDown或KeyPress里写一句Close就行了呀
 
提问不得要领,让大家莫名其妙。
 
cy111111 大虾能不能把你的源码中关键的部分贴出来看一看,这个问题是不是太离奇了?
 
就是一个启动画面,三秒钟自动关闭,但我想设成按任意关闭,结果不行。
 
cy111111 大虾能不能把你的源码中关键的部分贴出来看一看?
我还是不理解“设成按任意关闭,结果不行”啥意思。
 
是不是你的MainForm出来的早?结果Splash窗口失去焦点了,所以它接收不到按键消息了。
如果是这样,那你可以把程序写在MainForm里:
procedure TMainForm.FormKeyDown(Sender: TObject
var Key: Word;
Shift: TShiftState);
begin
if SplashForm.Visible then SplashForm.Close;
end;

 
多人接受答案了。
 
后退
顶部