diff --git a/Source/GUIBase/uEditorDBBase.pas b/Source/GUIBase/uEditorDBBase.pas index ac895788..2d9ca0cb 100644 --- a/Source/GUIBase/uEditorDBBase.pas +++ b/Source/GUIBase/uEditorDBBase.pas @@ -193,12 +193,13 @@ begin begin AID := RecIDValue; DisableControls; //<- No descomentar - + dsDataTable.OnStateChange := NIL; ShowHourglassCursor; try Refresh; Locate(RecIDField.FieldName, AID, []); finally + dsDataTable.OnDataChange := dsDataTableDataChange; EnableControls; //<- No descomentar HideHourglassCursor; end;