Question

delphi7中如何获得随机数，并把随机数字相对应的内容显示出来，求大神解答

Answer 1

给你个函数自己调用一下，显示就可以了

function getrand(n:integer):string;
var
    i:integer;
    rangstr:string;
begin
    randomize;
    for i:=0 to n do
    begin
        rangstr :=rangstr + inttostr(random(9));
    end;
    result:= rangstr;
end;