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

Sort font names alphabetically in SQL font selector. Fixes issue #2569.

Browse Source
This commit is contained in:
Ansgar Becker
2011-10-08 16:45:50 +00:00
parent d7dd1886dc
commit bdc7c0c245
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
source/options.pas
View File

@ -369,6 +369,7 @@ var
begin begin
InheritFont(Font); InheritFont(Font);
EnumFontFamilies(Canvas.Handle, nil, @EnumFixedProc, LPARAM(Pointer(comboSQLFontName.Items))); EnumFontFamilies(Canvas.Handle, nil, @EnumFixedProc, LPARAM(Pointer(comboSQLFontName.Items)));
comboSQLFontName.Sorted := True;
SynMemoSQLSample.Text := 'SELECT DATE_SUB(NOW(), INTERVAL 1 DAY),' + CRLF + SynMemoSQLSample.Text := 'SELECT DATE_SUB(NOW(), INTERVAL 1 DAY),' + CRLF +
#9'''String literal'' AS lit' + CRLF + #9'''String literal'' AS lit' + CRLF +
'FROM tableA AS ta -- A comment' + CRLF + 'FROM tableA AS ta -- A comment' + CRLF +