Search the Community

Hello, I have an application. When I call the frame it presents the error: Privileged Instruction Below my code: var Nd : TUniTreeNode; Ts : TUniTabSheet; FrC : TUniFrameClass; Fr : TUniFrame; FClassName, iconfile, Path: string; index: Integer; begin Nd := NavTree.Selected; if Nd.Count = 0 then begin Ts := Nd.Data; if not Assigned(Ts) then begin Ts := TUniTabSheet.Create(Self); Ts.PageControl := UniPageControl1; Ts.Closable := True; Ts.OnClose := TabSheetClose; Ts.Tag := NativeInt(Nd); Ts.Caption := Nd.Text; Ts.ImageIndex := Nd.ImageIndex; if Nd.Text = 'Cadastro de Fornecedor' then FrC := TUniFrameClass(TFrameFornecedor); if Nd.Text = 'Cadastro de Prefeitura' then FrC := TUniFrameClass(TfrmPrefeitura); Fr := FrC.Create(Self); Fr.Align := alClient; Fr.Parent := Ts; Nd.Data := Ts; end; UniPageControl1.ActivePage := Ts; end;