Question

delphi中的输入对话框怎么用

好像是input吧,大家谁能告诉我怎么用?

Answer 1

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