Delphi使用心得------持续更新中

1.Application.ProcessMessages

防止进程阻塞，使程序能够响应消息队列中的其他事件。
比如你下载一个大文件的时候，还未下载成功，那么整个程序可能阻塞在这里，而不响应其他事件。但是，如果你在下载过程中，使用了processmessages就可以在下载的同时处理其他事情，响应鼠标事件等。

2.randomize

以下事例将随机产生0到100的数字，如果不使用Randomize函数，得到的结果将有规律性。
procedure TForm1.btn1Click(Sender: TObject);
begin
　　randomize;
　　ShowMessage(IntToStr(Random(100)));
end;

3.SameText

var
  s1,s2: string;
  b1,b2: Boolean;
begin
  s1 := 'C:/Temp';
  s2 := 'c:/temp';
  b1 := SameText(s1, s2); //True
  b2 := s1 = s2;                 //False
  ShowMessage(BoolToStr(b1,True) + ' - ' + BoolToStr(b2,True));
end;