我在一个数组中放入了100000个数据,是随机产生的数字。想把他直接打印出来,每行打印5列数据。不知道在Delphi中如何实现。请教我最简单的方法。

解决方案 »

  1.   

    在窗体上摆一个ListBox放数组的所有数据,然后Form1.Print大印最快,ListBox可以设置成5列
      

  2.   

    利用TPrinter打印,也很不錯
    不過需要自己寫點代碼
      

  3.   

    var
      Str : String;
      LstString : TStringList;
      Arr : Array of String;
    beginStr := '';
    for i :=0 to 100000 do
    begin
      if i div 5 = 0 then
      begin
        LstString.Strings.Add(Str);
        Str :=''
      end;
      if Str <> '' then
        Str := Str + '     ' + Arr[i]
      else Str := Arr[i];
    end;//打印LstString中的内容!今天电脑坏了,用别人的电脑上网,没办法调试,随手写了一下,请参考:
      

  4.   

    补充:hqhhh(枫叶)LstString.SaveToFile('c:\aa.txt');保存到文件里了随你怎么打印了
    BTW:楼主打这么多随机数干嘛
      

  5.   

    用途我也不知道,是别人让我作的,我现在只能先用保存到文件里再打印的方法了。
    可是觉得这样不太正宗,最好能用自己的方法来实现。
    不知道“ hqhhh(枫叶) ”写得代码能不能用,惨的是我家没有打印机,不好试。
      

  6.   

    to : quake3() 
    你看一下,在保存的文件中是不是合你的要求不就行了!
    即然在文件中都显示正常,为什么不能打印!