是A 还是B 或者是C，如何判断？

Question

如何判断这三类程序：
A：
program Project1;
{$APPTYPE CONSOLE}
uses
  windows;
begin
  winexec('cmd.exe',sw_show);
end.
B：
program Project1;
uses
  windows;
begin
  winexec('cmd.exe',sw_show);
end.C： VCL Forms Application
program Project2;uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};{$R *.res}begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.请问用我的程序来判断这三种类型的其它程序！

Answer 1

控制台和VCL窗口
判断子系统就行，控制台程序子系统是 Win32 GUI
VCL窗口程序 子系统是 Win32 console

Answer 2

打反了。。
控制台程序子系统是 Win32 console
VCL窗口程序 子系统是 Win32 GUI

Answer 3

1. 通过应用程序标识来差别；
2和3. 在1的基础上，查找是否有TApplication窗口类，找不到就是2否则就是3。

Answer 4

to sanguomi:  玩三国游戏吗？能不能推荐个好玩的，最近没看到出什么新的
  最近闲点，想找个娱乐下