Delphi InputQuery

本文整理自网络，侵删。

 
本示例在表单上需要一个按钮和一个标签。单击按钮时，将显示输入框。如果选择“确定”，则在对话框的编辑框中显示的字符串将显示为表单上标签的标题。如果选择“取消”，对话框将关闭并且标签的标题保持不变。
var
  NewString: string;
  ClickedOK: Boolean;
begin
  NewString := 'Default String';
  ClickedOK := vcl.Dialogs.InputQuery('Input Box', 'Prompt', NewString);
  if ClickedOK then            { NewString contains new input string. }
    Caption := NewString;
 

相关阅读 >>

Delphi exe图标替换

Delphi中读写txt文件的一段代码

base64.pas

Delphi net.httpclient用最精简的代码获取网页数据

Delphi 把文件锁定到任务栏

Delphi 获取listbox1的行值

Delphi setlength 内存释放总结

Delphi 通过控件句柄获取控件实例

Delphi daysbetween 用法片段

Delphi 创建一个进程并读取其控制台输出内容

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi InputQuery