opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-14 01:56:36 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fulfill rfe #524: Ctrl+tab navigation

Browse Source
This commit is contained in:
Ansgar Becker
2009-01-04 14:34:57 +00:00
parent 57efab6097
commit bd797adebf
4 changed files with 75 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

BIN
res/icons/tab_next.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 552 B

BIN
res/icons/tab_previous.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 579 B

70
source/main.dfm
View File

@ -1596,6 +1596,12 @@ object MainForm: TMainForm
object Extra1: TMenuItem object Extra1: TMenuItem
Tag = 19 Tag = 19
Caption = '&Tools' Caption = '&Tools'
object Nexttab1: TMenuItem
Action = actNextTab
end
object Previoustab1: TMenuItem
Action = actPreviousTab
end
object MenuRefresh1: TMenuItem object MenuRefresh1: TMenuItem
Tag = 28 Tag = 28
Action = actRefresh Action = actRefresh
@ -2369,6 +2375,24 @@ object MainForm: TMainForm
ImageIndex = 115 ImageIndex = 115
OnExecute = actSelectTreeBackgroundExecute OnExecute = actSelectTreeBackgroundExecute
end end
object actPreviousTab: TPreviousTab
Category = 'Tools'
TabControl = PageControlMain
Caption = '&Previous tab'
Hint = 'Previous tab|Go back to the previous tab'
ImageIndex = 117
ShortCut = 24585
Wrap = True
end
object actNextTab: TNextTab
Category = 'Tools'
TabControl = PageControlMain
Caption = '&Next tab'
Hint = 'Next tab|Go to the next tab'
ImageIndex = 116
ShortCut = 16393
Wrap = True
end
end end
object SaveDialog2: TSaveDialog object SaveDialog2: TSaveDialog
DefaultExt = 'reg' DefaultExt = 'reg'
@ -5669,6 +5693,52 @@ object MainForm: TMainForm
0000763095E15A4C85FC0000000049454E44AE426082} 0000763095E15A4C85FC0000000049454E44AE426082}
Name = 'PngImage115' Name = 'PngImage115'
Background = clWindow Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000001974455874536F6674776172650041646F626520496D616765526561
647971C9653C000001DC4944415478DADD933D485B5114C7FFEF2516042D55F3
A2C1A6689DFCA0092AF50311B4A64307A1202E1D843838B5B45B079D44DC1571
9004E9E41C15FC0C0E6A696A5B1191A0A8AD55237946348BC97BF7A3374F5F54
A8A074EB8573CF597EBF7B38F75E89738E7F59D27F22F0FBFD2F44DD27A2E68E
DC8E880F5EAF37600A36DCEEB2D2FC7CDB855532F6CBFA2A5FD4125435865068
755F089CA620DADC5CA71C1EC6A0EBD40064594E43A9B0582C46B65AAD282CCC
C3E4E47C420832AF09EA9568F414C9A49E864D2815635B1F114F9EE06DD5281C
8E3C8C8FCFDC14B4B43428AA1A171D1003302566F6ADBF83F2C8898D83EF186A
0B221098BA29F0781A95582C0E4298017C0ABF073881C644100A474E099E391B
10DA0D62FDE02BDA1FF60A4167A6E4F3F9785191132E57457A782941F7442B3C
151DA09C81320A068EA3D37DE464D9F1797B0E3F7E2FA1CB3E0043F0B77B5A92
06F1CAD5895FC75BD0451784E9D0696A3E0F60CF7E8CC59D69ACFCFC72FB437A
3352CA5BDD5D02A420941A9D44CEF6909B55204E5FC66C783AAC1154DE2A783D
5C4C139A2666A021417494D8CAE4DAA72FB1B2B78CF9CDD935013F8FF4F3E49D
9F7279AFAC563F69B22D6C06BF690CF502D6EEF5178A7B2495328BED9CD10CB5
5F5CCFE5FA039136FC0376C1E82D0000000049454E44AE426082}
Name = 'PngImage116'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000001874455874536F667477617265005061696E742E4E45542076332E33
36A9E7E225000001DE4944415478DA6364A010300E1303E6CE9DEB07A4FA8158
89487D2781B83A3939792FCC80C766660632A2A2C240DE7F86FFFF2118046034
441CC27AF9F20DC3850BD7AE030DD08219F0DDDBDB99E3E9D3B70C7FFEFC016B
FAFBF72FDC2010FEF7EF1F58332B2B3383949430C3BE7DC75F030D10831BE0EB
EBC6F1FCF95B86C9671318F8D8851822543BE09A6186810C6167676510131300
1A700CD5003F3F0F8EEC354E0C5AD2460CAF3F3C6648D69904D7844CB3B2B230
888AF231ECD97304D98039DF577DAAE5D091366530537462B8F4F808C3F3F777
19D8589819D898588041CDC210A731016C000B0B1383B0301FC3EEDD87200600
35FF9FF92A8FC150D69AC152D985E1FD97570C1202320C4CC008626662666066
6462D87D6521438BCF2668804202F3E2C52B0C0F1E3C666054AF67F96FA260CE
60A3E4CEF0EAF313A0537F31B032B332B030B132B0026D97175165D876712E83
F5FF5CECE940AA8281938D85E19CAB86BB86A1AC15C3BB2F2F1824F9E5C036B3
3033030D6266D8746126C3B2B41B58131D5850A282811D68C8296735573D1339
2B8613F77631DC7D73ED1F070B2B300CD81838D8D81836643D60C69B948186B0
B131311C735073323EF368FF9B6B75FF4549CE0B22150C2C9C4CCCBF9999FEBE
79D0C24094010063E4D2BD2D7ABAAB0000000049454E44AE426082}
Name = 'PngImage117'
Background = clWindow
end> end>
PngOptions = [pngBlendOnDisabled, pngGrayscaleOnDisabled] PngOptions = [pngBlendOnDisabled, pngGrayscaleOnDisabled]
Left = 104 Left = 104

6
source/main.pas
View File

@ -22,7 +22,7 @@ uses
SynCompletionProposal, ZSqlMonitor, SynEditHighlighter, SynHighlighterSQL, SynCompletionProposal, ZSqlMonitor, SynEditHighlighter, SynHighlighterSQL,
TntStdCtrls, Tabs, SynUnicode, mysqlconn, EditVar, helpers, queryprogress, TntStdCtrls, Tabs, SynUnicode, mysqlconn, EditVar, helpers, queryprogress,
mysqlquery, createdatabase, createtable, tbl_properties, SynRegExpr, mysqlquery, createdatabase, createtable, tbl_properties, SynRegExpr,
WideStrUtils, ZDbcLogging; WideStrUtils, ZDbcLogging, ExtActns;
type type
TMainForm = class(TForm) TMainForm = class(TForm)
@ -454,6 +454,10 @@ type
CopygriddataasSQL1: TMenuItem; CopygriddataasSQL1: TMenuItem;
CopygriddataasSQL2: TMenuItem; CopygriddataasSQL2: TMenuItem;
Selectbackgroundcolor1: TMenuItem; Selectbackgroundcolor1: TMenuItem;
actPreviousTab: TPreviousTab;
actNextTab: TNextTab;
Nexttab1: TMenuItem;
Previoustab1: TMenuItem;
procedure refreshMonitorConfig; procedure refreshMonitorConfig;
procedure loadWindowConfig; procedure loadWindowConfig;
procedure saveWindowConfig; procedure saveWindowConfig;