Delphi中预想不到的代码

Question

No.4 脱字号表达的字符
Caption := ^:^3^7^!^.^
运行一下，我的程序怎么变成zswang的了？
天啊，盗版！黑客！　
(^_^)

Answer 1

小错误：
NO 3
Catpion　写错了

Answer 2

我试了一下，No8是什么意思？
^m^k怎么表示为空？

Answer 3

//from Help
Syntax {$MESSAGE  HINT|WARN|ERROR|FATAL 'text string' }
ResThe message directive allows source code to emit hints, warnings, and errors just as the compiler does. This is similar to #emit or pragma warn in C and C++. 
The message type (HINT, WARN, ERROR, or FATAL) is optional.  If no message type is indicated, the default is HINT. The text string is required and must be enclosed in single quotes. 
Examples: {$MESSAGE 'Boo!'}                   emits a hint {$Message Hint 'Feed the cats'}     emits a hint 
{$messaGe Warn 'Looks like rain.'}  emits a warning 
{$Message Error 'Not implemented'}  emits an error, continues compiling 
{$Message Fatal 'Bang.  Yer dead.'} emits an error, terminates compiler

Answer 4

No.8 TODO
{TODO -cMessage -oAll :哈哈}

Answer 5

哦这些东西看起来挺新鲜的，但是实用的不多，至少不常用伴水，能不能给讲一下实用的东西，比如深入的剖析VCL到底是怎么工作的,等等我还有一个问题，就是当我继承TImage控件给他添加一个新的Picture属性怎么做?

Answer 6

补充：
I := StrToInt('0xA3E'); // 没错，是C里面的0xA3E，而不是Dephi中的$A3E
                        // StrToInt允许C里面的表示方法，
                        // 但整数不能直接用 I := 0xA3E;

Answer 7

No.8 系统提示、可以好好利用
begin
{$MESSAGE HINT '看一看'}
end;------在 D5 下通不过？

Answer 8

No.7 "X[:X[:X]]"格式
var S: string;
begin
  Str(123456.7890:0:2, S); //直接学Delphi的人大多数不会知道
  Caption := S;    
end;              
                                  
                  
Width 0:有什么特殊意义?我写成任何一个数字好像都没什么变化?

Answer 9

to dancemaple: "0x"我没有想到，一直都用"$"
to zhangking: Delphi6 调试通过//看来Delphi5之前还没有 :(
to lz_0618: 这是object pascal的语法问题，具体请参考我提供的连接
to 5200: 作用？就看你怎么发挥了//知道总比不知道好

Answer 10

to youou:
表达式[:宽度[:小数]] //宽度不足自动冲宽
Str(123456.7890:1000:2, S); //你就没有试试!//呵～～

Answer 11

zswang,[:[:[::学过Pascal的人我想都还记得吧？不过{$Message Hint }我是找了好久了，我以前记得有一个{$Message} 不过总是不能正常使用，。：)

Answer 12

凡是从DOS时代过来的还存在的编程语言基本上都有不少怪异的写法。
特别是C，怪起来看都看不懂！

Answer 13

嗯，“ZSWANG拌水”，你的信誉分怎么被扣了？

Answer 14

Step.1 技术区的帖子被转换到非技术区 -3
Step.2 回答的帖子整理问答区(FAQ)中 +5
Step.3 技术区的帖子被转换到非技术区 -3

Answer 15

No.9 with多开几个域
with Memo1, DBEdit1, Edit1 do begin
  ShowMessage(Text);
  ShowMessage(Lines.Text);
  ShowMessage(Field.AsString);
end;

Answer 16

zswang(伴水)，到时整理一下发表好不好？

Answer 17

to torble:同意！可能会放在Kingron的主页上

Answer 18

太有趣了！强烈建义zswang(伴水)发表一下！！