project1.dpr

来自「Delphi7应用编程150例 附书源码」· DPR 代码 · 共 14 行

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils,
  Dialogs;

begin
  { TODO -oUser -cConsole Main : Insert code here }
    if ParamCount>0 then
        ShowMessage(ParamStr(1));
end.