16,748
社区成员
发帖
与我相关
我的任务
分享一段代码，请问是什么意思？
{--------------------------------------------------------------}
program Cradle;
{--------------------------------------------------------------}
{ Constant Declarations }
const TAB = ^I; //什么意思？
{--------------------------------------------------------------}
{ Variable Declarations }
var Look: char; { Lookahead Character }
{--------------------------------------------------------------}
{ Read New Character From Input Stream }
procedure GetChar;
begin
Read(Look);
end;
{--------------------------------------------------------------}
{ Report an Error }
procedure Error(s: string);
begin
WriteLn;
WriteLn(^G, 'Error: ', s, '.');//什么意思？
end;
{--------------------------------------------------------------}
program Cradle;
{--------------------------------------------------------------}
{ Constant Declarations }
const TAB = ^I; //什么意思？
{--------------------------------------------------------------}
{ Variable Declarations }
var Look: char; { Lookahead Character }
{--------------------------------------------------------------}
{ Read New Character From Input Stream }
procedure GetChar;
begin
Read(Look);
end;
{--------------------------------------------------------------}
{ Report an Error }
procedure Error(s: string);
begin
WriteLn;
WriteLn(^G, 'Error: ', s, '.');//什么意思？
end;
{--------------------------------------------------------------}
...全文
请发表友善的回复…
发表回复
Comer 2006-11-24
- 打赏
- 举报
ｍａｒｋ
cangwu_lee 2006-11-21
- 打赏
- 举报
TAB 指向 I 的指针。
^G 那里就不知道了。
^G 那里就不知道了。
bluishsky 2006-11-21
- 打赏
- 举报
我没有安装delphi，也不知道这段代码能否跑通。只是想把这段代码转成c的代码，可原来写delphi程序时也没碰到这么用过，所以问哈这里的兄台们有没有人知道是什么意思。pony996(小马) 给的是运行时watch到的值吗？
bluishsky 2006-11-13
- 打赏
- 举报
这里主要是不知道const TAB = ^I;什么意思？^I是什么意思？
还有一个WriteLn(^G, 'Error: ', s, '.'); ^G什么意思？
这两个变量I,G在代码中并未申明。
还有一个WriteLn(^G, 'Error: ', s, '.'); ^G什么意思？
这两个变量I,G在代码中并未申明。
chenjun631 2006-11-13
- 打赏
- 举报
确实如 pony996(小马) 所说
gogogo 2006-11-13
- 打赏
- 举报
^一般都是指针，你如果I,G没有定义就说不清了。
comanche 2006-11-13
- 打赏
- 举报
高人代码啊, 没这么用过, mark 一下
草原小马 2006-11-13
- 打赏
- 举报
取应该是ASCII字符集
^i:#9
^g:#7
^i:#9
^g:#7
