柘皋:delphi中的输入对话框怎么用

来源:百度文库 编辑:中科新闻网 时间:2024/07/01 14:23:45
好像是input吧,大家谁能告诉我怎么用?

procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
s:= InputBox('请输入姓名','姓名:','');//参数分别为标题,提示,默认值
ShowMessage(s);
end;