Beiträge von Evoli_66

Evoli_66

Das ist mein code.

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
_IEErrorHandlerRegister ()

[/autoit] [autoit][/autoit] [autoit]

$oIE = _IECreateEmbedded ()
GUICreate("Tool", 1085, 618, _
(@DesktopWidth - 640) / 2, (@DesktopHeight - 50) / 2, _
$WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN)
$GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 1024, 500)
GUICtrlSetFont(-1, 25, 400, 0, "Haettenschweiler")

[/autoit] [autoit][/autoit] [autoit]

$GUI_Button_Forward = GUICtrlCreateButton("Start", 120, 580, 100, 30)
$GUI_Button_Stop = GUICtrlCreateButton("Stop", 250, 580, 100, 30)

[/autoit] [autoit][/autoit] [autoit]

GUISetState() ;Show GUI

[/autoit] [autoit][/autoit] [autoit]

_IENavigate ($oIE, $Seite)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $GUI_Button_Forward
start ()
Case $msg = $GUI_Button_Stop
ExitLoop
EndSelect
WEnd

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func start ()
While $GUI_Button_Stop = 1
$xyz = $xyz + 1
_IENavigate($oIE, $link & $xyz)
ProcessClose ("iexplore.exe")
Sleep (5000)
WEnd
EndFunc

[/autoit] [autoit][/autoit] [autoit]

GUIDelete()

[/autoit] [autoit][/autoit] [autoit]

Exit

[/autoit]

Evoli_66

Daran dacht ich auch doch wenn ich denn Button klicke macht er trotzdem mit der schleife weiter.
Es reagiert noch nicht mal der Schlissen butten.

Spoiler anzeigen

[autoit]

While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $GUI_Button_Forward start () Case $msg = $GUI_Button_Stop ExitLoop
EndSelectWEnd

[/autoit]

Evoli_66

Hi@all
Ist ein bissel her das ich mit autoit programmiert habe und bin ein bissel eingerostet.
Ich habe grade folgendes Problem.
Ich spiele ein bissel mit der _IECreateEmbedded und habe eine While schleife die ich mit Hilfe eines Butten abstoppen will doch irgend wie will er da nicht aussteigen sondern ignoriert denn befehl.

die while schleife:

Spoiler anzeigen

[autoit]

While 1 $xyz = $xyz + 1 _IENavigate($oIE, $link & $xyz) ProcessClose ("iexplore.exe") Sleep (5000)WEnd

[/autoit]

Evoli_66

Danke joszef das ist schon richtig gut so was hatte ich mir gedacht eine frage habe ich aber noch die $FileName ist das ein array oder ist das nur ein strig was ich noch mit string split trennen muss?

Evoli_66

Hi habe mal wieder eine Frage. Gibs die möglich keit ein script in eienmem bestimten ordner nach versteckten *.exe zu suchen lassen? Der paht ist bekannt nur ist nicht immer eine versteckte *.exe vorhanden. Was halt auch nicht bekannt ist wie die exe genau heist des wegen halt eine such funktion.

Evoli_66

Viellen dank und dein tip werde ich mir zu herzen nehmen. Wuste nicht wie man die daten nachtreglich ändern kann. Nun weiss ich es und werde das auch zukünftig nutzen.

Evoli_66

Jein ich vermutte mal weill ich von einer Func zur nehgsten leite unter bricht er das. Grund ist wenn ich das richtig verstanden habe, geht das script von funce zu funce und wenn das letzte Func fertig ist arbeitet das script eine Func vorher weiter bis er über all bei funceend angekommen ist.

Aber nun da zu war rum ich wieder geöffnet habe ist mir ist was eingefallen wass ich noch ein bauen möchte bleibe aber mal wieder an einer stelle hängen.

Was ich jetz noch vor habe ist die Combobox zu filtern so das der User nur die möglich hat die auch realistisch sind. Ich habe mal ein beispiel vorbereitet.

[autoit]

