mirror of
https://github.com/paleotronic/microm8-gui.git
synced 2024-06-08 16:29:33 +00:00
hide in caption if hidden
This commit is contained in:
parent
b15be38134
commit
ca9cb0ef68
|
@ -3174,8 +3174,8 @@ end;
|
||||||
procedure TGUIForm.FSTimerTimer(Sender: TObject);
|
procedure TGUIForm.FSTimerTimer(Sender: TObject);
|
||||||
begin
|
begin
|
||||||
isFS := (GetConfig( 'video/current.fullscreen' ) = '1');
|
isFS := (GetConfig( 'video/current.fullscreen' ) = '1');
|
||||||
|
if not hidden then
|
||||||
SimpleGet(baseUrl+'/api/control/system/heartbeat');
|
SimpleGet(baseUrl+'/api/control/system/heartbeat');
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TGUIForm.InputClick(Sender: TObject);
|
procedure TGUIForm.InputClick(Sender: TObject);
|
||||||
|
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
5
main.pas
5
main.pas
|
@ -3175,7 +3175,12 @@ procedure TGUIForm.FSTimerTimer(Sender: TObject);
|
||||||
begin
|
begin
|
||||||
isFS := (GetConfig( 'video/current.fullscreen' ) = '1');
|
isFS := (GetConfig( 'video/current.fullscreen' ) = '1');
|
||||||
if not hidden then
|
if not hidden then
|
||||||
|
begin
|
||||||
|
Caption := 'microM8 GUI';
|
||||||
SimpleGet(baseUrl+'/api/control/system/heartbeat');
|
SimpleGet(baseUrl+'/api/control/system/heartbeat');
|
||||||
|
end
|
||||||
|
else
|
||||||
|
Caption := 'microM8 GUI (hide)';
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TGUIForm.InputClick(Sender: TObject);
|
procedure TGUIForm.InputClick(Sender: TObject);
|
||||||
|
|
Loading…
Reference in New Issue
Block a user