использование компонента TreeWiev другой формы

[White]

Здравствуйте всем! У меня вот какая проблема:
Есть форма AdvancedSearchForm в ней я пользуюсь компонентами (например IBQParam) из MainFrame,
но с компонентом TreeView1 не получается ничего, вываливает ошибка (Acces Violation....).
Мне нужно получить номер уровня, выбранного в TreeView1 элемента но на строке
"k:=Integer(TreeView1.Selected.Data );" вываливает.
Кто-нить знает в чем дело и как исправить?


function TAdvancedSearchForm.BBB: Boolean;
var
fhh: TMainFrame;
k:integer;
begin
fhh:=TMainFrame.Create(nil);
try
k:=Integer(TreeView1.Selected.Data) ;
with fhh.IBQParam do
begin
SQL.Clear;
SQL.Add('select par_name from par where par_id in (select par_id from nmk_par where nmk_id in (select '+
.................
...............................

end;

[Stilet]

k:=Integer(TreeView1.Selected.Data) ;

А проверить Selected на nil?

[White]

А если он nil, то что делать дальше?