直接在工程里写代码。
program Project1;uses
  Forms, Dialogs, Sysutils;{$R *.RES}var
  I, iResult: Integer;begin
  Application.Initialize;
  iResult := 0;
  for I := 0 to 100 do
    Inc(iResult, I);
//  ShowMessage(IntToStr(iResult));
  Application.Run;
end.