关于托盘的问题

Question

关于托盘创建代码如下在formCreate中写,但是当窗体不显示时不可以对窗体上的控件如listview的item进行添加操作,或者退出时就报错
   Application.ShowMainForm := False;
   IsRButton := False;
StatusBar1.Panels.Items[0].Text := dmAppSvr.LinkInfo;
if dmAppSvr.adocnn.Connected then
GetTblInfo;
   with NotifyIcon do // 设置托盘
   begin
cbSize := SizeOf( TNotifyIconData);
Wnd := Handle;
uID := 1;
uFlags := NIF_MESSAGE or NIF_ICON; // or NIF_TIP;
uCallBackMessage := WM_NID;
hICon := Application.Icon.Handle;
SZTip := '';
   end;
   Shell_NotifyIcon( NIM_ADD, @NotifyIcon);