diff --git a/comp/src/gb.form/.info b/comp/src/gb.form/.info
index 6ae0eae74..550a95865 100644
--- a/comp/src/gb.form/.info
+++ b/comp/src/gb.form/.info
@@ -2373,6 +2373,10 @@ Timer_Timer
 m
 
 
+Clear
+m
+
+
 #ToolPanel
 UserContainer
 C
diff --git a/comp/src/gb.form/.src/TableView.class b/comp/src/gb.form/.src/TableView.class
index dad99255d..49d346869 100644
--- a/comp/src/gb.form/.src/TableView.class
+++ b/comp/src/gb.form/.src/TableView.class
@@ -485,3 +485,10 @@ Private Sub NoKeyboard_Write(Value As Boolean)
   $bNoKeyboard = Value
   
 End
+
+Public Sub Clear()
+  
+  Cancel
+  Super.Clear
+  
+End