你肯定是在程序中重复创建了QRStandPreview。把你的代码:
QRStandPreview := TQRStandPreview.Create(AOwner)改为:
if Not Assigned(QRStandPreview) then
QRStandPreview := TQRStandPreview.Create(AOwner)
QRStandPreview := TQRStandPreview.Create(AOwner)改为:
if Not Assigned(QRStandPreview) then
QRStandPreview := TQRStandPreview.Create(AOwner)
解决方案 »
- 请教了解C语言的朋友一些关于Delphi的简单的问题
- 谁有关于TmxOutLookBar的帮助文档
- 求教TByteDynArray转化为string的问题,在线等待!
- ◆200分相求~!谁有《电子书库》,现名称《资料收藏大师》最新版的源代码???
- DBGrid的問題
- 如何合成两个image为一个image?
- SQL 语句超过255个字符怎么办.TADOcommand.commandtext是string类型,不能超过255个
- 我用delphi 做了一个dll文件,vb不能调用,如何做vb能调用的dll?
- 美女?
- 1.哪有图标啊?我想要像工具栏上的剪切,复制等那样的系统图标怎么找啊?
- table问题
- 20分的问题,获得当前应用程序的路径的函数,给分限前两位答对者
begin
end;
补充:
如果你QRStandPreview := TQRStandPreview.Create(AOwner)
就不能用QRStandPreview.free;删除。
应由系统自己删除(实际是由AOwner删除的)。如果需要自己QRStandPreview.free;
应该QRStandPreview := TQRStandPreview.Create(NIL);