ach das mit dem Source in die exe wusste ich nicht.
Danke ich werde mal ein wenig damit rumspielen 
Beiträge von Kijan
-
-
Wie mach ich das denn mit dem einlesen? Das mit dem Tooltip bekomm ich shcon hin
In welchen Optionen? -
nachher in der GUI^^
-
Hiho
Ich wollte mal fragen ob folgendes Möglich ist:
Ich habe eine UDF in der ist jede Funktion Kommentiert mit Parameter und Rückgabewerten.
Jetzt wollte ich in meinem Programm bestimmte Funktionen per Button oder so aufrufen.
Soweit kein Thema aber ich hätte es gern, dass wenn man mit der Maus über dem Button (oder was auch immer ^^) rüber geht, der Kommentar angezeigt wird, damit man Notfalls noch mal nachlesen kann, was genau passiert.
Ist sowas möglich ohne die ganzen Kommentare noch mal irgendwo aufzuführen?
Ich meine direkt aus der Include lesen? -
ja desshalb hatte ich ja überlegt, dass ich die Tags mit selber auslesen und beschreiben könnte, da die Programme, die ich finde, dies nur im gewissen rahmen zulassen... wie email oder notizen...
Ich hätte gern richtigen Zugriff auf den Speicher und möchte selbst entscheiden wo ich was hinschreibe.
Geht sowas bzw hat das schon wer gemacht? -
Niemand Erfahrung damit? Schade...
-
Hiho
Ich habe den NFC Reader SCL011 (für die Ausweisapp) und hatte die Idee, ich könnte doch damit meinen PC gewissen dinge steuern lassen.
Ich weiß nur iwie so gar nicht wie ich den ansprechen kann.Hat schon jemand Erfahrung mit NFC Reader und im speziellen diesem?
-
huhu
[autoit]
Ich weis der Thread ist alt, aber falls jemand wie ich das Problem auch hat:
progandys Antwort ist richtig aber nur wenn du ein False beim InetRead anhängst.$bBinary = InetRead("http://example.com/utf8.html", False)
[/autoit]
$sContent = BinaryToString($bBinary, 4)dann klappt das auch wunderbar
-
Ich hab es zwar noch nicht zu 100% verstanden, mit dem Verschachteln, aber ich hab etwas Brauchbares zusammengeschustert, womit andere vllt weitermachen können
mir reicht es erst malSpoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
readServer()addServer("test", "test.de")
[/autoit] [autoit][/autoit] [autoit]readServer()
[/autoit] [autoit][/autoit] [autoit]
Func addServer($servername, $serverip, $serverhide = 0, $serveraccept = 0)$serverhide = "0" & $serverhide
[/autoit] [autoit][/autoit] [autoit]
$start = "0A0000090007736572766572730A000000"
$ende = "00"$datei = FileOpen(@AppDataDir & "\.minecraft\servers.dat", 16)
[/autoit] [autoit][/autoit] [autoit]
If $datei = -1 Then
MsgBox(0, "Error", "Konnte servers.dat nicht öffnen.")
Exit
EndIf$File = StringTrimLeft(FileRead($datei), 2) ; 0x abschneiden
[/autoit] [autoit][/autoit] [autoit]
FileClose($datei)
$serverlist = StringTrimRight(StringTrimLeft($File, StringLen($start)), StringLen($ende))
$anzahlServer = Hex(Dec(StringLeft($serverlist, 2))+1, 2)
$serverlist = StringTrimLeft($serverlist, 2)$serverstring = "01000B6869646541646472657373" & $serverhide & "0800046e616d6500"
[/autoit] [autoit][/autoit] [autoit]If $serveraccept Then $serverstring &= "01000E616363657074546578747572657301"
[/autoit] [autoit][/autoit] [autoit]$serverstring &= Hex(StringLen($servername),2) & _StringToHex($servername) & "080002697000" & Hex(StringLen($serverip),2) & _StringToHex($serverip)
[/autoit] [autoit][/autoit] [autoit]$datei = FileOpen(@AppDataDir & "\.minecraft\servers.dat", 18)
[/autoit] [autoit][/autoit] [autoit]
If $datei = -1 Then
MsgBox(0, "Error", "Konnte servers.dat nicht öffnen.")
Exit
EndIfFileWrite($datei,_HexToString($start & $anzahlServer & $serverlist & $serverstring & "0000"))
[/autoit] [autoit][/autoit] [autoit]FileClose($datei)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
EndFuncFunc readServer()
[/autoit] [autoit][/autoit] [autoit]
$datei = FileOpen(@AppDataDir & "\.minecraft\servers.dat", 16)If $datei = -1 Then
[/autoit] [autoit][/autoit] [autoit]
MsgBox(0, "Error", "Konnte servers.dat nicht öffnen.")
Exit
EndIf$File = StringTrimLeft(FileRead($datei), 2)
[/autoit] [autoit][/autoit] [autoit]$start = "0A0000090007736572766572730A000000"
[/autoit] [autoit][/autoit] [autoit]
$ende = "00"$serverlist = StringTrimRight(StringTrimLeft($File, StringLen($start)), StringLen($ende))
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$anzahlServer = Dec(StringLeft($serverlist, 2))$array = StringSplit(StringTrimLeft($serverlist, 6), "000100", 1)
[/autoit] [autoit][/autoit] [autoit]
$temp = "Serverliste: " & $anzahlServer & " Server" & @CRLF
For $i = 1 To $array[0]$array[$i] = "0100" & $array[$i]
[/autoit] [autoit][/autoit] [autoit]
$test = ""
For $u = 1 To StringLen($array[$i]) Step 2
$byte = StringMid($array[$i], $u, 4)
If $byte = "0100" Then
$zeichen = Dec(StringMid($array[$i], $u + 4, 2)) * 2
$test &= _HexToString(StringMid($array[$i], $u + 6, $zeichen)) & " = "
$u += 6 + $zeichen
$test &= StringMid($array[$i], $u, 2) & @CRLF
EndIf
If $byte = "0800" Then
$zeichen = Dec(StringMid($array[$i], $u + 4, 2)) * 2
$test &= _HexToString(StringMid($array[$i], $u + 6, $zeichen)) & " = "
$u += 6 + $zeichen
$zeichen = Dec(StringMid($array[$i], $u + 2, 2)) * 2
$test &= _HexToString(StringMid($array[$i], $u + 4, $zeichen)) & @CRLF
EndIfNext
[/autoit] [autoit][/autoit] [autoit]$temp &= $test & @CRLF
[/autoit] [autoit][/autoit] [autoit]Next
[/autoit] [autoit][/autoit] [autoit]MsgBox(0, "", $temp)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]FileClose($datei)
[/autoit] [autoit][/autoit] [autoit]EndFunc ;==>readServer
[/autoit] -
-
Hiho
Ich arbeite an einen Updater für unseren Minecraftserver.
Dieser läuft mittlerweile auch ganz gut
Ich wollte jetzt aber noch automatisch unseren Server zur Liste der Server hinzufügen.
Minecraft benutzt das NBT-Format.
Gibt es da schon eine UDF oder Leute die damit schon mal was gemacht haben? -
ja ich hab schon viel gelesen von 7z aber ich wollte etwas unabhängiges, da ich den benutzern nicht 7z aufdrängen möchte...
-
nein bei mir geht es nicht um texturepacks sondern um Mods was auch ganz legal ist.
Forgemodloder muss man in die minecraft.jar einbauen damit andere mods geladen werden
Ich habe einen server für Freunde aufgebaut und wollte nen Updater schreiben falls ich auf dem Server neue Mods habe.
Der Updater funzt auch gut nur halt das mit dem reinpacken lasse ich momentan vom benutzer selbst machen.
Das ist aber keine gute Lösung
-
Huhu
Ich hab ein ähnliches Anliegen.
Also eigentlich möchte ich Dateien in eine minecraft.jar einfügen.
Wenn ich dies tue und die Dateien schon vorhanden sind, bekomm ich für jede Datei eine Bestätigungsfrage.
Dies ist aber unschön bei vielen Dateien.
Dann dachte ich entpackste die minecraft.jar und alle anderen Dateien in einem Ordner und packst es wieder.
Pustekuchen. Wenn ich die minecraft.jar entpacke, macht er das nur zum Teil. Ich benutze auch die zip UDF.
Ich benenne sie manuell in minecraft.zip um, weil er es sonst nicht macht.Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <zip.au3>
$test = _Zip_UnzipAll(@ScriptDir & "\minecraft.zip", @ScriptDir & "\Testjar\")
MsgBox(0,@error, $test);===============================================================================
[/autoit] [autoit][/autoit] [autoit][/autoit]
;
; Function Name: _Zip_UnzipAll()
; Description: Extract all files contained in a ZIP Archieve.
; Parameter(s): $hZipFile - Complete path to zip file that will be created (or handle if existant)
; $hDestPath - Complete path to where the files will be extracted
; $flag = 1
; - 1 no progress box
; - 0 progress box
; Requirement(s): none.
; Return Value(s): On Success - 0
; On Failure - sets @error 1~3
; @error = 1 no Zip file
; @error = 2 no dll
; @error = 3 dll isn't registered
; Author(s): torels_
; Notes: The return values will be given once the extracting process is ultimated... it takes some time with big files
;
;===============================================================================
Func _Zip_UnzipAll($hZipFile, $hDestPath, $flag = 1)
Local $DLLChk = _Zip_DllChk()
If $DLLChk <> 0 Then Return SetError($DLLChk, 0, 0);no dll
If not _IsFullPath($hZipFile) then Return SetError(4,0) ;zip file isn't a full path
If Not FileExists($hZipFile) Then Return SetError(2, 0, 0) ;no zip file
If Not FileExists($hDestPath) Then DirCreate($hDestPath)
Local $aArray[1]
$oApp = ObjCreate("Shell.Application")
$oApp.Namespace($hDestPath).CopyHere($oApp.Namespace($hZipFile).Items())
For $item In $oApp.Namespace($hZipFile).Items
_ArrayAdd($aArray, $item)
Next
While 1
If $flag = 1 then _Hide()
If FileExists($hDestPath & "\" & $aArray[UBound($aArray) - 1]) Then
;~ Return SetError(0, 0, 1)
;~ ExitLoop
EndIf
Sleep(500)
WEnd
EndFunc ;==>_Zip_UnzipAll -
Ja ich hatte jetzt daran gedachr das video direkt zu streamen. das es verboten ist wusste ich nicht.
Der Nachteil am IE ist, dass er sich scheinbar nach nem Tag oder längerem laufen iwie aufzuhängen scheint.
Das Programm soll ja auf meinem Server neben dem TS3 laufen und jedem im TS ermöglichen Musik einzuspielen -
hiho
Danke aber deine Version von Youtube ist ja so was ähnliches wie meins mit dem IE nur das du FF benutzt
Ich wollt gern beide Quellen mit nur einem Object vereinen.
Meine Idee ist im Moment, das Ich einfach ein Youtube-Video lade ohne es automatisch starten zu lassen
oder halt das Kürzeste youtubevideo laufen zu lassen welches nicht mal ne Sekunde lang ist
aber so kann ich zwar das Video "stoppen" aber halt nicht von der selben stelle weiter spielen lassen
-
Hiho
Ich bastel gerade an einem Radio für Teamspeak 3
Ich möchte Youtube Videos abspielen und auch Radiostreams.
Es läuft soweit, dass ich Youtube-Videos abspiele über _IECreateEmbedded().
Ich hatte jetzt aber die Idee Radiostreams mit rein zu nehmen.
Also würd ich dafür WMP benutzen.
Das abspielen bekomm ich hin, kein Thema.
Aber ich wollte versuchen Youtube-Videos auch damit abzuspielen.
An sich auch kein Thema.
Aber kann ich das Youtube-Video, welches ich im WMP abspiele auch steuern?
Die Befehle für WMP bringen ja nix. -
Keiner ne Idee?
-
Ich hab "leider" Win7 64bit
-
Hiho
Ich wollt mal fragen ob es möglich ist, die Standartsoundkarte zu wechseln ohne das Audiofenster zu öffnen? ich wollt es vermeiden das Fenster zu öffnen und dann per TAB etc das zu machen.