diff --git a/source/table_editor.pas b/source/table_editor.pas
index 35dd7ef0..b9eca993 100644
--- a/source/table_editor.pas
+++ b/source/table_editor.pas
@@ -484,7 +484,6 @@ var
   Results: TDBQuery;
   Col, PreviousCol: PTableColumn;
   Node: PVirtualNode;
-  IsVirtual: Boolean;
 
   procedure FinishSpecs;
   begin