opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix issue #1130: Stored routine lost if no name is given

Browse Source
This commit is contained in:
Ansgar Becker
2009-05-16 06:05:20 +00:00
parent ea71eb13f9
commit d35b2dbf0f
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
source/routine_editor.pas
View File

@@ -415,10 +415,12 @@ begin
if editName.Text = '' then begin
MessageDlg('Please specify the routine''s name.', mtError, [mbOK], 0);
editName.SetFocus;
ModalResult := mrNone;
Exit;
end else if (ProcOrFunc = 'FUNCTION') and (comboReturns.Text = '') then begin
MessageDlg('Please specify the function''s returning datatype.', mtError, [mbOK], 0);
comboReturns.SetFocus;
ModalResult := mrNone;
Exit;
end;