如何创建无窗体的应用程序(不要Unit中的Form类)
比如用代码改变鼠标的位置等,没有事件,代码又写哪?
以控制台模式编写
{$APPTYPE CONSOLE}
program Project1;
begin
...
end.
program mydpr;
{$APPTYPE CONSOLE}
uses
Windows;
begin
MessageBox (0, cmdLine, StrParam Command Line, MB_OK);
end.
上面的怎么都这么差劲,你新建一个工程,把Form1移除,然后加一个Unit,在里面写代码,函数,然后再Program中
begin
这里调用你的函数。
end;
program mydpr;
{$APPTYPE GUI} <-------------------改成GUI 原来CONSOLE
uses
Windows;
begin
MessageBox (0, cmdLine, StrParam Command Line, MB_OK);
end.
{$APPTYPE GUI}
这个是Delphi默认的。