在Form1中,当用户在类型为TEdit的字段中按VK_Retrun时,将执行Form2.Show。Form2将焦点放在按钮上。事件OnClick与内部代码"Close“挂钩。如果用户按键盘上的VK_RETURN键,Form2将按预期关闭。但问题来了,Form2又被解雇了。似乎当Form1获得焦点时,关键字仍然在“一个队列”中,编辑字段将继续使用VK_RETURN。TForm1.Edit1KeyUp(Sender: TObject; var Key: Word; beg
我的问题是在我输入我的信息后,它不会回到我的菜单。它突然要求我输入另一个信息(没完没了)。我不确定是不是使用了GetAsyncKeyState(VK_RETURN)语句,因为每次我尝试输入最后一个信息,即"Enter Year“时,它都会返回到菜单,但在”输入学生“选项上会自动按enter键}
{
if (GetAsyncKeyState(VK