Prefill table combobox in trigger editor with currently selected table name. See issue #3477.

This commit is contained in:
Ansgar Becker
2013-12-20 05:36:37 +00:00
parent 9eb7c6cdb5
commit 2269d67fbb
3 changed files with 25 additions and 2 deletions

View File

@ -127,6 +127,14 @@ begin
Raise Exception.Create(_('Trigger definition not found!'));
end else begin
editName.Text := '';
if FocusedTables.Count > 0 then begin
for i:=0 to comboTable.Items.Count-1 do begin
if comboTable.Items[i] = FocusedTables[0].Name then begin
comboTable.ItemIndex := i;
Break;
end;
end;
end;
end;
Modification(Self);
Modified := False;