获得随机 汉字 哈哈

sb:='';
for I := 0 to 11 do
begin
randomize;
sb:=sb+char(5793976+random(1000)+random(1000)+random(1000));

end;