1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. bernd670

Beiträge von bernd670

  • Virus im Scite4 Download auf der AutoIt Seite?

    • bernd670
    • 13. April 2008 um 21:13

    Thema verschoben!

  • Frage zu PixelSearch

    • bernd670
    • 13. April 2008 um 20:46

    Hallo,

    wenn @error die Abbruchbendingung für die Until-Schleife sein soll, muss der letzte Befehl vor Until Pixelsearch sein! Jeder Befehl wirkt sich auf @error aus, Du fragst also immer das Ergebnis von ToolTip ab! Ausserdem wird die Bedingung Until $cord = @error nicht funktionieren, weil $cord immer ungleich @error ist und somit die Until-Schleife endlos läuft, einfach Until @error schreiben!

    Wenn Du den ToolTip unbedingt nach Pixelsearch ausgeben willst solltest Du mein oben geschriebenes Beispiel einbauen, damit funktioniert es immer!

    @edit:

    ersetze einfach:

    [autoit]

    $cord = PixelSearch($x1, $y1, $x2, $y2, $GesuchteFarbe)
    If Not @error Then
    Do
    Sleep(1000)
    $cord = PixelSearch($x1, $y1, $x2, $y2, $GesuchteFarbe)
    ToolTip ("Farbe erkannt X")
    Until $cord = @error
    EndIf

    [/autoit]

    durch:


    [autoit]

    Do
    $cord = PixelSearch($x1, $y1, $x2, $y2, $GesuchteFarbe)
    If @error Then ExitLoop
    ToolTip ("Farbe erkannt X")
    Sleep(1000)
    Until 0

    [/autoit]
  • Bildschirmschoner

    • bernd670
    • 13. April 2008 um 13:46

    Hallo,

    die Zeile

    [autoit]

    $timer=TimerInit()

    [/autoit]


    muss aus der While-Schleife raus!

  • Msgbox nicht im vordergrund

    • bernd670
    • 13. April 2008 um 12:31

    Geht das nicht auch mit dem Code-Wizard (Alt-w) im Scite!

  • Msgbox nicht im vordergrund

    • bernd670
    • 13. April 2008 um 12:23

    Hallo,

    einfach das Flag für "MsgBox has top-most attribute set" (262144) setzten!

  • Frage zu PixelSearch

    • bernd670
    • 13. April 2008 um 09:25

    Hallo,

    oder etwas kürzer:


    [autoit]

    Func _beispiel()
    Do
    ;----------------------------
    If $Irelewant = $egal Then ;|--> Der Teil ist ja erst mal fast egal,
    $auchegal ;|--> Weil der untere Teil soll ja verhindern, das dieser Teil ausgeübt werden kann,
    EndIf ;|--> in dem der zweite teil einfach mal so lange sleept bis der pixel weg ist
    ;----------------------------
    Do
    $cord = PixelSearch(651, 19, 659, 22, 0xCD3B3C) ; nach jeder do runder gucken ob der pixel da ist
    If @error Then ExitLoop ; wenn er da ist dann --->
    Sleep(1000) ; sleep, hmmm und muss jetzt hier noch mal pixelSearch rein?
    Until 0 ; auf alle fälle wenn der pixel weg ist (bzw. der pixel mit der bestim. Frabe) solls normal weiter gehen
    Until $blub = 999999

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

    EndFunc ;==>_beispiel

    [/autoit]
  • Winzige Frage

    • bernd670
    • 13. April 2008 um 07:17

    Hallo,

    zur genaueren Analyse währe es hilfreich wenn Du den Code postest!

    Normalerweise geht es so:


    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

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

    Opt('MustDeclareVars', 1)

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

    Example()

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

    Func Example()
    Local $title, $input, $updown, $msg

    $title = "My GUI UpDown"
    GUICreate($title, -1, -1, -1, -1, $WS_SIZEBOX)

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

    $input = GUICtrlCreateInput("2", 10, 10, 50, 20)
    $updown = GUICtrlCreateUpdown($input)
    GUICtrlSetLimit(-1,20,-20)

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

    GUISetState()

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

    ; Run the GUI until the dialog is closed
    While 1
    $msg = GUIGetMsg()

    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd

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

    MsgBox(0, "Updown", GUICtrlRead($input))
    EndFunc ;==>Example

    [/autoit]
  • HILFE ! - C++ Übersetzung gebraucht !

    • bernd670
    • 12. April 2008 um 21:08

    Nicht schlecht der Gag!

    Hab's mal verschoben!

  • Problem mit Input-Style

    • bernd670
    • 12. April 2008 um 20:34

    Das Problem ist wahrscheinlich das Du die Default-Styles überschreibst, probiers mal so:


    [autoit]

    $group[1] = GUICtrlCreateInput("", 150, $i_bH, 650, 25, BitOR($ES_LEFT, $ES_AUTOHSCROLL, $ES_READONLY))

    [/autoit]
  • Problem mit Input-Style

    • bernd670
    • 12. April 2008 um 20:08

    Bitte Code, damit auch testen kann!

  • 2 in 1

    • bernd670
    • 12. April 2008 um 19:37

    Dafür benötigst Du FileOpen:


    [autoit]

    Case $speichern
    $szSaveFile = FileSaveDialog( "Bitte Dateiname und Speicherort eingeben.", "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", "Textdatei (*.txt)", 2)
    If Not @error Then
    If StringRight($szSaveFile,4) <> ".txt" Then $szSaveFile &= ".txt"
    $hFile = FileOpen($szSaveFile,2)
    FileWrite($hFile, Guictrlread($Edit1))
    FileClose($hFile)
    EndIf

    [/autoit]
  • 2 in 1

    • bernd670
    • 12. April 2008 um 19:28

    mein Fehler:
    Die FileWrite-Anweisung muss so geschrieben werden:
    FileWrite($szSaveFile, Guictrlread($Edit1))

  • 2 in 1

    • bernd670
    • 12. April 2008 um 19:07

    Geht schon:

    [autoit]

    Case $speichern
    $szSaveFile = FileSaveDialog( "Bitte Dateiname und Speicherort eingeben.", "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", "Textdatei (*.txt)", 2)
    If Not @error Then
    If StringRight($szSaveFile,4) <> ".txt" Then $szSaveFile &= ".txt"
    FileWrite($szSaveFile, Guictrlread($eText))
    EndIf

    [/autoit]
  • 2 in 1

    • bernd670
    • 12. April 2008 um 18:53

    Hallo,

    so:


    [autoit]

    Case $speichern
    $szSaveFile = FileSaveDialog( "Bitte Dateiname und Speicherort eingeben.", "c:\", "Textdatei (*.txt)", 3)
    If Not @error Then FileWrite($szSaveFile, Guictrlread($Edit1))

    [/autoit]
  • merkwürdiges problem

    • bernd670
    • 12. April 2008 um 18:48

    Hallo,

    dann ist Or der falsche Operator, dass muss mit And gemacht werden! Eine Oder-Bedingung ist erfüllt sobald ein Ergebnis wahr ist.

  • merkwürdiges problem

    • bernd670
    • 12. April 2008 um 18:33

    Hallo,

    hilfreich ist auch eine genaue Beschreibung was das gewünschte Ergebniss ist und wie sich der Fehler auswirkt!

  • 2 in 1

    • bernd670
    • 12. April 2008 um 18:21

    Hallo,

    zu 1.)
    - mit FileSaveDialog die Datei wählen wo gespeichert werden soll.
    - mit FileWrite die Daten in die gewählte Datei speichern.

    zu 2. u. 3.)
    unter Case $neustart brauchst Du nur

    [autoit]


    GuiCtrlSetData($Input1, "Input1")
    GuiCtrlSetData($Input2, "Input2")
    GuiCtrlSetData($Input3, "Input3")
    GUICtrlSetData($Edit1, StringFormat("Hier steht schon ein Text !!!!\r\n\r\nHier soll der Text der Label 1 bis 3 untereinander rein !!!!\r\n\r\nHier steht auch wieder etwas !!!!"))

    [/autoit]


    zu schreiben.

  • Innerhalb des neuen Hotkeys auf den alten Hotkey zurückgreifen. Geht das?

    • bernd670
    • 12. April 2008 um 16:16

    Hallo,

    vllt. so:


    [autoit]

    HotKeySet('^c', 'ShowMessage')
    While 1
    Sleep(100)
    WEnd

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

    Func ShowMessage()
    HotKeySet('^c')
    Send('^c')
    MsgBox(4096,"","This is a message." & @CRLF & ClipGet(),3)
    HotKeySet('^c', 'ShowMessage')
    EndFunc

    [/autoit][autoit][/autoit][autoit][/autoit]
  • verbinden und installieren von tcp/ip- druckern

    • bernd670
    • 12. April 2008 um 15:38

    Hallo,

    [autoit]

    #Include <File.au3>

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

    $aInfList=_FileListToArray($szVerzeichnis, "*.inf", 1)
    If @Error = 1 Then
    MsgBox (0,"","keine INF-Datei gefunden!")
    Exit
    EndIf

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

    ; $aInfList[0] enthält die anzahl der Dateien
    ; $aInfList[1] - %aInfList[n] enthält die Dateinamen der gefundenen INF-Dateien

    [/autoit]

    wenn es im angegebene Verzeichnis nur eine INF-Datei gibt (also $aInfList[0] = 1) dann enthält $aInfList [1] den gefundenen Dateinamen!

    Mal eine andere Frage:

    Hast Du vor auf mehreren Rechnern für den gleichen Drucker eine Druckerwarteschlange einzurichten? Das ist eingentlich unüblich, normalerweise richtet man im Netzwerk auf einem Server die Druckerwarteschlangen für die Drucker ein und gibt sie frei, dann können sich alle Nutzer mit normalen Rechten auf die Drucker verbindenen!

  • filewrite am anfang einer datei (ohne fileread)

    • bernd670
    • 12. April 2008 um 09:11

    Hallo,

    ein Bsp. findest Du im Beitrag hilfe bei binary dateien nötig. Beachte aber das sinnfreies schreiben in Binär-Dateien diese unbrauchbar machen kann.

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™