InputBox函数和InputQuer函数用于显示一个带有编辑框组件的消息对话框，为用户提供输入文本的功能，在该提示框有一个文本输入框和两个命令按钮。
如图：
（1）.InputBox：显示一个带有编辑框组件的消息对话框，为用户提供输入文本的功能。
函数参数说明：
1 function InputBox(const ACaption, APrompt, ADefault: string): string;
ACaption：消息对话框标题
APrompt：消息对框框提示信息
ADefault：消息对话框首次出现时编辑框中显示得信息，也就是默认信息。
1 var 2 MyString: string; 3 begin 4 mystring:= InputBox('对话框标题','对话框提示信息','对话框默认信息'); 5 memo2.Lines.Text:= MyString; 6 end;
可以看出InputBox函数是有一个String的返回值的，这个返回值就是编辑框中的内容，如果对话框点击了OK按钮，则会将编辑框内容传入String变量，进行其他操作，点击Cancel按钮，则返回值依然为默认值。也就是上面：对话框默认信息“。
（2）.InputQuery:显示一个带有编辑框组件的对话框，为用户提供输入文本功能，并判断用户是否按下“OK”按钮，如果点击OK按钮，则会将输入框中的字符串赋值给Value参数。
函数参数说明：
1 function InputQuery(const ACaption, APrompt: string; var Value: string): Boolean;
ACaption：消息对话框标题
APrompt：消息对框框提示信息
Value：对话框首次出现在编辑框中时显示的字符串，并得到用户在消息对框框中输入的字符串。
1 var 2 ClickOK: Boolean; 3 MyString: string; 4 begin 5 MyString:= '我变成了一个字符串'; 6 ClickOK:= InputQuery('对话框标题','对话框提示信息',MyString);//此处只能传入字符串变量 7 if ClickOK then 8 memo2.Lines.Text:= MyString;//如果点解OK按钮，则将编辑框内信息写入到memo2中
9 end;
可以看出InputQuery函数的返回值是一个布尔值。它于InputBox函数最大的区别在于：
1.可以控制是否有编辑框默认值（第一次打开默认值），上面MyString变量不赋值，就不会有默认值。
2.点击按钮之后可以根据返回的布尔值来决定是否需要其他操作，上面点击OK则将编辑框信息写入memo2中。