初学DELPHI请教两个入门问题，谢谢

Question

因为是初学，我需要知道以下两个问题，然后方便在学习的过程实践。我翻过很多书都没有讲这两个问题。
而且DELPHI编程似乎很不一样。1，一个程序如何不要窗体。
我看了很多教程在讲ini文件操作，讲hello world的时候都是要点击一个对话框，然后通过点击这个事件去触发messagebox这个函数。
我想，如何不要GUI，不需要去点击控件就可以执行一个MESSAGEBOX呢？2，如何顺序执行程序。
同上，我不想程序有GUI，我想顺序执行两个messagebox,两个messagebox之间间隔1秒。谢谢各位。因为是新手，最好稍说细点，以后我写出操作系统的时候，会回来感谢各位的。

Answer 1

1.直接在工程文件中写代码就行了,比如application.messagebox()2.application.messagebox(1);
  sleep(1000);
  application.messagebox(2);delphi代码本来就是按顺序执行的

Answer 2

disburden你好。谢谢你的回答
1.直接在工程文件中写代码就行了,比如application.messagebox()
请问，写在哪啊？
我新建一个程序的时候。代码如下：unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}end.
改动哪个代码才是没有窗口？
application.messagebox() 这个对话框应该写在哪个位置啊？谢谢。

Answer 3

program Project1;uses
  Windows,
  Forms,
  Unit1 in 'Unit1.pas' {Form1};{$R *.res}begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  application.Showmainform := False;
  Application.MessageBox('1', '1', MB_OK);
  Sleep(1000);
  Application.MessageBox('1', '1', MB_OK);
  Application.Run;
end.

Answer 4

控制台下program Project2;//{$APPTYPE CONSOLE}uses
  Windows, SysUtils;begin
  MessageBox(0, '1', '1', MB_OK);
  Sleep(1000);
  MessageBox(0, '1', '1', MB_OK);
  { TODO -oUser -cConsole Main : Insert code here }
end.

Answer 5

谢谢这位兄弟的帮助。
但我，新打开DELPHI，双击GUI进入代码编辑，将你的代码全部复制进去,f9运行的时候，不能运行你的代码。谢谢你的解答。

Answer 6

因为默认GUI方式，是不需要循环程序就可以长驻内存的。
如果控制台这个要长驻内存，是需要一个循环来吗？谢谢。

Answer 7

但我，新打开DELPHI，双击GUI进入代码编辑，将你的代码全部复制进去,f9运行的时候，不能运行你的代码。谢谢你的解答。那段代码是放在工程里的
 
双击窗口，放入代码
procedure TForm1.FormCreate(Sender: TObject);
begin
  application.Showmainform := False;
  Application.MessageBox('1', '1', MB_OK);
  Sleep(1000);
  Application.MessageBox('1', '1', MB_OK);
end;

Answer 8

兄弟不要只UP，看看2楼默认GUI的代码。怎样改改可以实现不要GUI，并且顺序执行两个MSGBOX啊？谢谢。

Answer 9

如果控制台这个要长驻内存，是需要一个循环来吗？谢谢是的，FORMS里就是加了个消息循环让控制台程不退出，