#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 454, 192, 114)
$Combo1 = GUICtrlCreateCombo("Bitte wählen", 240, 80, 145, 25)
GUICtrlSetData(-1, "Test 1|Test 2")
$Combo2 = GUICtrlCreateCombo("Bitte wählen", 240, 112, 145, 25)
GUICtrlSetData(-1, "Test 1.1|Test 1.2|Test 1.3")
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Combo1
$comboergebnnis = GUICtrlRead ($Combo1)
If $comboergebnnis = "Test 1" Then
$Combo2 = GUICtrlCreateCombo("Bitte wählen", 240, 112, 145, 25)
GUICtrlSetData(-1, "Test 1.1|Test 1.2|Test 1.3")
ElseIf $comboergebnnis = "Test 2" Then
$Combo2 = GUICtrlCreateCombo("Bitte wählen", 240, 112, 145, 25)
GUICtrlSetData(-1, "Test 2.1|Test 2.2|Test 2.3")
EndIf
EndSwitch
WEnd

[/autoit]

Eigendlich leuft das auch aber wenn der User jetzt in combo1 eine fehl eingabe gemacht hat und wegselt die Combo 2 nicht um gibs da eine alternative lösung zu dem problem oder muss ich mit einen resset button arbeiten?

Evoli_66

jo so ehnlich habe ich es jetzt auch gemacht nur habe ich es in die funce error eingebaut das ist dann für alle gültig danke noch mal.

Evoli_66

Also wörde der befehl dann den ablauf unter brechen der mit case $button gestartet wurde. Werde ich mal ausprobiren.

Edit: Jo das wars viellen dank für denn tip

Evoli_66

habe ich ja in zeile 50-52 er springt dann ja auch in zeile 74 und leuft beis 78 weiter doch dann springt er wieder zurück in zeile 53 und macht dort einfach weiter und geht nicht in die Whail schleife von zeile 2-16

Evoli_66

Hi @ all ich habe mal wieder ein problem und bitte um eure hilfe.

Was ich vor habe ist ein Esay installer anzufertigen. In meiner Gui sind 4 comboboxe und 2 radio button. mein problem ist momentan der wenn keine radiobox ausgewehlt ist lasse ich eine msgbox ausgeben doch das script rent dann ganz normal weiter wie kann ich das verhindern so das das script wieder auf case $button wartet?

[autoit]

GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

[/autoit][autoit][/autoit][autoit]

Case $Button2
Exit

[/autoit][autoit][/autoit][autoit]

Case $Button1
$Label6 = GUICtrlCreateLabel("Begine das Auslesen der User eingaben.", 280, 400, 385, 17)
Auslesen ()

[/autoit][autoit][/autoit][autoit]

EndSwitch
WEnd

[/autoit][autoit][/autoit][autoit]

Func Auslesen ()
$PSPTYP = GUICtrlRead ($Combo1)
$DATECODE = GUICtrlRead ($Combo2)
$AktuelleFW = GUICtrlRead ($Combo3)
$PSPLaufwerk = GUICtrlRead ($Combo4)
$OFW=GUICtrlRead ($Radio1)
$CFW=GUICtrlRead ($Radio2)
If $PSPTYP = "Bitte Wählen" Then
MsgBox (0x30,"Fehler", "Es fehlen noch angaben zum Typ der PSP. " &@CRLF&@CRLF&"Diese finden sie im Akku fach.")
error ()

[/autoit][autoit][/autoit][autoit]

ElseIf $DATECODE = "Bitte Wählen" Then
MsgBox (0x30,"Fehler", "Es fehlen noch angaben zum DATECODE der PSP. " &@CRLF&@CRLF&"Diese finden sie im Akku fach.")
error ()
ElseIf $AktuelleFW = "Bitte Wählen" Then
MsgBox (0x30,"Fehler", "Es fehlen noch angaben zur aktuellen FW der PSP." &@CRLF&@CRLF&" Diese finden sie im bereich System-Einstellung/Systeminformation in ihrer PSP.")
error ()
EndIf
Sleep (3000)
$Label6 = GUICtrlCreateLabel("Begine das Auswerten der User eingaben.", 280, 400, 385, 17)
Auswerten ()
EndFunc

[/autoit][autoit][/autoit][autoit]

Func Auswerten ()
If $PSPTYP = "PSP 1004 ( PSP Fat )" Then Fat ()
If $PSPTYP = "PSP 2004 ( PSP Slim )" Then Slim ()
If $PSPTYP = "PSP 3004 ( PSP 3000 )" Then PSP3000 ()
EndFunc

[/autoit][autoit][/autoit][autoit]

