如何作控制台和窗口的两栖程序？(200分)

如何作控制台和窗口的两栖程序？
也就是说程序运行时如果带了命令行参数/c 则是一个控制台程序，否则就是一个窗口程序。windowsxp自带的shutdown就是这样一个程序，加入参数/i之后就会显示一个窗口，否则就是命令行程序。

program Project1;

{$APPTYPE CONSOLE}
uses
Forms,windows, SysUtils,
Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
if paramstr(1)='/w' then //以窗口方式运行
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end
else
begin
messagebox(0,'以命令行运行','提示',mb_ok);
writeln('演示以命令行运行而已');
writeln('按任意键退出');
readln;
end;
end.

Project1.exe /w 这样以窗口方式显示
否则以命令行形式

我对这个也感兴趣。

想法不错