对话框 函数给

有个对话框   函数给忘了   ，它能输入子符串   然后返回   子符串    
  不是   showmessage,messagebox 问题点数：20、回复次数：4Top

1 楼baiduan（-_-化杯粪喂力量-_-）回复于 2005-10-20 11:12:20 得分 10

inputbox   吧Top

2 楼jackie168（http://soft.eastrise.net）回复于 2005-10-20 11:12:41 得分 10

procedure   TForm1.Button1Click(Sender:   TObject);  
  var  
      InputString:   string;  
  begin  
      InputString:=   InputBox('Input   Box',   'Prompt',   'Default   string');  
      showmessage(inputstring);  
      end;Top

3 楼h2yang（小青）回复于 2005-10-20 11:15:10 得分 0

就是上面两个说的：inputboxTop

4 楼lovendII（流氓都做了城管）回复于 2005-10-20 11:15:52 得分 0

try  
  ServerSocket1.open;  
   
  exception  
   
  on     E:     Exception     do      
        MessageBox(0,PChar('错误原因：'+E.message),'提示',0+16);////关于messagebox的  
   
  end；Top

相关问题

• 函数
• 对话框函数
• inputstring
• showmessage
• 子符串
• messagebox

• 帖主：bhybhybhy2
• baiduan
• jackie168

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载