Mein Problem ist es in der suche da sind suchmaschienen aufgelistet im $Input1 soll das gesuchte wort dann auch da gefunden werden die anzeige von den Suchseiten kommen unten im Browser aber nicht mit den such ergebnissen
2 Problem mir ist die schrift im browser ein deutig was zu gross will das sie etwas angepasst wird aber mit diesen befehl geht das nicht
GUICtrlSetFont($Group1, 8, 400, 0, "MS Sans Serif")
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.2.10.0
Author: Sirocool
Script Function: Browser
Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#include <GUIConstants.au3>
#include <IE.au3>
#include <INet.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiListView.au3>
#include <ListViewConstants.au3>
#include <StructureConstants.au3>
Local $VerlaufINI = @ScriptDir & "\verlauf.ini"
Local $SperrungINI = @ScriptDir & "\Sperrung.ini"
Dim $version = "0.0.5"
[/autoit][autoit][/autoit][autoit]#Region ### START Koda GUI section ###
$Form1=GUICreate("Browser",@DesktopWidth,@DesktopHeight, 0, 0)
GUISetIcon("C:\Dokumente und Einstellungen\Administrator\Eigene Dateien\Eigene Bilder\favicon.ico")
GUISetStyle(0xffffff)
GUISetCursor (0)
GUISetBkColor(0xFFFFFF)
$ie = _IECreateEmbedded()
$Group1 = GUICtrlCreateObj($ie, 0, 25, @DesktopWidth, 800)
GUICtrlSetFont($Group1, 8, 400, 0, "MS Sans Serif")
$ie.navigate("http://autoit.de/")
$Combo1 = GUICtrlCreateCombo("--== Choose ==--", 624, 0, 129, 21)
GUICtrlSetData(-1,"Google|Fireball|Yahoo|MSN")
$Input1 = GUICtrlCreateInput("Input1",750, 0, 129, 21)
$Button1 = GUICtrlCreateButton("Suchen", 880, 0, 75, 21, 0)
$Icon = GUICtrlCreateInput("Icon", 168, 0, 33, 21)
$Input2=GUICtrlCreateInput("", 200, 0, 297, 21)
$Button2 = GUICtrlCreateButton("OK", 500, 0, 75, 21, 0)
$Button3 = GUICtrlCreateButton("Zurrück", 0, 0, 75, 21, 0)
$Button4 = GUICtrlCreateButton("Vorwärts", 74, 0, 75, 21, 0)
$MenuItem6 = GUICtrlCreateMenu("&Datei")
$MenuItem13 = GUICtrlCreateMenuItem("neues Fenster Strg+N", $MenuItem6)
$MenuItem12 = GUICtrlCreateMenuItem("neuer Tab Strg+T", $MenuItem6)
$MenuItem11 = GUICtrlCreateMenuItem("", $MenuItem6)
$MenuItem10 = GUICtrlCreateMenuItem("Datei öffnen Strg+O", $MenuItem6)
$MenuItem9 = GUICtrlCreateMenuItem("Seite speichern Strg+S", $MenuItem6)
$MenuItem8 = GUICtrlCreateMenuItem("", $MenuItem6)
$MenuItem15 = GUICtrlCreateMenuItem("Druckvorschau", $MenuItem6)
$MenuItem14 = GUICtrlCreateMenuItem("Drucken Strg+P", $MenuItem6)
$MenuItem7 = GUICtrlCreateMenuItem("", $MenuItem6)
$MenuItem16 = GUICtrlCreateMenuItem("Beenden", $MenuItem6)
$MenuItem5 = GUICtrlCreateMenu("&Bearbeiten")
$MenuItem4 = GUICtrlCreateMenu("&Ansicht")
$MenuItem26 = GUICtrlCreateMenuItem("Symbolleisten", $MenuItem4)
$MenuItem25 = GUICtrlCreateMenuItem("Statusleiste", $MenuItem4)
$MenuItem24 = GUICtrlCreateMenuItem("Sidebar", $MenuItem4)
$MenuItem23 = GUICtrlCreateMenuItem("", $MenuItem4)
$MenuItem29 = GUICtrlCreateMenuItem("Stoppen", $MenuItem4)
$MenuItem28 = GUICtrlCreateMenuItem("Aktualisieren", $MenuItem4)
$MenuItem27 = GUICtrlCreateMenuItem("", $MenuItem4)
$MenuItem31 = GUICtrlCreateMenuItem("Zoom", $MenuItem4)
$MenuItem30 = GUICtrlCreateMenuItem("Codierung", $MenuItem4)
$MenuItem32 = GUICtrlCreateMenuItem("", $MenuItem4)
$MenuItem34 = GUICtrlCreateMenuItem("Quelltext", $MenuItem4)
$MenuItem33 = GUICtrlCreateMenuItem("Vollbild", $MenuItem4)
$MenuItem3 = GUICtrlCreateMenu("&Favoriten")
$MenuItem2 = GUICtrlCreateMenu("&Extras")
$MenuItem37 = GUICtrlCreateMenuItem("Sperrung von Internet Seiten", $MenuItem2)
$MenuItem35 = GUICtrlCreateMenuItem("Radio", $MenuItem2)
$MenuItem36 = GUICtrlCreateMenuItem("Fernsehn", $MenuItem2)
$MenuItem1 = GUICtrlCreateMenu("&Hilfe")
$MenuItem18 = GUICtrlCreateMenuItem("Versions Info", $MenuItem1)
$MenuItem17 = GUICtrlCreateMenuItem("Hilfe Forum", $MenuItem1)
$MenuItem19 = GUICtrlCreateMenuItem("", $MenuItem1)
$MenuItem20 = GUICtrlCreateMenuItem("nach Updates suchen", $MenuItem1)
$MenuItem21 = GUICtrlCreateMenuItem("", $MenuItem1)
$MenuItem22 = GUICtrlCreateMenuItem("Über Browser", $MenuItem1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button2
If StringInStr(FileRead("sperrung.ini"), GUICtrlRead($Input2)) Then
MsgBox(48, "Sperrung", "Diese Seite ist gesperrt!")
Else
_IENavigate($ie,GUICtrlRead($Input2),0)
EndIf
Case $Button3
$ie.GoBack
Case $Button4
$ie.GoForward
Case $Combo1
If GUICtrlRead($Combo1,$Input1) = "Google" then $ie.navigate("http://www.google.de/")
If GUICtrlRead($Combo1,$Input1) = "Fireball" then $ie.navigate("http://www.Fireball.de/")
If GUICtrlRead($Combo1,$Input1) = "Yahoo" then $ie.navigate("http://www.Yahoo.de/")
If GUICtrlRead($Combo1,$Input1) = "MSN"then $ie.navigate("http://www.Msn.de/")
Case $Button1
$ie.navigate($Combo1,$Input1,$Group1)
EndSwitch
WEnd
Später wenn ich diese problem mit eurer Hilfe fertig habe kann mann dann schon mal in der Version 1 vom browser dann auch Internetseiten speeren und wieder auf heben aber diese obtion ist auf meinen rechner noch
will erstmal nur die beiden Probleme gelöst bekommen
Und wenn der User mit spielt den ich angeschrieben habe ist in Version 1 auch schon Radio mit drin