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