opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-14 01:56:36 +08:00
Code Issues Packages Projects Releases Wiki Activity

Disable editing routines if user has no privilege to select from mysql.proc or if he's not the owner of that routine. See http://www.heidisql.com/forum.php?t=10231

Browse Source
This commit is contained in:
Ansgar Becker
2012-03-07 20:57:46 +00:00
parent 4de1b3012d
commit f36f54b0b8
2 changed files with 15 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
source/routine_editor.dfm
View File

@ -17,6 +17,15 @@ object frmRoutineEditor: TfrmRoutineEditor
Caption = 'Routine body:'
FocusControl = SynMemoBody
end
object lblDisabledWhy: TLabel
Left = 256
Top = 460
Width = 177
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'You have no privilege to this routine.'
Visible = False
end
object btnSave: TButton
Left = 165
Top = 455

6
source/routine_editor.pas
View File

@ -43,6 +43,7 @@ type
comboDefiner: TComboBox;
btnMoveUpParam: TToolButton;
btnMoveDownParam: TToolButton;
lblDisabledWhy: TLabel;
procedure comboTypeSelect(Sender: TObject);
procedure btnSaveClick(Sender: TObject);
procedure btnHelpClick(Sender: TObject);
@ -166,6 +167,11 @@ begin
editComment.Text := Comment;
comboDefiner.Text := Definer;
SynMemoBody.Text := Body;
// User may not be allowed to view code in SHOW CREATE FUNCTION, in which case we have an empty CreateCode.
// Disable editor in this case.
lblDisabledWhy.Visible := Body = '';
PageControlMain.Enabled := not lblDisabledWhy.Visible;
SynMemoBody.Enabled := PageControlMain.Enabled;
end else begin
editName.Text := '';
end;