Func Fat ()
If $CFW = 1 Then FatA ()
If $OFW = 1 Then FatB ()
If $CFW = $OFW Then
MsgBox (0x30,"Fehler", "Es fehlen noch angabe zu ihrer aktuellen FW." &@CRLF&@CRLF&"Diese finden sie im bereich System-Einstellung/Systeminformation bei einrt einfachern FW nummer ist es eine OFW und bei zusätsen wie m33 oder ehnlichem handelt es sich um eine CFW. ")
error ()
EndIf
ToolTip ($Install,0,0)
EndFunc

[/autoit][autoit][/autoit][autoit]

Func FatA ()
$Pandafrage = MsgBox (0x4,"Pandora", "Möchten sie eine Pandora erstellen?")
If $Pandafrage = 6 Then $Install = 3
If $Pandafrage = 7 Then $Install = 2
EndFunc

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

Func FatB ()
If $AktuelleFW <= "Firmware 5.03" Then $Install = 4

[/autoit][autoit][/autoit][autoit]

If $AktuelleFW > "Firmware 5.03" Then
MsgBox (0x30,"Schade", "Mit den von ihnen eingegebenden PSP Daten wird ein Pandora Akku benötigt um die PSP mit einer CFW zu versehen. Für weiter infos steht ihn das PSP-ISO Team im Forum zur verfügung.")
error ()
EndIf

[/autoit][autoit][/autoit][autoit]

EndFunc

[/autoit][autoit][/autoit][autoit]

Func error ()

[/autoit][autoit][/autoit][autoit]

$Label6 = GUICtrlCreateLabel("Warte auf User eingabe.", 280, 400, 385, 17)

[/autoit][autoit][/autoit][autoit]

EndFunc

[/autoit][autoit][/autoit][autoit][/autoit]

Evoli_66

Ne nicht ganz $arSelect[1] erstelt noch immer

<location>http://www.psp-praxis.mine.nu/Musik/C:\xampp\htdocs\Musik</location>

und das müste normalerweise so aussehen.
$arSelect[2] = <location>http://www.psp-praxis.mine.nu/Musik/80's Style Mix.mp3</location>

oder muss ich jetzt eine fach nur $arSelect[1] raus schmeissen?

Edit: ok hat geklapt danke noch mals für die schnelle hilfe.

Evoli_66

Hallo liebe AutoIT User ich breuchte noch mal eure Hilfe.

Ich bastel grade an einer Plylist.xspf dies ist eine playlist für den xspf player für webseiten.

ich habe ihn schon zu 90% fertig doch habe eine schweche und das ist array.

Spoiler anzeigen

[autoit]

#include <Array.au3>
$anzahl = ""
$seite = 'http://www.psp-praxis.mine.nu/Musik/'
$message = "Wähle die Musik aus."
$sSelect = FileOpenDialog($message, 'C:\xampp\htdocs\Musik', '(*.mp3)',4)
$arSelect = StringSplit($sSelect, '|')
If FileExists ("c:\Playlist.xspf") Then
FileDelete ("c:\Playlist.xspf")
Sleep (1000)
EndIf
$file = FileOpen("c:\Playlist.xspf", 1)
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
FileWrite($file, '<?xml version="1.0" encoding="UTF-8"?>'& @CRLF)
FileWrite($file, '<playlist version="0" xmlns = "http://xspf.org/ns/0/">'& @CRLF)
FileWrite($file, '<trackList>'& @CRLF & @CRLF)
For $i = 1 to $arSelect [0]
FileWrite($file, '<track>'& @CRLF)
FileWrite($file, '<location>'& $seite & $arSelect [$i]&'</location>' & @CRLF)
FileWrite($file, '<annotation>'& $arSelect [$i]&'</annotation>' & @CRLF)
FileWrite($file, '</track>'& @CRLF & @CRLF)
Next
FileWrite($file, '</trackList>'& @CRLF)
FileWrite($file, '</playlist>'& @CRLF)
FileClose($file)
MsgBox (0,"Fertig", "Playlist erstelt.",10)

[/autoit]

Mein problem ist $arSelect[1] das muss raus aber dann schmiert mein Array am ende ab weil er in der letzten zelle ja nichts findet. Was muss ich machen da mit er $arSelect[0] um einen veringert und $arSelect[1] raus schmeist. Es wäre super lieb von euch wenn ihr mir weiter hlefen köntet.

