2023年2月17日
inputbox-inputquery-messagedlg
摘要： InputBox procedure TForm1.Button1Click(Sender: TObject); var str: string; begin str := InputBox('输入窗口标题', '输入提示', '默认输入内容'); Label4.Caption := str ; e 阅读全文
posted @ 2023-02-17 22:23 德琪 阅读(55) 评论(0) 推荐(0)