摘要: //获取程序参数 //可从 Project -> Options -> Debugger -> Parameters 中输入模拟参数, 多个参数可用空格隔开 procedure TForm1.FormCreate(Sender: TObject); var i: Integer; begin for i := 1 to ParamCount do begin ListBox... 阅读全文
posted @ 2009-03-11 20:38 万一 阅读(3569) 评论(2) 推荐(0) 编辑