UC知道Delphi 函数执行中，等待回车键入再继续执行
来源：百度知道 编辑：UC知道 时间：2024/06/18 18:32:50
一个myFun函数的定义中有这么一条语句:
...
//等待 回车键 的输入后，再执行下面
...
请问如何实现？
难点在于，不断等待的过程本身就是死循环了，又如何去响应键盘的输入？
...
//等待 回车键 的输入后，再执行下面
...
请问如何实现？
难点在于，不断等待的过程本身就是死循环了，又如何去响应键盘的输入？
如果是控制台程序，有专门的等待输入函数，
类似Input什么的。
如果是Win32本地程序，有很多处理方法。我给你一个方法：
在窗体的KeyDown事件里判断回车是否按下，
按下，执行这个函数，否则就不管这个函数。
在循环中加
Sleep(100);
Application.ProcessMessages;
if key=#13 then
begin
end;