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 优化mdb文件

Delphi hbp-1100u 欧姆龙血压计的usb调用方法

Delphi stringtowidestring widestringtostring

Delphi里面判断一个字符串在另一个字符串中出现的次数

Delphi ip地址转换str字符

Delphi xe8 androdi利用httpclient实现的一个app自动更新组件

Delphi xe vcl - tlinklabel(链接标签)

Delphi d10.x安卓app开发中简单使用原生toast

Delphi获取access中的表名代码

Delphi unigui 调用js

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

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