Evoli_66

Das von L3viathan2142ist schon das was ich gesucht habe. Es gab nur ein Problem bei seinem Vorschlag das sich aber mit löschen des @CRLF gelöst hat. Danke dir.

Und auch an dich Sen danke für deine Mühe doch leider warst du ein kleinen tick zu langsam.

Evoli_66

Das Problem ist mal sind es 2 links mal können es aber auch 10 sein und das ist schwer mit einzelnen Labels zu machen weil die GUI dann zu groß wird.

Als Beispiel:

Spoiler anzeigen

http://www.share-online.biz/download.php?id=GN254WU7

http://www.share-online.biz/download.php?id=V578186

http://www.share-online.biz/download.php?id=5FNC82MCK

http://www.share-online.biz/download.php?id=XC640A

http://www.share-online.biz/download.php?id=9Z7S4TBX

http://www.share-online.biz/download.php?id=5F3SRGY

So sehen die links aus und als Ergebnis soll dann nur noch 01 02 03 04 05 06 bei raus kommen.

Aber wie gesagt mal sind es mehr links mal weniger.

.

Evoli_66

Du hast ja recht sorry. Eben zu meiner Person ich bin Legastheniker und habe eine rechtschreib schwäche und da für entschuldige ich mich. Es wäre trotz dem Super lieb von euch mir zu helfen. Ich mache dieses Tool für mich da mit ich weniger Arbeit habe und ein einheitliches Bild.

Evoli_66

nein ich verwegsel da nichts das tool erstelt mir eine vorlage die ich dan einfügen kann.

Hier der das tool was ich bis jetzt habe.

Spoiler anzeigen

[autoit]

If not FileExists ("C:\PSPISO") Then DirCreate ("C:\PSPISO")

[/autoit] [autoit][/autoit] [autoit]

