Question

在Delphi中 新建一个控件台程序，它的程序界面有如下代码 program Project2; {$APPTYPE CONSOLE} uses

SysUtils;

begin
{ TODO -oUser -cConsole Main : Insert code here }
end.

不知道它各行代码是有何意义，有些觉得没用，删除还出错，请给解释一下
写程序代码时，代码放在哪里，变量声明放在哪里，声明的变量是全局变量，还是私有变量。
原始界面中的
uses
SysUtils;
能注释掉吗
请指导。
谢谢

Answer 1

注释及示例代码如下：

program Project3; //定义程序名

{$APPTYPE CONSOLE} //编译指令，指示当前程序是控制台程序

uses
SysUtils; //引入系统函数单元，如果确实不需要其中的函数等，也可以不要

var //定义变量
i:Integer;
s:string;
_set:set of Char; //集合类型

const
Author:string ='Jimmy';//常量字符串

resourcestring
Author2 = 'yjmyzz';//资源字符串

//定义一个过程
procedure MyProc(msg:string) ;
begin
Writeln('MyProc is Called by:' + msg);
end;

//定义一个函数
function MyFunc(msg:string):string;
begin
result := 'MyFunc is Called by ' + msg;
end;

//Main方法的开始
begin
WriteLn('Hello World');//输出,相当于c#中的Console.Writeln("xxx")
Writeln('');
for i:=0 to 10 do //循环
begin
s:= '这是数字' + IntToStr(i) ;
Writeln(s);
end;
Writeln('--------------------------');
MyProc('jimmy'); //调用过程
Writeln(MyFunc('Jimmy.Yang')); //调用函数
Writeln('--------------------------');
Writeln(Author); //输出常量
Writeln(Author2); //输出资源字符串
Writeln('--------------------------');
Writeln('Integer:');
Writeln(SizeOf(Integer));
Writeln(High(Integer));
Writeln(Low(Integer));
Writeln('--------------------------');
Writeln('i=' + inttostr(i));
Dec(i); //i减1，相当于i:=i-1;
i:=i-1;
Writeln('i=' + inttostr(i));
Writeln(Odd(i));
Writeln('--------------------------');
Writeln(FormatDateTime('yyyy年mm月dd日 hh:nn:ss',Now));
Writeln('--------------------------');
i:= Integer('A');
Writeln(i);
Writeln(Ord('a'));
Writeln(Chr(97));
Writeln(#10 + '按任意键退出...');
Readln; //等待键盘输入
end.

Answer 2

{ TODO -oUser -cConsole Main : Insert code here } 这个英文的意思就是在这里写客户代码
变量声明放在begin之上，对于控件台程序而言是全局的
uses SysUtils;
这句是表示使用 SysUtils命名空间，是不能去掉的

Answer 3

不能，很多对象在这个单元中提供