请问，怎样做一个无窗体种序，而且该程序执行要带参数，这两种功能应怎样实现，答的快，分给的快！

Question

1. console application
2. Service application

Answer 1

uses Dialogs;procedure TForm1.Button1Click(Sender: TObject);
var
  InputString: string;
begin
  InputString:= InputBox('Input Box', 'Prompt', 'Default string');end;

Answer 2

直接在Project的.Pas文件中写东西，把
Application.CreateForm(TForm1, Form1);删掉，至于参数问题，可以用
ParamStr 和 ParamCount来获取。前一个是参数内容，后一个是参数俄个数。

Answer 3

工程文件创建主窗体时加上这行代码就可以使程序运行时无窗体：
Application.ShowMainForm := False;

Answer 4

先新建一个程序，然后再project中删除窗体，保存后，点击viewunit,然后将程序改成：
program Project1;uses
  Dialogs;{$R *.res}begin
    ShowMessage('Hello World !');
end.

Answer 5

先新建一个程序，然后再project中删除窗体，保存后，点击viewunit,然后将程序改成：
program Project1;uses
  Dialogs;{$R *.res}begin
    ShowMessage('Hello World !');
end.
接着运行看看。。

Answer 6

1。不要使用窗体，只是使用unit
2。至于输入参数，使用paramstr(i)
paramstr是执行程序时，得到参数字符串，0是程序的名字，从1开始