随机生成字符串的问题

Question

想随机生成字符串，其中包括大小写字母和数字，和@ #两个特殊字符
如何生成啊啊？

Answer 1

大小写数字可以用radom函数呀，radom(255) 然后转换成相应的asscII码就行了吧！

Answer 2

在使用random(255)之前 请初始化randomize();否则每次生成的都是一样的

Answer 3

写法如下：
function GetRandomString:string;
var
  len,I:byte;
  Str:string;
begin
  len:=random(100);//获取要随机生成字符的长度！
  For I:=1 to len do
  Str:=str+chr(random(128));
  result:=str;  
end;