主题：设置内置的文件管理器的代码写在哪个位置（没有设置窗口，都是表操作），来设置”删除或清除”等按钮不可用？

做个计划，输入代码

http://www.foxtable.com/webhelp/scr/0657.htm

如果是文件管理器

Dim frm  = windows.forms.form.activeform
If frm IsNot Nothing Then
    If frm.Text = "文件管理器" Then
       
        Dim obj = frm.Controls("FileManager").Controls("SplitContainer1").panel2.Controls("FlowLayoutPanel1")
        obj.controls("Manager").Visible = False
        obj.controls("Add").visible = False
        'Folder
        'Open
        'Delete
        'Clear
        'Manager
        'SaveAs
        'Connect
        'FullView
       
    End If
End If

如果是图片管理器，参考

Dim frm = Windows.Forms.Form.ActiveForm
If frm IsNot Nothing Then
    If frm.Name = Nothing AndAlso frm.text = "图片管理器" Then
        Dim lbs = frm.Controls(0).controls(0).panel2.controls(0)
        lbs.controls("Add").visible = False
        lbs.controls("Open").visible = False
        'Add
        'Open
        'Delete
        'Clear
        'NextRecord
        'PrevRecord
        'Manager
        'Full
        'Stretch
        'SaveAs
        'lblConnect
        'lblUpdate
    End If
End If