@@ -1431,7 +1431,6 @@ begin
Line:= Line + 'index ' + AIndexName + ' on ' + ATableName;
Line:= Line + ' (' + FieldsList.CommaText + ') ;';
-
end;
FQueryWindow.meQuery.Lines.Add(Line);
@@ -1,5 +1,6 @@
unit Scriptdb;
+{ Non-GUI unit that allows you to script a database's object DDL statements }
{$mode objfpc}{$H+}
interface