AutoIt - Browser + Extras

Page 2 of 3 1 2 3
10/21/2010 22:42 .Moskito#16
püüüüüssh :>
10/22/2010 01:02 MrSm!th#17
wenn niemand antwortet, dann lass es doch gut sein, es wird schon nicht in den tiefen des forums versinken.
10/22/2010 21:28 lolkop#18
Quote:
Originally Posted by .Moskito View Post
In diesem TuT zeige ich euch, wie ihr
euch ganz leicht einen Internet-Browser Scriptet
das ganze sollte vielleicht eher umformuliert werden zu wie man eine eigene oberfläche für den internetexplorer erstellt...

sry aber das musste jetzt mal sein :P

naja aber mal zum script an sich...
verstehe nicht so ganz warum du sachen wie:
Quote:
Code:
$GUI_radio_google = GUICtrlCreateRadio("Google", 1056, 72, 113, 17) 
GUICtrlSetFont(-1, 10, 400, 0, "@Arial Unicode MS") 
$GUI_radio_youtube = GUICtrlCreateRadio("YouTube", 1056, 96, 113, 17) 
GUICtrlSetFont(-1, 10, 400, 0, "@Arial Unicode MS") 
$GUI_radio_amazon = GUICtrlCreateRadio("Amazon", 1056, 120, 113, 17) 
GUICtrlSetFont(-1, 10, 400, 0, "@Arial Unicode MS") 
$GUI_radio_wikipedia = GUICtrlCreateRadio("Wikipedia", 1056, 144, 113, 17) 
GUICtrlSetFont(-1, 10, 400, 0, "@Arial Unicode MS") 
$GUI_radio_ebay = GUICtrlCreateRadio("Ebay", 1056, 168, 113, 17) 
GUICtrlSetFont(-1, 10, 400, 0, "@Arial Unicode MS") 
$GUI_radio_yahoo = GUICtrlCreateRadio("Yahoo", 1056, 192, 113, 17) 
GUICtrlSetFont(-1, 10, 400, 0, "@Arial Unicode MS") 
$GUI_radio_forestle = GUICtrlCreateRadio("Forestle", 1056, 216, 113, 17) 
GUICtrlSetFont(-1, 10, 400, 0, "@Arial Unicode MS")
nicht in einer schleife realisierst.
auch das event handling wäre bei weitem einfacher, wenn du das mit einer schleife abarbeiten würdest.
10/25/2010 17:50 sava#19
Hi und Hallo :D

erstmal sehr Nett gemacht ;)

Hast du bereits eine Lösung gefunden sodass die größen auch im Vollbild funktionieren?

Ich habe bereits ein paar Bugs entfernt und eine bessere Lesezeichen funktion eingebaut ;) werde die mal in nächster Zeit hochladen vielleicht gefällt dir das ja =)

Bis dann
10/30/2010 15:05 .Moskito#20
@lolkop,
klar ginge es, ich finde jedoch so ist es viel leichter zu verstehen für Neulinge.. :)

Quote:
Originally Posted by sava View Post
Hi und Hallo :D

erstmal sehr Nett gemacht ;)

Hast du bereits eine Lösung gefunden sodass die größen auch im Vollbild funktionieren?

Ich habe bereits ein paar Bugs entfernt und eine bessere Lesezeichen funktion eingebaut ;) werde die mal in nächster Zeit hochladen vielleicht gefällt dir das ja =)

Bis dann
Immer her damit :)
11/01/2010 10:40 sava#21
Heyho,

war etwas beschäftigt mit anderem Zeugs :D

Das wäre eigentlich so en einfaches auslesen aus ner Ini Datei, die beinhaltet halt die Anzahl der Favoriten, Namen und Link zu jedem.
Jedoch legt das hier auch MenuItems an.
Code:
$favs_anzahl = IniRead("data/favs.ini", "fav_anzahl", "anzahl", "0")

Dim $FavNameArray[$favs_anzahl]
Dim $FavGUILink[$favs_anzahl]

For $i = 1 to $favs_anzahl
	$FavNameArray[$i-1] = IniRead("data/favs.ini", "fav_name", $i, "ERROR")
	$FavGUILink[$i-1]	= IniRead("data/favs.ini", "fav_link", $i, "ERROR")
Next
	For $z = 1 to $favs_anzahl
		$FavNameArray[$z-1] = GUICtrlCreateMenuItem($FavNameArray[$z-1], $GUI_menu_lesezeichen)		
		GUICtrlSetOnEvent($FavNameArray[$z-1], "favoriten_button")
	Next
