大家看我这样做对吗?(100分)

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
ZDQ1:TStatusBar;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
ZDQ1.Panels[1].Text:='OK';//这里我对这个ZDQ1的一个Panel的Text赋值，那么这个ZDQ1要不要释放？怎么释放？这个ZDQ1并不是直接放置在窗体上的
end;


end.


ZDQ1我只是直接声明这个变量，然后就直接使用这个对象，有问题吗？

如果ZDQ1是动态建立的，应该需要释放吧。

没有create你就直接赋值，怎么行啊，另外关闭的时候，需要释放啊，要不内存溢出了。对于可视化的vcl，还要指定parent，坐标等！

这样没有创建就可以用吗？应该不行吧。
用完之后当然也要释放。用Free应该就可以了。

有问题

ZDQ1被定义为全局变量,在使用的时候应该先创建,窗体关闭时要释放所创建的对象.[]

ZDQ1:TStatusBar;

在oncreate中： ZDQ1:=TZDQ1.create;
zdq1.preant:=self;

在onDestory中： ZDQ1.free;

多人接受答案了。