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

Remove legacy, unused TTimer component

Browse Source
This commit is contained in:
Ansgar Becker
2009-01-13 18:17:40 +00:00
parent 6d388db57b
commit c57a3a8900
2 changed files with 0 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
source/main.dfm
View File

@ -6335,13 +6335,6 @@ object MainForm: TMainForm
OnClick = menuOpenLogFolderClick
end
end
object TimerConnectErrorCloseWindow: TTimer
Enabled = False
Interval = 10
OnTimer = TimerConnectErrorCloseWindowTimer
Left = 39
Top = 269
end
object TimerHost: TTimer
Enabled = False
Interval = 5000

12
source/main.pas
View File

@ -280,7 +280,6 @@ type
Markall3: TMenuItem;
N15: TMenuItem;
menuMaintenancea: TMenuItem;
TimerConnectErrorCloseWindow: TTimer;
PopupMenuDropTable: TMenuItem;
N17: TMenuItem;
ListColumns: TVirtualStringTree;
@ -599,7 +598,6 @@ type
procedure EditQuery1Click(Sender: TObject);
procedure Markall3Click(Sender: TObject);
procedure ListTablesDblClick(Sender: TObject);
procedure TimerConnectErrorCloseWindowTimer(Sender: TObject);
procedure QuickFilterClick(Sender: TObject);
procedure selectall1Click(Sender: TObject);
procedure popupResultGridPopup(Sender: TObject);
@ -5161,16 +5159,6 @@ begin
end;
procedure TMainForm.TimerConnectErrorCloseWindowTimer(Sender: TObject);
begin
// can't connect -> close MDI-Child
TimerConnectErrorCloseWindow.Enabled := false;
Showstatus('', 1);
ShowStatus( STATUS_MSG_READY );
close;
end;
{**
Column-title clicked -> generate "ORDER BY"
}