Das wäre die fav.ini
Code:
[fav_name]
1=Google
2=Googlemail
3=Facebook
4=Wer-Kennt-Wen
[fav_link]
1=http://www.google.de
2=http://www.googlemail.com
3=http://www.facebook.com
4=http://www.wer-kennt-wen.de
[fav_anzahl]
anzahl=4
//EDIT

Hab vergessen zu sagen wie man des aufruft :D

Ich mache das mit GUISetOnEvent

Code:
Func favoriten_button()
	_IENavigate($oIE[$iAktiverTab], $FavGUILink[@GUI_CtrlId - 35])
EndFunc
Dass man auch Favoriten per Button einfügen kann, mache ich bald, hab mirs grad etwas zerschossen :D

Mfg
11/01/2010 14:51 lolkop#22
und warum baust du die ini nicht so auf?
Code:
[favorites]
Google=http://www.google.de
Googlemail=http://www.googlemail.com
Facebook=http://www.facebook.com
Wer-Kennt-Wen=http://www.wer-kennt-wen.de
wäre doch wohl deutlich einfacher...
11/01/2010 14:56 sava#23
Quote:
Originally Posted by lolkop View Post
und warum baust du die ini nicht so auf?
Code:
[favorites]
Google=http://www.google.de
Googlemail=http://www.googlemail.com
Facebook=http://www.facebook.com
Wer-Kennt-Wen=http://www.wer-kennt-wen.de
wäre doch wohl deutlich einfacher...
Wenn du meinst du bekommst das so hin, dann zeig uns das doch bitte mal sow
11/01/2010 15:21 lolkop#24
Quote:
Originally Posted by sava View Post
Wenn du meinst du bekommst das so hin, dann zeig uns das doch bitte mal sow
hä?
einfach in der ini so speichern (meinetwegn auch toolintern per button) und per IniReadSection('filename','favorites') das ganze in ein array lesen, und im gui darstellen.

Edit:
vielleicht noch ein kleiner tip an den thread ersteller.

da du ja wie schon angesprochen über die relative anordnung deiner elemente im gui gedacht hast, hier mal ein kleines beispiel (an einem deiner codeschnippsel gezeigt)

Code:
#include <IE.au3>
Dim $old_adress
$ie_fenster = _IECreateEmbedded()

$gui = GUICreate("Browser", 600, 480, -1, -1, 0x12470000)
$pos = WinGetPos($gui)
$ie = GUICtrlCreateobj($ie_fenster, 0, 40, $pos[2]-16, $pos[3]-77)
$adress = GUICtrlCreateInput('', 8, 8, $pos[2]-107, 21)
$search = GUICtrlCreateButton("Suchen", $pos[2]-99, 6, 75, 25)

_IENavigate($ie_fenster,"http://www.google.de")

While 1
	Switch GUIGetMsg()
		Case -3
			Exit
		Case -12, -8, -7, -6, -5
			$pos = WinGetPos($gui)
			GUICtrlSetPos($ie, 0, 40, $pos[2]-16, $pos[3]-77)
			GUICtrlSetPos($adress, 8, 8, $pos[2]-107, 21)
			GUICtrlSetPos($search, $pos[2]-99, 6, 75, 25)
		Case $search, $adress
			_IENavigate($ie_fenster, GUICtrlRead($adress))
		Case Else
			$current_adress = _IEPropertyGet($ie_fenster, "locationurl")
			If $current_adress<>$old_adress Then
				GUICtrlSetData($adress, $current_adress)
				$old_adress = $current_adress
			EndIf
	EndSwitch
WEnd
habe mal gleich noch mit eingebaut, dass in der adressleiste wirklich immer die aktuelle url steht. finde das ist auch ein absolutes must have in einem browser.
02/01/2011 19:36 BlueSkyler#25
Wegen sehr vieler Arbeit haste dir ein Thanks verdient.
Aber dann mach es doch lieber mit VB geht viel schneller und viiiieeel leichter.
03/10/2011 21:19 Pukamon#26
Nice TuT, werds gleich mal ausprobieren.

Thanks haste dir verdient
03/31/2011 17:40 .EzEL™#27
Danke für deine TuT, also echt. ;)
04/03/2011 18:26 .Moskito#28
Quote:
Originally Posted by BlueSkyler View Post
Wegen sehr vieler Arbeit haste dir ein Thanks verdient.
Aber dann mach es doch lieber mit VB geht viel schneller und viiiieeel leichter.
Gut, dass ich keine Ahnung von vb hab ;)
04/04/2011 13:29 1337Standard#29
sehr gute arbeit,wie immer (y)
04/06/2011 19:22 .Moskito#30
#up
Page 2 of 3 1 2 3