Beiträge von BugFix

  • Finde Fehler nicht

    Hi,
    noch etwas viel Code ;)
    So siehst du auch gleich mal, wozu Funktionen gut sind :D

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    Global $map
    Opt("PixelCoordMode",0)
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 775, 445, 193, 125)
    GUISetBkColor(0x99B4D1)
    $TreeView1 = GUICtrlCreateTreeView(8, 16, 129, 169)
    $TreeView1_0 = GUICtrlCreateTreeViewItem("China", $TreeView1)
    $TreeView1_1 = GUICtrlCreateTreeViewItem("West-China", $TreeView1)
    $TreeView1_2 = GUICtrlCreateTreeViewItem("Oasis 1.", $TreeView1)
    $TreeView1_3 = GUICtrlCreateTreeViewItem("Oasis 2.", $TreeView1)
    $TreeView1_4 = GUICtrlCreateTreeViewItem("Taklamakan", $TreeView1)
    $TreeView1_5 = GUICtrlCreateTreeViewItem("West-Asien", $TreeView1)
    $TreeView1_6 = GUICtrlCreateTreeViewItem("Zentral-Asien", $TreeView1)
    $TreeView1_7 = GUICtrlCreateTreeViewItem("Vorder-Asien", $TreeView1)
    $TreeView1_8 = GUICtrlCreateTreeViewItem("Europa", $TreeView1)
    $TreeView1_9 = GUICtrlCreateTreeViewItem("Downhang-Cave", $TreeView1)
    ;$Group1 = GUICtrlCreateGroup("Map", 152, 8, 609, 433)
    ;GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Exit = GUICtrlCreateButton("Schließen", 24, 208, 75, 25, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Exit
    $1 =PixelGetColor(545,369)
    IniWrite("test.ini","","",$1)
    Exit
    Case $TreeView1_0
    _map('china.jpg')
    Case $TreeView1_1
    _map('westchina.jpg')
    Case $TreeView1_2
    _map('oasis1.jpg')
    Case $TreeView1_3
    _map('oasis2.jpg')
    Case $TreeView1_4
    _map('taklamakan.jpg')
    Case $TreeView1_5
    _map('westasien.jpg')
    Case $TreeView1_6
    _map('zentralasien.jpg')
    Case $TreeView1_7
    _map('vorderasien.jpg')
    Case $TreeView1_8
    _map('europa.jpg')
    Case $TreeView1_9
    _map('downhangcave.jpg')
    EndSwitch
    WEnd

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

    Func _map($pic)
    GUICtrlDelete($map)
    $map = GUICtrlCreatePic(@ScriptDir&"\"&$pic, 160, 24, 540, 405, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    EndFunc

    [/autoit]

  • String

    Zitat von Jam00

    Also ich mein ich möchte heraubekommen ob es $1 gibt, ja in einer If frage!

    Zitat von Jam00

    Ich hab kein Script!


    Ja was denn nun?
    Wenn du eine Variable abfragen willst, muß es doch ein Skript geben - die schwebt ja nicht im luftleeren Raum! :D
    Oben fragst du, wie du herausbekommst ob ein String existiert, jetzt willst du wissen ob eine Variable existiert. Sehr undurchsichtig.
    Zumal, wozu fragen ob eine Variable existiert - du codest doch selber !?

  • Breitensuche

    Ich würde so herangehen, dass jedes Feld Statuswerte bekommt, die Auskunft geben über Belegung und mögliche Bewegungsrichtungen. Sinnvollerweise jeden Parameter als Dualwert, sodass ganz simpel per BitAnd() abgefragt werden kann.

    Code
    Felder erhalten Werte, z.B.
1   - Spielfeld
2   - Eigener Spieler
4   - Gegenspieler
8   - Blockade
16  - Ziel
32  - Richtungsvektor  3 Uhr
64  - Richtungsvektor  6 Uhr
128 - Richtungsvektor  9 Uhr
256 - Richtungsvektor 12 Uhr

  • Applikation zum TCP-Port ermitteln

    Hab noch keine Lösung, als Ansatz: Die benutzten Ports abfragen mit netstat -a -n
    Nun noch der Schritt, diese auf die jeweiligen Anwendungen zurückzuführen. Ich such mal ein bischen.

    Edit:
    Hab was: TCPView

    Zitat

    TCPView ist ein Windows-Programm, das eine detaillierte Auflistung aller TCP- und UDP-Endpunkte auf Ihrem System enthält. Dazu gehören die lokalen Adressen sowie die Remoteadressen und Status der TCP-Verbindungen. Unter Windows NT, 2000 und XP berichtet TCPView auch den Namen des Prozesses, der den Endpunkt besitzt.



    Edit2:
    :D Es geht viel einfacher
    netstat -ano (ab Win2k) liefert auch die PID.

  • Eben im Internet

    [OT]

    Zitat von chrisatack

    Gold ist NICHT der beste Leiter sonder Kupfer....


    Rein von der Leitfähigkeit stimmt das auch nicht ganz ;) (1.Silber, 2. Kupfer, 3. Gold, 4. Aluminium). Kupfer hat zwar denselben spezifischen Widerstand wie Silber, aber leitet nicht so gut. Deshalb werden die Refernzwerte auch auf Silber bezogen. (Cu bei 96% Ag)
    Vergoldete Kontakte findet man sinnvollerweise im Audiobereich. Denn da ist vorrangig eine frequenzgetreue Weiterleitung wichtig. Ein Punkt, bei dem Gold wesentlich besser punktet als Kupfer.
    Der entscheidende Vorteil von Gold liegt auch mehr in der Mikroelektronik. Mit Gold lassen sich Strukturen im Nano-Bereich darstellen, da kann z.B. Cu gar nicht mithalten.
    [/OT]

  • Mit Reglern arbeiten

    Oh doch, Hilfe lesen bildet:

    [autoit]

    iniwrite ($ini,"Potsettings","HP",GUICtrlRead($Slider1))
    iniwrite ($ini,"Potsettings","MP",GUICtrlRead($Slider2))
    iniwrite ($ini,"Potsettings","PILLS",GUICtrlRead($Slider3))

    [/autoit]

  • ListView - Editieren aller SubItems

    Ich wollte eine Unterscheidung, damit nur in das SubItem geschrieben wird, wenn etwas verändert wurde. Ich könnte natürlich einen vorher-nachher Vergleich ausführen. Wollte aber, dass nur bewußt gespeichert wird und eine Möglichkeit besteht ohne Änderung das Edit zu verlassen (ESC).