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

Set focus on filter box when SQL help dialog opens. See http://www.heidisql.com/forum.php?t=17294

Browse Source
This commit is contained in:
Ansgar Becker
2015-01-01 17:41:32 +00:00
parent a87e30cc94
commit b1546db09d
2 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
source/sqlhelp.pas
View File

@@ -50,6 +50,7 @@ type
procedure editFilterChange(Sender: TObject);
procedure editFilterRightButtonClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormShow(Sender: TObject);
private
{ Private declarations }
@@ -268,6 +269,12 @@ begin
end;
procedure TfrmSQLhelp.FormShow(Sender: TObject);
begin
editFilter.SetFocus;
end;
procedure TfrmSQLhelp.ButtonOnlinehelpClick(Sender: TObject);
begin
// Link/redirect to mysql.com for further help