Alles gute zum Geburtstag.
Feier schön
Beiträge von Schnitzel
-
-
Es gibt die Option OnExitFunc nicht mehr ===>
jap das liegt aber an der udf. da wollte ich egtl nichts ändern.
-
meistens läuft es so ab. du startest die exe mit bestimmten parametern und dann wird die installation vollständig im hindergrund ausgeführt.
die verfügbaren parameter musst du dir mit google suchen.
is meistens sogar leichter als die buttons usw mit window info rauszusuchen.
einige programme haben sowas schon.
ist aber noch nicht unbedingt die regel -
hab dir nach deiner pm nochmal was gebastelt. hoffe das beendet deine sorgen nun
-
ups ne das hab ich wohl übersehn. sry
ich schick mir gleich mal ne mail heim damit ichs nich nochmal vergess
wobei die silent installation wahrscheinlich fast das beste wäre
mit der hätt ichs auch erstmal probiert -
die trayitem haben doch standardmäßig das checked und unchecked.
brauchst doch nur statt den msgboxen deinen code einfügen, oder seh ich da was falsch?Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#Include <Constants.au3>Opt("TrayMenuMode", 1)
[/autoit] [autoit][/autoit] [autoit]
#Region ### START Koda GUI section ### Form=
TraySetClick("9")
$AutostartButton = TrayCreateItem("MenuItem1")
#EndRegion ### END Koda GUI section ###While 1
[/autoit]
$tmsg = TrayGetMsg()
Switch $tmsg
Case $AutostartButton
If BitAnd(TrayItemGetState($AutostartButton),$TRAY_CHECKED) Then
msgbox(0,"","checked")
Else
msgbox(0,"","unchecked")
EndIf
EndSwitch
WEnd -
an deiner stelle würde ich sie kopieren und testen obs funkioniert.
kann schon sein dass sie unter win98 nich lauffähig ist. aber das siehste ja dann. -
so hab dir da mal was gebastelt.
das ganze hat nur einen bug. und zwar weiß ich leider die standard styles nichtmehr und bin jetzt in eile. deshalb kriegst dus jetz einfach so^^ -
Hallo Gwyn,
das Beispiel aus der Hilfe zu _DateDiff ist die Antwort:
er wills doch andersrum oder hab ich da was falsch verstanden?
von unixzeit zu normalzeit is ja kein problem.
-
in wikipedia steht ein script. (unter Unix-Kommandos)
ihr müssts nur noch nach autoit übersetzten -
oder noch einfacher mit guictrlsetstate
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 447, 192, 124)
$Tab1 = GUICtrlCreateTab(8, 32, 601, 377)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
$TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
GUICtrlSetState(-1,$GUI_SHOW)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)sleep(1000)
[/autoit]
GUICtrlSetState($TabSheet1, $GUI_SHOW)
sleep(1000)
GUICtrlSetState($TabSheet2, $GUI_SHOW)
sleep(1000)
GUICtrlSetState($TabSheet3, $GUI_SHOW)
sleep(1000)
GUICtrlSetState($TabSheet4, $GUI_SHOW)
sleep(1000) -
hab die änderung im oberen post markiert
(zeile 53)man braucht nur Guidelete und muss dann die id angeben...
da is doch nix dabei oder?was hast du denn falsch gemacht
-
Spoiler anzeigen
[autoit]#include <EditConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiComboBox.au3>#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Pasword Abfrage", 258, 87, 192, 124)
$Input1 = GUICtrlCreateInput("", 128, 40, 121, 21,$ES_PASSWORD)
$Label1 = GUICtrlCreateLabel("Password Abfrage", 8, 0, 131, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Bitte Password eingeben:", 0, 40, 124, 17)
$Weiter = GUICtrlCreateButton("Weiter >", 8, 56, 75, 25, 0)
$Label3 = GUICtrlCreateLabel("Made by Mrx", 144, 16, 76, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Weiter
If GUICtrlRead($Input1) = "23081994" Then
ToolTip("Geht")
Main()
Else
TrayTip("Fehler","Sie haben das Fasche Password eingegeben!",6)
EndIf
EndSwitch
WEndFunc Oeffnen()
[/autoit] [autoit][/autoit] [autoit]
Opt("WinTitleMatchMode",2)
$Open = WinActivate("Editor")
If $Open = 0 Then
$Msg = MsgBox(32+3+262144,"Fehler #001","Der Editor konnte nciht gefunden werden."&@CRLF&"Soll der Editor geöffnet werden?")
If $Msg = 6 Then
Run("NOTEPAD.exe")
EndIf
If $Msg = 7 Then
Exit
EndIf
EndIf
Sleep(1000)
EndFuncFunc Main()
[/autoit] [autoit][/autoit] [autoit]
GUIDelete($Form1); >>>>>>>>>>HIER IST DIE ÄNDERUNG <<<<<<<<<<<<<<<<<<
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Michael Stiels\Desktop\AutoIT\KodaDesingner\Forms\HTML Helfer.kxf
$Form1 = GUICreate("HTML Helfer", 617, 447, 192, 124)
$Group1 = GUICtrlCreateGroup("Schriftarten", 8, 112, 257, 113)
$Fett = GUICtrlCreateButton("Fett", 16, 128, 75, 25, 0)
$Kursiv = GUICtrlCreateButton("Kursiv", 96, 128, 75, 25, 0)
$Unterstrichen = GUICtrlCreateButton("Unterstrichen", 16, 160, 75, 25, 0)
$Durchstreichen = GUICtrlCreateButton("Durchstrichen", 96, 160, 75, 25, 0)
$Hoch = GUICtrlCreateButton("Hochgestellt", 16, 192, 75, 25, 0)
$Tief = GUICtrlCreateButton("Tiefgestellte", 96, 192, 75, 25, 0)
$Blinken = GUICtrlCreateButton("Blinken", 176, 160, 75, 25, 0)
$Link = GUICtrlCreateButton("Link", 176, 128, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group2 = GUICtrlCreateGroup("Schriftgröße", 224, 232, 97, 113)
[/autoit] [autoit][/autoit] [autoit]
$Button7 = GUICtrlCreateButton("Schriftgröße", 232, 248, 75, 25, 0)
$Button8 = GUICtrlCreateButton("Big", 232, 280, 75, 25, 0)
$Button38 = GUICtrlCreateButton("Small", 232, 312, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group3 = GUICtrlCreateGroup("Faben in HTML ", 16, 248, 193, 81)
[/autoit] [autoit][/autoit] [autoit]
$HintergrundFarbe = GUICtrlCreateButton("Hintergrund", 24, 264, 75, 25, 0)
$FarbeSchrift = GUICtrlCreateButton("Farbe Schrift", 24, 296, 75, 25, 0)
Global $aColors[3][2] = [['Rot', '0xFF0000'], ['Grün', '0x00FF00'],['Blau', '0x0000FF']]
$Combo3 = GUICtrlCreateCombo($aColors[0][0], 104, 296, 97, 25,$CBS_DROPDOWNLIST)
For $i = 0 To UBound($aColors) - 1
GUICtrlSetData($Combo3, $aColors[$i][0])
Next
;~ GUICtrlSetData($Combo3,"Schwarz|Grün|Rot","item3")
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group4 = GUICtrlCreateGroup("Farben", 360, 224, 249, 209)
[/autoit] [autoit][/autoit] [autoit]
$Schwarz = GUICtrlCreateButton("Schwarz", 368, 240, 75, 25, 0)
$RotBraun = GUICtrlCreateButton("Rotbraun", 448, 240, 75, 25, 0)
$Gruen = GUICtrlCreateButton("Grün", 528, 240, 75, 25, 0)
$Olive = GUICtrlCreateButton("Olive", 368, 272, 75, 25, 0)
$Marnineblau = GUICtrlCreateButton("Marnineblau", 448, 272, 75, 25, 0)
$Lila = GUICtrlCreateButton("Lila", 528, 272, 75, 25, 0)
$Smaragdgruen = GUICtrlCreateButton("Smaragdgrün", 368, 304, 75, 25, 0)
$Grau = GUICtrlCreateButton("Grau", 448, 304, 75, 25, 0)
$Silber = GUICtrlCreateButton("Silber", 528, 304, 75, 25, 0)
$Rot = GUICtrlCreateButton("Rot", 368, 336, 75, 25, 0)
$Hellgruen = GUICtrlCreateButton("Hellgrün", 448, 336, 75, 25, 0)
$Gelb = GUICtrlCreateButton("Gelb", 528, 336, 75, 25, 0)
$Blau = GUICtrlCreateButton("Blau", 368, 368, 75, 25, 0)
$Pink = GUICtrlCreateButton("Pink", 448, 368, 75, 25, 0)
$Aqua = GUICtrlCreateButton("Aqua", 528, 368, 75, 25, 0)
$Weiss = GUICtrlCreateButton("Weiß", 448, 400, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group5 = GUICtrlCreateGroup("Allgemein", 8, 352, 169, 81)
[/autoit] [autoit][/autoit] [autoit]
$Button29 = GUICtrlCreateButton("Anfang", 16, 368, 75, 25, 0)
$Button30 = GUICtrlCreateButton("Kopfbereich", 96, 368, 75, 25, 0)
$Button31 = GUICtrlCreateButton("Mittelteil", 16, 400, 75, 25, 0)
$Button32 = GUICtrlCreateButton("Titel", 96, 400, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group6 = GUICtrlCreateGroup("Satzaufbau", 184, 352, 169, 81)
[/autoit] [autoit][/autoit] [autoit]
$Button33 = GUICtrlCreateButton("Bündig", 192, 368, 75, 25, 0)
$Combo1 = GUICtrlCreateCombo("Combo1", 272, 368, 73, 25)
$Button34 = GUICtrlCreateButton("Zitat", 192, 400, 75, 25, 0)
$Button35 = GUICtrlCreateButton("Umbruch", 272, 400, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group7 = GUICtrlCreateGroup("Verschiedenes", 280, 120, 329, 97)
[/autoit] [autoit][/autoit] [autoit]
$Button37 = GUICtrlCreateButton("Eingabe Feld", 288, 136, 75, 25, 0)
$Combo2 = GUICtrlCreateCombo("Imput", 376, 136, 209, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Input1 = GUICtrlCreateInput("", 328, 80, 257, 21)
[/autoit] [autoit][/autoit] [autoit]
$Label1 = GUICtrlCreateLabel("Text der geschrieben werden soll:", 128, 80, 196, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("HTML Helfer", 248, 8, 105, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("Made by Mrx", 264, 32, 80, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Fett
Oeffnen()
Send("<b>"&GUICtrlRead($Input1)&"</b>")
Case $Kursiv
Oeffnen()
Send("<i>"&GUICtrlRead($Input1)&"</i>")
Case $Unterstrichen
Oeffnen()
Send("<u>"&GUICtrlRead($Input1)&"</u>")
Case $Durchstreichen
Oeffnen()
Send("<s>"&GUICtrlRead($Input1)&"</s>")
Case $Hoch
Oeffnen()
Send("<sup>"&GUICtrlRead($Input1)&"</sup>")
Case $Tief
Oeffnen()
Send("<sub>"&GUICtrlRead($Input1)&"</sub>")
Case $Blinken
Oeffnen()
Send("<blink>"&GUICtrlRead($Input1)&"</blink>")
Case $Link
Oeffnen()
$I1=InputBox("Link","Bitte geben sie die Internetadresse ein!","http://www.")
$I2=InputBox("Link","Bitte geben sie die den Namen der Internetadresse ein!")
Send('<a href="'&$I1&'">'&$I2&'</a>')
;~ -------------------------------------------------------------
Case $HintergrundFarbe
Oeffnen()
Send('<body bgcolor="'&GUICtrlRead($Input1)&'">')
Case $FarbeSchrift
Oeffnen()
$iSelect = _GUICtrlComboBox_GetCurSel($Combo3)
Send('<font color="'&Send($aColors[$iSelect][1])&'">'&GUICtrlRead($Input1)&'</font>')
;~ -------------------------------------------------------------
Case $Schwarz
Oeffnen()
Send("#000000",1)
Case $RotBraun
Oeffnen()
Send("#800000",1)
Case $Gruen
Oeffnen()
Send("#008000",1)
Case $Olive
Oeffnen()
Send("#808000",1)
Case $Marnineblau
Oeffnen()
Send("#000080",1)
Case $Lila
Oeffnen()
Send("#800080",1)
Case $Smaragdgruen
Oeffnen()
Send("#008080",1)
Case $Grau
Oeffnen()
Send("#808080",1)
Case $Silber
Oeffnen()
Send("#c0c0c0",1)
Case $Rot
Oeffnen()
Send("#FF0000",1)
Case $Hellgruen
Oeffnen()
Send("#00FF00",1)
Case $Gelb
Oeffnen()
Send("#FFFF00",1)
Case $Blau
Oeffnen()
Send("#0000FF",1)
Case $Pink
Oeffnen()
Send("#FF00FF",1)
Case $Aqua
Oeffnen()
Send("#00FFFF",1)
Case $Weiss
Oeffnen()
Send("#FFFFFF",1)
;~ --------------------------------------------------------------
EndSwitch
WEnd
EndFunc -
schau dir mal guidelete oder guisetstate an
-
war das jetzt so schwer?
so hat mans wenigstens nach 2 min...
die includes müssen auserhalb der funktion stehen und doppelt brauchst du sie auch nicht
Spoiler anzeigen
[autoit]#include <EditConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiComboBox.au3>#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Pasword Abfrage", 258, 87, 192, 124)
$Input1 = GUICtrlCreateInput("", 128, 40, 121, 21,$ES_PASSWORD)
$Label1 = GUICtrlCreateLabel("Password Abfrage", 8, 0, 131, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Bitte Password eingeben:", 0, 40, 124, 17)
$Weiter = GUICtrlCreateButton("Weiter >", 8, 56, 75, 25, 0)
$Label3 = GUICtrlCreateLabel("Made by Mrx", 144, 16, 76, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Weiter
If GUICtrlRead($Input1) = "23081994" Then
ToolTip("Geht")
Main()
Else
TrayTip("Fehler","Sie haben das Fasche Password eingegeben!",6)
EndIf
EndSwitch
WEndFunc Oeffnen()
[/autoit] [autoit][/autoit] [autoit]
Opt("WinTitleMatchMode",2)
$Open = WinActivate("Editor")
If $Open = 0 Then
$Msg = MsgBox(32+3+262144,"Fehler #001","Der Editor konnte nciht gefunden werden."&@CRLF&"Soll der Editor geöffnet werden?")
If $Msg = 6 Then
Run("NOTEPAD.exe")
EndIf
If $Msg = 7 Then
Exit
EndIf
EndIf
Sleep(1000)
EndFuncFunc Main()
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Michael Stiels\Desktop\AutoIT\KodaDesingner\Forms\HTML Helfer.kxf
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("HTML Helfer", 617, 447, 192, 124)
$Group1 = GUICtrlCreateGroup("Schriftarten", 8, 112, 257, 113)
$Fett = GUICtrlCreateButton("Fett", 16, 128, 75, 25, 0)
$Kursiv = GUICtrlCreateButton("Kursiv", 96, 128, 75, 25, 0)
$Unterstrichen = GUICtrlCreateButton("Unterstrichen", 16, 160, 75, 25, 0)
$Durchstreichen = GUICtrlCreateButton("Durchstrichen", 96, 160, 75, 25, 0)
$Hoch = GUICtrlCreateButton("Hochgestellt", 16, 192, 75, 25, 0)
$Tief = GUICtrlCreateButton("Tiefgestellte", 96, 192, 75, 25, 0)
$Blinken = GUICtrlCreateButton("Blinken", 176, 160, 75, 25, 0)
$Link = GUICtrlCreateButton("Link", 176, 128, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group2 = GUICtrlCreateGroup("Schriftgröße", 224, 232, 97, 113)
[/autoit] [autoit][/autoit] [autoit]
$Button7 = GUICtrlCreateButton("Schriftgröße", 232, 248, 75, 25, 0)
$Button8 = GUICtrlCreateButton("Big", 232, 280, 75, 25, 0)
$Button38 = GUICtrlCreateButton("Small", 232, 312, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group3 = GUICtrlCreateGroup("Faben in HTML ", 16, 248, 193, 81)
[/autoit] [autoit][/autoit] [autoit]
$HintergrundFarbe = GUICtrlCreateButton("Hintergrund", 24, 264, 75, 25, 0)
$FarbeSchrift = GUICtrlCreateButton("Farbe Schrift", 24, 296, 75, 25, 0)
Global $aColors[3][2] = [['Rot', '0xFF0000'], ['Grün', '0x00FF00'],['Blau', '0x0000FF']]
$Combo3 = GUICtrlCreateCombo($aColors[0][0], 104, 296, 97, 25,$CBS_DROPDOWNLIST)
For $i = 0 To UBound($aColors) - 1
GUICtrlSetData($Combo3, $aColors[$i][0])
Next
;~ GUICtrlSetData($Combo3,"Schwarz|Grün|Rot","item3")
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group4 = GUICtrlCreateGroup("Farben", 360, 224, 249, 209)
[/autoit] [autoit][/autoit] [autoit]
$Schwarz = GUICtrlCreateButton("Schwarz", 368, 240, 75, 25, 0)
$RotBraun = GUICtrlCreateButton("Rotbraun", 448, 240, 75, 25, 0)
$Gruen = GUICtrlCreateButton("Grün", 528, 240, 75, 25, 0)
$Olive = GUICtrlCreateButton("Olive", 368, 272, 75, 25, 0)
$Marnineblau = GUICtrlCreateButton("Marnineblau", 448, 272, 75, 25, 0)
$Lila = GUICtrlCreateButton("Lila", 528, 272, 75, 25, 0)
$Smaragdgruen = GUICtrlCreateButton("Smaragdgrün", 368, 304, 75, 25, 0)
$Grau = GUICtrlCreateButton("Grau", 448, 304, 75, 25, 0)
$Silber = GUICtrlCreateButton("Silber", 528, 304, 75, 25, 0)
$Rot = GUICtrlCreateButton("Rot", 368, 336, 75, 25, 0)
$Hellgruen = GUICtrlCreateButton("Hellgrün", 448, 336, 75, 25, 0)
$Gelb = GUICtrlCreateButton("Gelb", 528, 336, 75, 25, 0)
$Blau = GUICtrlCreateButton("Blau", 368, 368, 75, 25, 0)
$Pink = GUICtrlCreateButton("Pink", 448, 368, 75, 25, 0)
$Aqua = GUICtrlCreateButton("Aqua", 528, 368, 75, 25, 0)
$Weiss = GUICtrlCreateButton("Weiß", 448, 400, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group5 = GUICtrlCreateGroup("Allgemein", 8, 352, 169, 81)
[/autoit] [autoit][/autoit] [autoit]
$Button29 = GUICtrlCreateButton("Anfang", 16, 368, 75, 25, 0)
$Button30 = GUICtrlCreateButton("Kopfbereich", 96, 368, 75, 25, 0)
$Button31 = GUICtrlCreateButton("Mittelteil", 16, 400, 75, 25, 0)
$Button32 = GUICtrlCreateButton("Titel", 96, 400, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group6 = GUICtrlCreateGroup("Satzaufbau", 184, 352, 169, 81)
[/autoit] [autoit][/autoit] [autoit]
$Button33 = GUICtrlCreateButton("Bündig", 192, 368, 75, 25, 0)
$Combo1 = GUICtrlCreateCombo("Combo1", 272, 368, 73, 25)
$Button34 = GUICtrlCreateButton("Zitat", 192, 400, 75, 25, 0)
$Button35 = GUICtrlCreateButton("Umbruch", 272, 400, 75, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Group7 = GUICtrlCreateGroup("Verschiedenes", 280, 120, 329, 97)
[/autoit] [autoit][/autoit] [autoit]
$Button37 = GUICtrlCreateButton("Eingabe Feld", 288, 136, 75, 25, 0)
$Combo2 = GUICtrlCreateCombo("Imput", 376, 136, 209, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)$Input1 = GUICtrlCreateInput("", 328, 80, 257, 21)
[/autoit] [autoit][/autoit] [autoit]
$Label1 = GUICtrlCreateLabel("Text der geschrieben werden soll:", 128, 80, 196, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("HTML Helfer", 248, 8, 105, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("Made by Mrx", 264, 32, 80, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Fett
Oeffnen()
Send("<b>"&GUICtrlRead($Input1)&"</b>")
Case $Kursiv
Oeffnen()
Send("<i>"&GUICtrlRead($Input1)&"</i>")
Case $Unterstrichen
Oeffnen()
Send("<u>"&GUICtrlRead($Input1)&"</u>")
Case $Durchstreichen
Oeffnen()
Send("<s>"&GUICtrlRead($Input1)&"</s>")
Case $Hoch
Oeffnen()
Send("<sup>"&GUICtrlRead($Input1)&"</sup>")
Case $Tief
Oeffnen()
Send("<sub>"&GUICtrlRead($Input1)&"</sub>")
Case $Blinken
Oeffnen()
Send("<blink>"&GUICtrlRead($Input1)&"</blink>")
Case $Link
Oeffnen()
$I1=InputBox("Link","Bitte geben sie die Internetadresse ein!","http://www.")
$I2=InputBox("Link","Bitte geben sie die den Namen der Internetadresse ein!")
Send('<a href="'&$I1&'">'&$I2&'</a>')
;~ -------------------------------------------------------------
Case $HintergrundFarbe
Oeffnen()
Send('<body bgcolor="'&GUICtrlRead($Input1)&'">')
Case $FarbeSchrift
Oeffnen()
$iSelect = _GUICtrlComboBox_GetCurSel($Combo3)
Send('<font color="'&Send($aColors[$iSelect][1])&'">'&GUICtrlRead($Input1)&'</font>')
;~ -------------------------------------------------------------
Case $Schwarz
Oeffnen()
Send("#000000",1)
Case $RotBraun
Oeffnen()
Send("#800000",1)
Case $Gruen
Oeffnen()
Send("#008000",1)
Case $Olive
Oeffnen()
Send("#808000",1)
Case $Marnineblau
Oeffnen()
Send("#000080",1)
Case $Lila
Oeffnen()
Send("#800080",1)
Case $Smaragdgruen
Oeffnen()
Send("#008080",1)
Case $Grau
Oeffnen()
Send("#808080",1)
Case $Silber
Oeffnen()
Send("#c0c0c0",1)
Case $Rot
Oeffnen()
Send("#FF0000",1)
Case $Hellgruen
Oeffnen()
Send("#00FF00",1)
Case $Gelb
Oeffnen()
Send("#FFFF00",1)
Case $Blau
Oeffnen()
Send("#0000FF",1)
Case $Pink
Oeffnen()
Send("#FF00FF",1)
Case $Aqua
Oeffnen()
Send("#00FFFF",1)
Case $Weiss
Oeffnen()
Send("#FFFFFF",1)
;~ --------------------------------------------------------------
EndSwitch
WEnd
EndFunc -
und das hauptscript ohne diesem teil funktioniert auch?
poste doch einfach mal alles
-
welche autoit version haste denn installiert?
-
mal abgesehn von main funktioniert es bei mir auch ohne fehler.
das problem liegt also wo anderes. und wie der debugger schon sagt. irgendwo fehlt vermutlich n endfunc
-
was haste denn in main() stehen?
-
da solltest du dir lieber die hover udf ansehen.
wie gesagt meins war blos ein sehr einfaches beispiel. das ganze ist nicht gut lauffähig.
SEuBo hatte ihn zwar schon gepostet aber hier nochmal.
http://www.autoitscript.com/forum/index.php?showtopic=55120
lad dir die aktuellste version runter. da sind viele beispiele dabei