控制控制台
var
????s:string;
begin
????AllocConsole;
????try
????????Write('Type here your words and press Enter');
????????Readln(s);
????????ShowMessage(Format('You typed: "%s"',[s]));
????finally
????????FreeConsole;
????end;
end;
總結
- 上一篇: AppScan安装包及详细安装教程(带图
- 下一篇: python的collection系列-