Do not steal focus from tree when clicking a table, only when creating a new table or whatever. Fixes issue #2289.

This commit is contained in:
Ansgar Becker
2011-04-09 09:48:18 +00:00
parent 6afafb137f
commit 41bff877ce

View File

@ -2289,11 +2289,13 @@ begin
Mainform.UpdateEditorTab;
Screen.Cursor := crHourglass;
MainForm.SetupSynEditors;
// Enable user to start typing immediately
// Enable user to start typing immediately when creating a new object
if DBObject.Name = '' then begin
editName := FindComponent('editName') as TWinControl;
if Assigned(editName) and editName.CanFocus then
editName.SetFocus;
end;
end;
function TDBObjectEditor.DeInit: TModalResult;
var