project1.dpr

Delphi7应用编程150例附书源码.rar

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils,
  Dialogs;

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