seems like I need to update these too... :-/

This commit is contained in:
zueuk 2005-10-29 18:28:00 +00:00
parent be57c8d9a4
commit 150d37d1bb
2 changed files with 6 additions and 30 deletions

View File

@ -140,7 +140,7 @@ end;
procedure TFullscreenForm.FormShow(Sender: TObject);
begin
MainForm.mnuShowFull.enabled := true;
MainForm.mnuFullScreen.enabled := true;
HideTaskbar;
if calculate then
DrawFlame;

View File

@ -27,7 +27,7 @@ object MainForm: TMainForm
Left = 160
Top = 28
Width = 4
Height = 534
Height = 540
end
object ToolBar: TToolBar
Left = 0
@ -284,7 +284,7 @@ object MainForm: TMainForm
Left = 0
Top = 28
Width = 160
Height = 534
Height = 540
Align = alLeft
Columns = <
item
@ -303,7 +303,7 @@ object MainForm: TMainForm
Left = 164
Top = 28
Width = 433
Height = 534
Height = 540
Align = alClient
BevelInner = bvLowered
BevelOuter = bvNone
@ -314,7 +314,7 @@ object MainForm: TMainForm
Left = 1
Top = 1
Width = 431
Height = 532
Height = 538
Align = alClient
AutoSize = True
PopupMenu = DisplayPopup
@ -327,7 +327,7 @@ object MainForm: TMainForm
end
object StatusBar: TStatusBar
Left = 0
Top = 562
Top = 568
Width = 597
Height = 19
Panels = <
@ -2847,30 +2847,6 @@ object MainForm: TMainForm
OnClick = mnuAboutClick
end
end
object mnuHiddenGraph: TMenuItem
Caption = 'Graph'
Visible = False
object mnuAutoZoom: TMenuItem
Caption = 'Auto Zoom'
ShortCut = 16449
OnClick = mnuAutoZoomClick
end
object mnuDelete: TMenuItem
Caption = 'Delete'
ShortCut = 8238
end
object mnuRefresh: TMenuItem
Caption = 'Refresh'
ShortCut = 16454
OnClick = mnuRefreshClick
end
object mnuShowFull: TMenuItem
Caption = 'Show Full'
Enabled = False
ShortCut = 49222
OnClick = mnuShowFullClick
end
end
end
object OpenDialog: TOpenDialog
Filter =