FileInstall ("c:\PSPISO\bild.jpg","c:\PSPISO\bild.jpg")
FileInstall ("c:\PSPISO\Vorlage.txt","c:\PSPISO\Vorlage.txt")
$Pic = ""
$Groesse = ""
$Sprache = ""
$PW = ""
$NFO = ""
$Aktiv1 = ""
$Aktiv2 = ""
$Aktiv3 = ""
$Aktiv4 = ""
$Aktiv5 = ""
$Aktiv6 = ""
$LinkRS = ""
#include <GUIConstants.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=d:\auto it tool und scrips\vorlagen tool.kxf
$Form1_1 = GUICreate("PSP-ISO Vorlagen Tool", 784, 699, 125, 217)
$Label1 = GUICtrlCreateLabel("Mit diesem Tool Kast du ganz schnell die Vorlage ", 176, 120, 423, 28, $SS_CENTER)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
$Pic1 = GUICtrlCreatePic("c:\PSPISO\bild.jpg", 80, 0, 636, 116, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Label2 = GUICtrlCreateLabel("erstelen für dein Upload", 272, 152, 204, 28, $SS_CENTER)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("HTML vom Bild:", 112, 192, 114, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("", 232, 192, 369, 21)
$Label4 = GUICtrlCreateLabel("z.b. http://picbox.us/img/bilder/full/User_47f1b9a54a03c.jpg", 240, 216, 294, 17)
$Label5 = GUICtrlCreateLabel("Grösse:", 40, 248, 60, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Input2 = GUICtrlCreateInput("", 104, 248, 65, 21)
$Label6 = GUICtrlCreateLabel("MB", 176, 248, 28, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label7 = GUICtrlCreateLabel("Sprache:", 248, 248, 68, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Input3 = GUICtrlCreateInput("", 320, 248, 121, 21)
$Label8 = GUICtrlCreateLabel("z.b. Germany, Englisch, Multi", 320, 272, 140, 17)
$Label9 = GUICtrlCreateLabel("Rapidshare:", 16, 325, 90, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 110, 331, 13, 13)
$Label11 = GUICtrlCreateLabel("Netload:", 40, 371, 63, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox1", 110, 376, 13, 13)
$Label13 = GUICtrlCreateLabel("Uploaded:", 24, 420, 77, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Checkbox3 = GUICtrlCreateCheckbox("Checkbox1", 110, 425, 13, 13)
$Label15 = GUICtrlCreateLabel("Share-Online:", 400, 325, 101, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Checkbox4 = GUICtrlCreateCheckbox("Checkbox1", 502, 331, 13, 13)
$Label17 = GUICtrlCreateLabel("Password:", 552, 248, 77, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Input8 = GUICtrlCreateInput("", 632, 248, 121, 21)
$Label18 = GUICtrlCreateLabel("NFO Text:", 104, 488, 75, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Checkbox5 = GUICtrlCreateCheckbox("Checkbox1", 502, 376, 13, 13)
$Label12 = GUICtrlCreateLabel("MegaUpload:", 405, 420, 97, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Checkbox6 = GUICtrlCreateCheckbox("Checkbox1", 502, 425, 13, 13)
$Edit1 = GUICtrlCreateEdit("", 184, 488, 393, 201)
GUICtrlSetData(-1, "")
$Button1 = GUICtrlCreateButton("Erstellen", 32, 584, 75, 25, 0)
$Button2 = GUICtrlCreateButton("Abbrechen", 656, 584, 75, 25, 0)
$Edit2 = GUICtrlCreateEdit("", 136, 320, 241, 41)
GUICtrlSetData(-1, "")
$Edit3 = GUICtrlCreateEdit("", 136, 369, 241, 41)
GUICtrlSetData(-1, "")
$Edit4 = GUICtrlCreateEdit("", 136, 417, 241, 41)
GUICtrlSetData(-1, "")
$Edit5 = GUICtrlCreateEdit("", 524, 320, 241, 41)
GUICtrlSetData(-1, "")
$Edit6 = GUICtrlCreateEdit("", 524, 369, 241, 41)
GUICtrlSetData(-1, "")
$Edit7 = GUICtrlCreateEdit("", 524, 417, 241, 41)
GUICtrlSetData(-1, "")
$Label10 = GUICtrlCreateLabel("FileFactory:", 415, 371, 86, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button2
Exit
Case $Button1
Start ()
EndSwitch
WEnd
Func Start ()
$Pic = GUICtrlRead ($Input1)
$Groesse = GUICtrlRead ($Input2)
$Sprache = GUICtrlRead ($Input3)

[/autoit] [autoit][/autoit] [autoit]

$Aktiv1 = GUICtrlRead ($Checkbox1)
$Aktiv2 = GUICtrlRead ($Checkbox2)
$Aktiv3 = GUICtrlRead ($Checkbox3)
$Aktiv4 = GUICtrlRead ($Checkbox4)
$Aktiv5 = GUICtrlRead ($Checkbox5)
$Aktiv6 = GUICtrlRead ($Checkbox6)

[/autoit] [autoit][/autoit] [autoit]

$PW = GUICtrlRead ($Input8)
$NFO = GUICtrlRead ($Edit1)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Erstelen ()
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func Erstelen ()
If FileExists ("c:\Vorlage.txt") Then
FileDelete ("c:\Vorlage.txt")
Sleep (1000)
EndIf
$file = FileOpen("c:\Vorlage.txt", 1)
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
FileWrite($file, '<center><img src="' & $Pic & '" alt="" width="269" />'& @CRLF)
FileWrite($file, '<Größe: ' & $Groesse & ' MB' & @CRLF)
FileWrite($file, 'Sprache: ' & $Sprache & '' & @CRLF)
If $Aktiv1 = 1 then FileWrite($file, 'Rapidshare: ' & @CRLF)
If $Aktiv2 = 1 then FileWrite($file, 'Netload: ' & @CRLF)
If $Aktiv3 = 1 then FileWrite($file, 'Uploaded: ' & @CRLF)
If $Aktiv4 = 1 then FileWrite($file, 'Share-Online: ' & @CRLF)
If $Aktiv5 = 1 then FileWrite($file, 'FileFactory: ' & @CRLF)
If $Aktiv6 = 1 then FileWrite($file, 'MegaUpload: ' & @CRLF)
FileWrite($file, 'Passwort: ' & $PW & @CRLF)
FileWrite($file, 'NFO / Fileinfo:

[/autoit]

Spoiler anzeigen

[autoit]

' & $NFO & '

[/autoit]

[autoit]

</center>' & @CRLF)
FileClose($file)
Sleep (1000)
Run ("notepad.exe c:\Vorlage.txt")
EndFunc

[/autoit]

als ergebnis sol dann halt das raus kommen.

Spoiler anzeigen

Code

<center><img src="" alt="" width="269" /> 
<strong>Größe:</strong> MB 
<strong>Sprache: </strong> 
<strong>Filefactory:</strong> <a href="www.ddd.de" target="_blank">01</a> <a href="www.ddd2.de" target="_blank">02</a><a href=www.ddd3.detarget="_blank">03</a> 
<strong>share-online:</strong> <a href=www.fff.detarget="_blank">01</a> <a href=www.fff2.detarget="_blank">02</a><a href="www.fff3.de"target="_blank">03</a> 


<strong>Passwort:</strong> 
<strong>NFO / Fileinfo:</strong> [spoiler]Hier dein text[/spoiler]</center>

[/spoiler]

Evoli_66

Hi ich breucht mal wieder hilfe.

Also ich habe eine edit box da sollen html seinten rein.

http://www.test.de/

http://www.bild.de/

http://www.google.de/

....

die box ist kein problem nur solte es dann amschlus eine string ergeben der dan so aussied.

<a href="www.test.de">01</a><a href="http://www.bild.de/">02</a><a href="http://www.google.de%22%3e03%3c/a>....

wie stelle ich das den am blödesten an. Wäre supper wen jemand helfen könnte.

Evoli_66

danke für den tip aber durch den tip ist mir aufge falen was mein fehler war. Anstelle das GUICtrlSetColor habe ich GUICtrlSetBkColor geschrieben. und des wegen sah es so kommisch aus. trods dem danke für eure hilfe.

Evoli_66

Danke für den tip habs jetzt geändert aber irgend wie kommt mein auto it jetzt durch einander.

Spoiler anzeigen

[Blockierte Grafik: http://img14.imageshack.us/img14/9969/meinproblem.jpg]

wie man sied unten links hats leider nicht ge klapt warum weiss ich nicht.

hier ein ausschnit vom script vieleicht könt ihr mir ja mal den fehler sagen.

Spoiler anzeigen

[autoit]

;Tab 4 Testosteron ---->
$TabSheet4 = GUICtrlCreateTabItem("d[*-*]b Testosteron d[*-*]b")
;GFX Hilfe ---->
$Pic3 = GUICtrlCreatePic("C:\temp\fantasy_15.jpg", 15, 48, 580, 292, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GuiCtrlSetState(-1,$GUI_ONTOP)
$Checkbox7 = GUICtrlCreateCheckbox("", 16, 59, 13, 13)
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label22 = GUICtrlCreateLabel("Zeig die Namen der Items auf dem Boden an.", 35, 51, 300, 18)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label8 = GUICtrlCreateLabel("(entspricht der Y Taste gedrückt zu halten)", 37, 70, 286, 18)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Checkbox8 = GUICtrlCreateCheckbox("", 16, 107, 13, 13)
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label23 = GUICtrlCreateLabel("Deaktiviert die Player und Mobs Grafik.", 43, 99, 260, 18)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label9 = GUICtrlCreateLabel("(entspricht der V taste gedrückt zu halten)", 32, 115, 284, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label10 = GUICtrlCreateLabel("!!! Achtung Mobs können dich immer noch angreifen !!!", 16, 139, 348, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
;GFX Hilfe <----
;Alarm Sound ---->
$Label11 = GUICtrlCreateLabel("Alarm Sound", 80, 171, 100, 27)
GUICtrlSetFont(-1, 12, 800, 0, "Comic Sans MS")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Checkbox9 = GUICtrlCreateCheckbox("", 48, 203, 13, 13)
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label25 = GUICtrlCreateLabel("Privat Messege", 67, 197, 97, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Checkbox10 = GUICtrlCreateCheckbox("", 48, 227, 13, 13)
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label26 = GUICtrlCreateLabel("Unique Spont", 67, 222, 88, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Checkbox11 = GUICtrlCreateCheckbox("", 48, 247, 13, 13)
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label27 = GUICtrlCreateLabel("Du bist Gestorben", 67, 243, 119, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Checkbox12 = GUICtrlCreateCheckbox("", 48, 270, 13, 13)
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label28 = GUICtrlCreateLabel("Verkauf von Spezial Traderware", 67, 267, 209, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Checkbox13 = GUICtrlCreateCheckbox("", 48, 293, 13, 13)
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label29 = GUICtrlCreateLabel("Item im Stall Verkauft", 67, 291, 152, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Checkbox14 = GUICtrlCreateCheckbox("", 48, 315, 13, 13)
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label30 = GUICtrlCreateLabel("Capture the Flag Begind in 1 min.", 67, 312, 222, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetBkColor(-1, 0xFFFFFF)
;Alarm Sound <----
;Statuspointsverteilung Verteilen ---->
$Label12 = GUICtrlCreateLabel("Statuspointsverteilung", 384, 51, 180, 27)
GUICtrlSetFont(-1, 12, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label24 = GUICtrlCreateLabel("Verteilen", 435, 75, 74, 27)
GUICtrlSetFont(-1, 12, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Combo2 = GUICtrlCreateCombo("", 400, 107, 145, 25)
GUICtrlSetData(-1, "Deaktiv|3 STR / 0 INT|0 STR / 3 INT|1 STR / 2 INT|2 STR / 1 INT", "Deaktiv")
GuiCtrlSetState(-1,$GUI_ONTOP)
;Statuspointsverteilung Verteilen <----
;Automatische Petheilung ---->
$Label13 = GUICtrlCreateLabel("Automatische Petheilung", 368, 163, 191, 27)
GUICtrlSetFont(-1, 12, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label14 = GUICtrlCreateLabel("Reittier:", 400, 197, 58, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$List1 = GUICtrlCreateList("", 456, 197, 57, 19, BitOR($LBS_STANDARD,$WS_VSCROLL,$WS_BORDER))
GUICtrlSetData(-1, "0|1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85|86|87|88|89|90|91|92|93|94|95|96|97|98|99|100")
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label15 = GUICtrlCreateLabel("Tradetier:", 385, 222, 70, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$List2 = GUICtrlCreateList("", 456, 222, 57, 19, BitOR($LBS_STANDARD,$WS_VSCROLL,$WS_BORDER))
GUICtrlSetData(-1, "0|1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85|86|87|88|89|90|91|92|93|94|95|96|97|98|99|100")
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label16 = GUICtrlCreateLabel("Angrifstier:", 373, 247, 80, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$List3 = GUICtrlCreateList("", 456, 247, 57, 19, BitOR($LBS_STANDARD,$WS_VSCROLL,$WS_BORDER))
GUICtrlSetData(-1, "0|1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85|86|87|88|89|90|91|92|93|94|95|96|97|98|99|100")
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label17 = GUICtrlCreateLabel("HGP für Angrifstier:", 318, 272, 136, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$List4 = GUICtrlCreateList("", 456, 272, 57, 19, BitOR($LBS_STANDARD,$WS_VSCROLL,$WS_BORDER))
GUICtrlSetData(-1, "0|1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85|86|87|88|89|90|91|92|93|94|95|96|97|98|99|100")
GuiCtrlSetState(-1,$GUI_ONTOP)
$Label18 = GUICtrlCreateLabel("%", 520, 197, 15, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label19 = GUICtrlCreateLabel("%", 520, 222, 15, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label20 = GUICtrlCreateLabel("%", 520, 247, 15, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label21 = GUICtrlCreateLabel("%", 520, 272, 15, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFFFFFF)
;Automatische Petheilung <----
;Tab 4 Testosteron <----

GUICtrlCreateTabItem("")

[/autoit]

Dank schon mal im voraus.

Beiträge von Evoli_66

While schleife abrechen

While schleife abrechen

While schleife abrechen

Versteckte Dateien finden

Versteckte Dateien finden

Gui mit eingabe kontrolle

Gui mit eingabe kontrolle

Gui mit eingabe kontrolle

Gui mit eingabe kontrolle

Gui mit eingabe kontrolle

Gui mit eingabe kontrolle

Playlist.xspf

Playlist.xspf

Inhalt einer Edit box zu einem string umwandeln

Inhalt einer Edit box zu einem string umwandeln

Inhalt einer Edit box zu einem string umwandeln

Inhalt einer Edit box zu einem string umwandeln

Inhalt einer Edit box zu einem string umwandeln

Gui mit GFX problem

Gui mit GFX problem