hta tag dynamisch anpassen

Vollbild dynamisch ein/aus-schalten (HTApplication)

Ich möchte per tastendruck(F11) Vollbild aufrufen können.
von mir aus gesehen habe ich die fertige Lösung.
Das Problem:
die werte werden zwar verändert aber leider das aussehen meiner hta nicht.

ist mein Vorhaben überhaupt möglich, oder wie könnte ich das machen?

hier noch ein ausschnitt aus meiner hta:

<head>
<hta:application
 id=hta
 caption="yes"  
 windowstate="normal"  
 />
</head>


<script language="VBScript">  
Dim rKeyboard_

Sub rKeyboard(self)
 'wurde F11 gedrückt dann weiter  
 if self.event.keycode<>122 Then Exit Sub
 'Fensterstatus zwischenspeichern  
 rKeyboard_= hta.windowstate
 if hta.caption = "yes" Then  
 'wenn nicht Vollbild, mache Vollbild  
  hta.windowstate="maximize"  
  hta.caption="no"  
 Else
  hta.windowstate=rKeyboard_
  hta.caption="yes"  
 End If
End Sub

</script>

<body onkeyup="rKeyboard(self)">  
 irgendwas
</body>

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 121796

Url: https://administrator.de/contentid/121796

Ausgedruckt am: 22.11.2024 um 01:11 Uhr

5 Kommentare

Neuester Kommentar

Hallo aFankhauser!

WindowState kann offensichtlich nur unter HTA:API festgelegt werden. Alternativ könntest Du das über ResizeTo und MoveTo machen.

Hta-Fenster anhand der Desktop-Größe entsprechend anpassen:

<SCRIPT Language="VBScript">  
    window.resizeTo Screen.Width, Screen.Height - 60 'Höhe - Höhe Taskleiste  
    window.moveTo 0, 0
 </SCRIPT>

Gruß Dieter

[edit] Auf Anregung von bastla und aFrankhauser geändert [/edit]

... wobei sich dann anstelle der Zeilen 11 bis 14 vielleicht eher anbietet:

window.resizeTo intWidth, intHeight - 27
window.moveTo 0,0

Grüße
bastla

Hallo bastla!

Stimmt, auf die Voreinstellung hatte ich nicht mehr geachtet, die war war bei meinem Test mit WindowState gerade anders herum

Gruß Dieter

ahh *kopfschlag*
dass ich da nicht schon selbst draufgekommen bin.

danke @all
ich hab's jetzt noch ein wenig abgekürzt:

 window.moveto 0-4,0-30 '-4 & -30 wegen dem Rand  
 window.resizeTo screen.width+8,screen.height+34 '+8 & +34 wegen dem Rand  

nun hab ich aber noch das Problem, dass mir die Startleiste immer noch im bild ist.
vielleicht habt ihr dazu auch noch so eine einfache lösung.

#edit:
erneutes Problem. hab sie jetzt mal so eingestellt, dass sie automatisch ausblendet.
und dann habe ich gesehen, dass ich die Prog.-oberfläche nicht hoch genug machen kann >es bildet sich immer ein rand unten am Bildschirm.

Hallo aFrankhauser!

Das man die Desktop-Größe mit einem einfachen screen.width und screen.height abfragen kann wußte ich auch nicht.

Bei Deinem anderen Problem kann ich Dir leider nicht helfen