访问bpl中的变量出现错误！

Question

我在bpl中封装了一个窗体，定义了几个全局变量，在主程序中调用，但以调用就出现错误，错误提示如下：
Project test.exe raised exception class EAccessViolation with message'Access violatin at address 400068AC in module 'rtl70.bpl',Read of address 0000002F8'.Process stopped,Use Step orRun to continue.我在工程属性已经选择了‘build with runtime package',使用的包：vcl;rtl;Pub，其中pub是我自己建的包
我比较困惑的是为什么冲突是在rtl70呢？

Answer 1

以下是bpl的代码
unit Pub_frm;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TfrmPub = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
    ygbm,xm,jsbm,jsmc:string;
  end;var
  frmPub: TfrmPub;implementation{$R *.dfm}end.主程序调用的代码
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation
uses Pub_frm;
{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
  frmPub.ygbm := '';
end;end.

Answer 2

论坛上的朋友告诉我bpl中的全局变量是可以直接调用的，怎么我这里就出现冲突了呢？？

Answer 3

我也很关注这个问题 我也作了一些程序 使用bpl 很正常。  继续关注

Answer 4

frmPub，呵呵，这个创建实例了么？
调用的地方：
procedure   TForm1.Button1Click(Sender:   TObject);
begin
    frmPub := TfrmPub.Create(nil);
    frmPub.ygbm   :=   '';
end; 

Answer 5

// 因为你提供的信息不太完整,所以问题不能很好地定位在什么地方
问你几个问题:
1. 哪些全局变量发生了冲突?
2. 在哪一步出现了 冲突?
3. bpl 中的变量你是如何调用的?

Answer 6

哈哈，解决了，谢谢budded ，就是没有创建实例啊，天，我怎么这么菜，，，，，，，