opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 22:00:16 +08:00
Code Issues Packages Projects Releases Wiki Activity

Use FreeAndNil() to reset global variables for dialogs we need in TMainform.SetupSynEditors(). Finally fixes a bunch of access violations in SetupSynEditors, due to referencing already free'd variables. Fixes issue #3414.

Browse Source
This commit is contained in:
Ansgar Becker
2013-11-10 10:03:17 +00:00
parent c0e57fdea6
commit af7ea3708e
5 changed files with 14 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
source/options.pas
View File

@ -159,7 +159,6 @@ type
procedure ShortcutEnter(Sender: TObject);
procedure ShortcutExit(Sender: TObject);
procedure chkColorBarsClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure comboGridTextColorsSelect(Sender: TObject);
procedure colorBoxGridTextColorsSelect(Sender: TObject);
procedure editMySQLBinariesRightButtonClick(Sender: TObject);
@ -358,12 +357,6 @@ begin
end;
procedure Toptionsform.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;
procedure Toptionsform.FormCreate(Sender: TObject);
var
i: Integer;