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

source/routine_editor.dfm

@@ -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

source/routine_editor.pas

@@ -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;