摘要： 看了 InputBox、InputQuery 函数实现的源码, 有些收获与心得...通过 InputBox 可获取用户输入的字符串:procedure TForm1.Button1Click(Sender: TObject);var str: string;begin str := InputBox('输入窗口标题', '输入提示', '默认输入内容'); ShowMessage(str);... 阅读全文