你这样把一个窗口的句柄付给一个变量,但这个变量并没有实际开辟内存区,窗口不存在,当然也不存在跟窗口联系的QUICKREPORT啦!

解决方案 »

  1.   

    var form:Tform2;即可;
    或者
    form:=form2;
    Tform2(form).quickrep1.prepare;也行.
      

  2.   

    非常谢谢ping2000(乐乐),还有一个问题再次请教:
    下面这个语句是可以执行的,其中form1是一个窗体的naem属性:
    procedure Tsbprint.BitBtn1Click(Sender: TObject);
    var
     form:Tform1;
    begin
     form:=form1;
     form.quickrep1.preview;
    end;
    我现在需要将form1改为from2或者form3,不用手动修改,想用变量进行替换,不知道应该怎么做,本人实在不懂,再请各位高手帮助!
      

  3.   

    var form:Tform;
    begin
    form:=form2;
    Tform2(form).quickrep1.preview;
    end;