nicht angemeldet
Registry Einträge / Design
Hi an alle Selfhtml Nutzer! :-)
Ich habe unten mal einen *.hta code gepostet, zu dem ich einige Fragen habe.
FRAGEN ZUR *.HTA DATEI
------------------
Design
------------------
1.) Wie kann ich eine manuelle Vergrößerung des Fensters (mit dem Mauszeiger)
unterbinden?
2.) Wie kann ich Buttons zum minimieren, maximieren und schließen des
Fensters einbinden?
Der Button, den ich in das Fenster eingefügt habe, sieht irgendwie
unprofessionell aus. Ich habe auch schon mit den Tags "minimize bzw.
maximize" herumexperimentiert... nichts hilft, es zeigen sich keine Buttons
in der Überschriftszeile.
------------------
Programmiertechnik
------------------
3.) Ist es möglich den Text, den der Benutzer in die zwei Felder
hinenschreiben kann, in die Registry, als
"LegalNoticeCaption und LegalNoticeText einzutragen?"
Das einzeilige Feld soll dabei die "LegalNoticeCaption" bilden, das
mehrzeilige den "LegalNoticeText".
Ich habe das schon mal probiert, aber es trägt sich nichts in die
Registry ein. Wie würde so ein Syntax aussehen?
Bitte schreibt zurückt, wenn ihr auch nur eine Antwort auf eine der Fragen
habt.
-----------------------------------------
HIER IST DER *.HTA-CODE
-----------------------------------------
<html>
<head>
<hta:application
id ="irgendwas"
applicationName="irgendwas"
border="no"
borderStyle="no"
caption="yes"
contextMenu="yes"
innerBorder="no"
maximizeButton="no"
minimizeButton="no"
navigable="no"
scroll="no"
scrollFlat="no"
selection="no"
showInTaskBar="yes"
singleInstance="yes"
sysMenu="no"
version="1.0"
windowState="maximize">
<title>irgendwas</title>
<script type="text/javascript" language="JavaScript">
<!--
sizeX = 500;
sizeY = 350;
self.resizeTo(sizeX,sizeY);
self.moveTo(Math.round((screen.availWidth-sizeX)/2),Math.round((screen.availHeight-sizeY)/2));
//-->
</script>
<script language="VBScript">
<!--
Sub Button_onClick
Dim RegPfad, ProductNralt, FirmenName, ProduktNrNeu
ProduktNrNeu = 1234567890
set wshell = CreateObject("WScript.Shell")
RegPfad = "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon"
ProductNRalt = wshell.RegRead(RegPfad)
Wshell.RegWrite RegPfad, ProduktNrNeu
Wshell.RegWrite RegPfad, ProductNralt
End Sub
-->
</script>
<style>
body { scrollbar-arrow-color: #ffcc00; scrollbar-base-color: #000000 }
</style>
</head>
<script type="text/javascript" language="JavaScript">
function quest()
{if (confirm("Beenden?"))
{window.close()}}
</script>
<body>
<body bgcolor="#000000">
<font face="Arial"; size="-1"; color="#ffffff"><p align="justify">
<input type="Button" value="x" onClick="quest()"></form> Dieses Programm
soll eine Nachricht für den nächsten Benutzer dieses
PC's hinterlassen.</p></font>
<p align="left">
<input name="Titel" size="18" maxlength="40" tabindex="1" style="background-color:#ffcc00" title="Überschrift eingeben" style="font-family: Arial,Helvetica; font-size:10pt; color:#000000">
<br>
<br>
<textarea name="Nachricht" rows="5" cols="40" tabindex="1"
style="background-color:#ffcc00" title="Bitte Nachricht eingeben" style="font-family: Arial,Helvetica; font-size:10pt; color:#000000">
</textarea></p>
<div>
<p align="left">
<input Name="Button" Type="Button" Value="Nachricht hinterlassen"
style="color:#000000; background-color:#00ff00"><input Name="Button"
Type="Button" Value="Löschen" style="color:#000000;
background-color:#ff0000"></div></p>
</form>
</body>
</html>
-----------------------------------------
Vielen vielen Dank für eure Unterstüzung.
Christian
-
guten Abend,
1.) Wie kann ich eine manuelle Vergrößerung des Fensters (mit dem Mauszeiger)
unterbinden?mit MAXIMIZEBUTTON="no"
2.) Wie kann ich Buttons zum minimieren, maximieren und schließen des
Fensters einbinden?Mach eine Framekonstruktion draus, mit einem Frame "oben", in dem du die benötigten buttons anordnest
Der Button, den ich in das Fenster eingefügt habe, sieht irgendwie
unprofessionell aus.Dann steck doch eine kleine Grafik rein, die dir besser gefällt.
3.) Ist es möglich den Text, den der Benutzer in die zwei Felder
hinenschreiben kann, in die Registry, als
"LegalNoticeCaption und LegalNoticeText einzutragen?"das müßte mit ActiveX gehen. Aber wozu brauchst du das überhaupt ?
Christoph S.