--- ibx/trunk/design/ibupdatesqleditor.pas 2018/04/16 09:24:55 208 +++ ibx/trunk/design/ibupdatesqleditor.pas 2018/03/14 12:48:51 209 @@ -33,7 +33,7 @@ interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ComCtrls, StdCtrls, ExtCtrls, IBSQLEditFrame, IBCustomDataSet, - IBDatabase, IBLookupComboEditBox, IBDynamicGrid, Types, IBUpdateSQL; + IBDatabase, IBLookupComboEditBox, IBDynamicGrid, IBUpdateSQL; type @@ -135,7 +135,6 @@ end; { TIBUpdateSQLEditorForm } procedure TIBUpdateSQLEditorForm.FormShow(Sender: TObject); -var TableName: string; begin PageControl.ActivePage := FieldsPage; FModifySQL.Assign(FUpdateObject.ModifySQL);