Beiträge von qixx

  • SpeedStarter

    Zurzeit hatte ich kaum Zeit, weil ich 1 Woche im Krankenhaus war und mir die Arbeit über den Kopf steigt.
    Jedoch habe ich vor, das weiterzuführen und Designtechnisch stark zu überarbeiten.
    Wahrscheinlich werde ich das Skript nochmal komplett von vorne programmieren, weil der Code einfach viel zu lang ist.^^

    Gibt es denn Verbesserungsvorschläge?

    Ich hatte auf jeden Fall vor, die Oberfläche so zu verändern, dass Kreise dargestellt werden anstatt der Kästen. Zudem sollen alle in einem Kreis angeordnet sein. ;)


    MfG
    qixx

  • SpeedStarter

    Ab Zeile 300.
    Überall die _IsPressed(02) in _IsPressed(04) ändern.
    Habs mal für dich gemacht. ;)

    [autoit]

    If _IsPressed(04) And WinActive($SettingsGUI) = False And WinActive($EditProgramGUI) = False Then ;Rechte Maustaste
    $PressedTime = TimerInit()
    While _IsPressed(04)
    If TimerDiff($PressedTime) >= $StartTime Then
    _ShowHideAll(1)
    ExitLoop
    EndIf
    Sleep(40)
    WEnd
    While _IsPressed(04)
    Sleep(40)
    WEnd
    EndIf

    [/autoit]


    MfG
    qixx

  • SpeedStarter

    [Blockierte Grafik: http://www.abload.de/img/logo7rhs.png]

    Hallo Leute,

    ich habe heute den Tag lang mal wieder programmiert.
    Herausgekommen ist ein Speedstarter. Mit ihm ist es leicht,
    in wenigen Sekunden Programme oder Homepages zu öffnen.
    Was man dazu machen muss, ist die rechte Mausteste gedrückt
    halten    . Dann erscheint ein Menü, was man mit der Maus bedient
    und so auswählt, was man gerne haben möchte.

    Einfach mal anschauen und ausprobieren. :P
    Bin dankbar für Feedback!

    Screenshots


    [Blockierte Grafik: http://www.abload.de/thumb/screenshot1mq3a.jpg] [Blockierte Grafik: http://www.abload.de/thumb/screenshot2dp06.jpg]

    Bedienung
    • Zum Starten rechte Maustaste gedrückt halten
    • Einstellungen dann über F1 erreichbar
    • Zum Ausblenden, wieder rechte Maustaste gedrückt halten (Sollte man nichts auswählen)
    • Zum Beenden, TrayIcon benutzen
    Bekannte Bugs


    Leider kommt es des Öfteren vor, dass bei der Auswahl des Bildes nicht die korrekte Größe angezeigt wird, sondern es sich ungleichmäßig ausbreitet. Ich weiß leider noch nicht warum und wann es passiert. Findet jemand die Lösung?

  • Seriennummer Abfrage

    Hallo Leute,

    ich habe mir mal aus Langeweile ein Skript erstellt,
    mit dem man eine Seriennummerabfrage machen kann.
    Jeder PC auf dem dieses ausgeführt wird, bekommt seine
    eigene Produkt-Nummer. Auf Basis dieser wird dann eine
    Seriennummer generiert.

    Skript
    [autoit]


    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #Include <String.au3>

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

    $PW1 = "VerschlüsselungsPasswort1"
    $PW2 = "VerschlüsselungsPasswort2"
    $RegPath = "HKEY_CURRENT_USER\Software\SerialTest" ;Am besten irgendwo hin, wo es niemand findet
    $RegName = "SerialTest" ;Am besten ein verschlüsselter String (wirre Zeichenkombination)

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

    $Form1 = GUICreate("Seriennummer", 256, 112)
    GUICtrlCreateLabel("Produkt-Nummer:", 8, 8, 86, 15)
    $ProdNrInput = GUICtrlCreateInput(_GetProductNr(), 8, 24, 241, 21, BitOR($ES_AUTOHSCROLL,$ES_READONLY))
    GUICtrlCreateLabel("Seriennummer:", 8, 48, 74, 15)
    $SerialNrInput = GUICtrlCreateInput("", 8, 64, 241, 21)
    $ButtonCheck = GUICtrlCreateButton("Check", 176, 88, 74, 17)
    $ButtonClear = GUICtrlCreateButton("Registry leeren", 8, 88, 80, 17)
    GUISetState(@SW_SHOW)

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

    $Form2 = GUICreate("Korrekte Seriennummer", 257, 55)
    GUICtrlCreateLabel("Korrekte Seriennummer:", 8, 8, 117, 15)
    $CorrectSerialNrInput = GUICtrlCreateInput(_GetSerialNr(), 8, 24, 241, 21, BitOR($ES_AUTOHSCROLL,$ES_READONLY))
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $ButtonCheck
    _CheckSerial($SerialNrInput)
    Case $ButtonClear ;Um neue Produktnummer zu generieren
    RegDelete($RegPath , $RegName)

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

    EndSwitch
    WEnd

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

    Func _GetProductNr()
    $RegProdNr = RegRead($RegPath , $RegName)
    If $RegProdNr = "" Then
    $ProductNr = Random(1000000000,9999999999, 1) ;Produktnummer wird Generiert (Pro PC unterschiedlich)
    RegWrite($RegPath , $RegName, "REG_SZ", _StringEncrypt(1, $ProductNr, $PW1, 2) & Random(10,99,1)) ;$SerialPosition wird hinten angehängt (Serials ähneln sonst zu stark)
    Else
    $ProductNr = _StringEncrypt(0, StringTrimRight($RegProdNr, 2), $PW1, 2)
    EndIf
    Return $ProductNr
    EndFunc

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

    Func _GetSerialNr()
    Local $CorrectSerialNr = ""
    $RegProdNr = RegRead($RegPath , $RegName)
    $SerialPosition = StringRight($RegProdNr, 2)
    $RegProdNr = StringTrimRight($RegProdNr, 2)
    $ProductNr = _StringEncrypt(0, $RegProdNr, $PW1, 2)
    $Serial = _StringEncrypt(1, $ProductNr, $PW2, 3)
    $Serial = StringTrimLeft(StringLeft($Serial, $SerialPosition + 20), $SerialPosition)
    For $i = 1 To 4
    If $i < 4 Then
    $CorrectSerialNr &= StringTrimLeft(Stringleft($Serial, $i * 5), $i * 5 - 5) & "-"
    Else
    $CorrectSerialNr &= StringTrimLeft(Stringleft($Serial, $i * 5), $i * 5 - 5)
    EndIf
    Next
    Return $CorrectSerialNr
    EndFunc

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

    Func _CheckSerial($CheckSerialInput)
    If GUICtrlRead($CheckSerialInput) = _GetSerialNr() Then
    MsgBox(0, "Test", "Korrekt")
    Else
    MsgBox(0, "Test", "Falsch")
    EndIf
    EndFunc

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

    Um eine neue Produkt-Nummer zu erstellen, einfach
    auf "Registry leeren" im Programm klicken.


    MfG
    qixx

  • Android Forum

    Es ist von der Programmierweise so wie Java.
    Das wollte ich damit ausdrücken. Wenn Android Java
    wäre, müsste man es nicht Android nennen, sondern
    bliebt bei Java.^^
    Dass es unterschiede gibt, ist ja wohl klar. Deshalb schrieb
    ich auch "eigentlich". ;)


    MfG
    qixx

  • Android Forum

    Also, mal ein kleiner Zwischenstand:
    Trotz der Tatsache, dass in dem Forum noch nicht
    viel los ist, wurde mir doch sehr rasch geholfen.
    Ich habe erstmal gefragt, wie ich am besten anfange.

    Ich habe mich jetzt dazu entschlossen, erstmal richtig
    Java zu lernen. (Android ist eigentlich Java ;))
    Dazu habe ich ein sehr gutes, aber altes, Tutorial
    gefunden, bzw. wurde mir gezeigt.
    http://android-developers.de/entwickler-fra…9.html#post1839

    Bisher komme ich echt super mit dem Tutorial klar.
    Nichtmal das Lesen stört mich, obwohl ich total
    lesefaul bin! :D Näheres in meinen Beiträgen auf der
    Seite.

    Fazit:
    Sehr positiv überrascht!


    MfG
    qixx

  • Android Forum

    Danke, aber ich mag GalilieoComputing nicht.
    Ich habe mir dort mal eine Video-CD bestellt für
    Typo3 (CMS-System). Dort war das so schlecht
    erklärt und die Stimme von dem Kerl unerträglich.
    Vorallem das Schmatzen immer. BÄH.^^
    Außerdem habe ich auch schon einige negative
    Berichte über dieses Video-Tutorial gelesen.

    Trotzdem danke!


    MfG
    qixx

  • Android Forum

    Ich kann jetzt schon sagen, dass viele Fragen ungeklärt bleiben.
    Schaut man mal hier:
    http://android-developers.de/entwickler-fragen
    Dort sind sehr selten nur Antworten geschrieben.

    Bisher ist mir der Einstieg noch nicht so wirklich gelungen. Eine
    harte Umstellung auf objektorientierte Programmierung. Ich denke
    mal, dass ich erstmal versuche mir Java beizubringen. Android ist
    Java seeehr ähnlich. Vorallem gibt es da einfach mehr Tutorials. ;)
    Kennt jemand zufällig ein gutes, deutsches Tutorial zu Java?
    Also von Grund auf. Alles bis ins kleinste Detail erklärt. Am besten
    als Video mit Codebeispielen. ;)


    MfG
    qixx