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. autoBert

Beiträge von autoBert

  • Funktion geht nicht hilfe...

    • autoBert
    • 14. Oktober 2011 um 21:03

    Hallo unverschämt,

    einfach die Prozentzahl in einem transparenten Label über die Progressbat legen, siehe Beispiel:

    Spoiler anzeigen
    [autoit]

    [autoit]#include <WindowsConstants.au3>
    #include <StaticConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]Opt('MustDeclareVars', 1)

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]Example()

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]Func Example()
    Local $wait, $s, $msg, $m

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]Local $hGuiMain = GUICreate("My GUI Progressbar", 220, 100, 100, 200)

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]DllCall('uxtheme.dll', 'none', 'SetThemeAppProperties', 'int', 0) ; Classic-Style
    Local $progressbar1 = GUICtrlCreateProgress(10, 10, 200, 20)
    GUICtrlSetColor(-1, 32250); not working with Windows XP Style
    DllCall('uxtheme.dll', 'none', 'SetThemeAppProperties', 'int', 7) ; Standard-Windows-Style
    Local $Label1 = GUICtrlCreateLabel("", 10, 10, 200, 20, $SS_CENTER)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT )
    GUICtrlSetFont(-1, 12, 1400)

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]Local $progressbar2 = GUICtrlCreateProgress(10, 40, 200, 20, $PBS_SMOOTH)
    Local $button = GUICtrlCreateButton("Start", 75, 70, 70, 20)
    Local $label2 = GUICtrlCreateLabel("Test", 10, 40, 200, 20, $SS_CENTER)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT )
    GUICtrlSetFont(-1, 12, 1400)
    GUISetState(@SW_SHOW, $hGuiMain)

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]$wait = 20; wait 20ms for next progressstep
    $s = 0; progressbar-saveposition
    Do
    $msg = GUIGetMsg()
    If $msg = $button Then
    GUICtrlSetData($button, "Stop")
    For $i = $s To 100
    If GUICtrlRead($progressbar1) = 50 Then
    MsgBox(0, "Info", "The half is done...", 1)
    WinActivate($hGuiMain)
    EndIf
    $m = GUIGetMsg()

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]If $m = -3 Then ExitLoop

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]

    [/autoit]

    [/autoit]

    [autoit]

    [autoit]If $m = $button Then
    GUICtrlSetData($button, "Next")
    $s = $i;save the current bar-position to $s
    ExitLoop
    Else
    $s = 0
    GUICtrlSetData($progressbar1, $i)
    GUICtrlSetData($progressbar2, (100 - $i))
    GUICtrlSetData($Label1, $i)
    GUICtrlSetData($Label2, 100-$i)
    Sleep($wait)
    EndIf
    Next
    If $i > 100 Then
    ;GUICtrlSetData($progressbar1, 0)
    ;GUICtrlSetData($progressbar2, 100)
    ;$s=0
    GUICtrlSetData($button, "Start")
    EndIf
    EndIf
    Until $msg = $GUI_EVENT_CLOSE
    EndFunc ;==>Example

    [/autoit]

    [/autoit]

    mfg autoBert

  • Case abfrage bei unbekannten vielen controls

    • autoBert
    • 14. Oktober 2011 um 17:29

    Hallo nitrama,

    hier auf deinem Skript aufbauend eine Lösung:

    Spoiler anzeigen
    [autoit]

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

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

    $anzeige = 0
    $ini = IniReadSectionNames("progs.ini")
    ;_ArrayDisplay($ini)
    $h = IniRead("config.ini", "config", "top", "20")
    $size = IniRead("config.ini", "config", "size", "20")
    Global $pic[$ini[0] + 1], $pic1[$ini[0] + 1]
    $width = @DesktopWidth
    $width -= $size
    $width1 = @DesktopWidth
    $width1 -= $size
    $h1 = $size + $h
    ;MsgBox (0,0,$ini[1])

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

    $gui = GUICreate("", 0, 0, 0, 0, $WS_POPUP)

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

    $startpicgui = GUICreate("", $size, $size, $width, $h, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $gui)
    $startpic = GUICtrlCreatePic("startbutton.gif", 0, 0, $size, $size)
    For $i = 1 To $ini[0] ;Step +1
    $width -= $size
    $pic[$i] = GUICreate("", $size, $size, $width, $h, $WS_POPUP, $WS_EX_MDICHILD, $gui)
    $pic1[$i] = GUICtrlCreatePic(IniRead("progs.ini", $ini[$i], "bild", "default"), 0, 0, $size, $size)
    Next
    ;_ArrayDisplay($pic1)
    GUISetState(@SW_SHOW, $startpicgui)
    While 1
    If WinGetTitle("[ACTIVE]") = "Program Manager" Or WinGetTitle("[ACTIVE]") = "" Or WinGetTitle("[ACTIVE]") = "Start" Then
    $mousepos = MouseGetPos()
    if ($mousepos[1] >= $h And $mousepos[1] <= $h1 And $mousepos[0] >= $width1) Then
    if ($anzeige == 0) Then
    For $i = 1 To $ini[0] Step +1
    GUISetState(@SW_SHOW, $pic[$i])
    GUICtrlSetState($pic1[$i], $Gui_SHOW)
    $anzeige = 1
    Next
    EndIf
    Else

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

    if ($anzeige == 1) Then
    if ($mousepos[1] >= $h And $mousepos[1] <= $h1 And $mousepos[0] >= $width) Then

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

    Else
    For $i = 1 To $ini[0] Step +1
    GUISetState(@SW_HIDE, $pic[$i])
    GUICtrlSetState($pic1[$i], $Gui_Hide)
    $anzeige = 0
    Next
    EndIf
    EndIf
    EndIf
    EndIf

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

    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    Case $pic1[1] To $pic1[$ini[0]]
    $iClickOn = $nMsg - $pic1[1] + 1 ;ausrechnen welches Bild geklickt wurde
    ConsoleWrite("Bild: " & $iClickOn & " wurde geklickt" & @CRLF)
    run (IniRead ( "progs.ini", $ini[$i], "pfad", default )
    EndSwitch
    ;Sleep (10) hat in einer Schleife in der bereits GuiGetMsg enhalten ist nichts verloren => schädlich
    WEnd

    [/autoit]

    mfg autoBert

  • Daten aus List an eine Textdatei übergeben

    • autoBert
    • 14. Oktober 2011 um 14:01

    Hallo Toy,

    du gehst in einer Schleife einfach alle Einträge (erhälst du mit

    [autoit]

    _GUICtrlListBox_GetCount

    [/autoit]

    durch) und liest Eintrag für Eintrag mit

    [autoit]

    _GUICtrlListBox_GetText

    [/autoit]

    aus. as ganze würde dann so aussehen:

    [autoit]

    #include <GUIConstants.au3>
    #Include <GuiListBox.au3>
    #include <ListboxConstants.au3>
    #include <File.au3>

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

    Global $szDrive,$szDir,$szFName,$szExt, $aListe

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

    $hGUI = GUICreate("Flaggen", 300, 130)
    $hListe = GUICtrlCreateList("", 10, 10, 180, 80,$LBS_NOTIFY)
    $hNeu = GUICtrlCreateButton("...",200,10,30,25)
    $hVorschau = GUICtrlCreatePic(@ScriptDir & "\Flaggen\NA.jpg", 210, 40, 36, 24)
    $hTxtSave = GUICtrlCreateButton("&Speichern",10,100,80)
    $hTxLoad = GUICtrlCreateButton("&Laden",210,100,80)
    GUISetState()

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    case $hTxLoad
    _FileReadToArray(@ScriptDir & "\flaggen.txt",$aListe)
    for $i = 1 to $aListe[0]
    _GUICtrlListBox_InsertString($hListe,$aListe[$i])
    Next
    case $hTxtSave
    $hFile = FileOpen(@ScriptDir & "\flaggen.txt",2)
    for $i = 0 to _GUICtrlListBox_GetCount($hListe) -1
    FileWriteLine($hFile,_GUICtrlListBox_GetText($hListe,$i))
    Next
    FileClose($hFile)
    case $hNeu
    $sAlt = GUICtrlRead($hListe)
    $sPlus = FileOpenDialog("Land auswählen:",@ScriptDir & "\Flaggen","Bilder (*.jpg)",3,"",$hGUI)
    _PathSplit($sPlus,$szDrive,$szDir,$szFName,$szExt)
    ;ConsoleWrite($szFName & @CRLF)
    _GUICtrlListBox_InsertString($hListe,$szFName,0)
    Case $hListe
    GUICtrlSetImage($hVorschau, @ScriptDir & "\Flaggen\" & GUICtrlRead($hListe) & ".jpg")
    EndSwitch
    WEnd

    [/autoit]

    für obiges Beispiel benötigts du noch Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. ,

    mfg autoBert

    Dateien

    Flaggen.zip 190,08 kB – 145 Downloads
  • AutoIt - Neuling benötigt Hilfe mit Batch

    • autoBert
    • 13. Oktober 2011 um 14:31

    In einem solchen Fall einfach mit einfachen Hochzeichen doppelten Hochzeichen arbeiten:

    Code
    '"C:\Dokumente und Einstellungen\Administrator\Eigene Dateien\..."'

    mfg autoBert

  • Excel - Spalten löschen mit For-Next-Schleife

    • autoBert
    • 12. Oktober 2011 um 20:19

    wenn dies funktioniert:

    [autoit]

    #AutoIt3Wrapper_UseX64=no
    #include <excel.au3>

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

    dim $file, $ofile, $str, $ary, $cnt

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

    $file = "C:\Users\x0r\Desktop\AutoIT_Excel\excel1.xlsx"
    $ofile = _ExcelBookOpen($file)
    $str = "F,E,C"

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

    $ary = StringSplit($str,",")

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

    For $i = 1 to $ary[0]
    $ary[$i] = Asc($ary[$i]) -64
    _ExcelColumnDelete($ofile,$ary[$i],1)
    Next

    [/autoit]

    sollte auch das funktionieren:

    [autoit]

    #AutoIt3Wrapper_UseX64=no
    #include <excel.au3>

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

    dim $file, $ofile, $str, $ary, $cnt

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

    $file = "C:\Users\x0r\Desktop\AutoIT_Excel\excel1.xlsx"
    $ofile = _ExcelBookOpen($file)
    $str = "6,5,4"

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

    $ary = StringSplit($str,",")

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

    For $i = 1 to $ary[0]
    _ExcelColumnDelete($ofile,Int($ary[$i]),1)
    Next

    [/autoit]

    das Problem scheint daran zu liegen dass der Datentyp als String und nicht als INTeger erkannt wird, habe aber kein Excel installiert kann es nicht testen,

    mfg autoBert

  • Lokales Admin Passwort inkl. Rechnername

    • autoBert
    • 12. Oktober 2011 um 19:02

    schön, dann ist dein Problem ja gelöst, schön wäre es allerdings auch wenn du den Thread auf gelöst setzt. Einfach 1. Beitrag bearbeiten, Präfix (nähe Überschrift) ändern und speichern (absenden)

    mfg autoBert

  • 2ter Klick auf Button

    • autoBert
    • 11. Oktober 2011 um 16:56

    Einfachstes Beispiel wie so etwas funktioniert findet man in der Hilfe zu GuiCtrlCreateProgress:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>

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

    Opt('MustDeclareVars', 1)

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

    Example()

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

    Func Example()
    Local $progressbar1, $progressbar2, $button, $wait, $s, $msg, $m

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

    GUICreate("Meine GUI Progressbar", 220, 100, 100, 200)
    $progressbar1 = GUICtrlCreateProgress(10, 10, 200, 20)
    GUICtrlSetColor(-1, 32250); Funktioniert nicht mit Windows XP Style
    $progressbar2 = GUICtrlCreateProgress(10, 40, 200, 20, $PBS_SMOOTH)
    $button = GUICtrlCreateButton("Start", 75, 70, 70, 20)
    GUISetState()

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

    $wait = 100; Warte 100ms bis zum nächsten Schritt
    $s = 0; Progressbar-Startposition
    Do
    $msg = GUIGetMsg()
    If $msg = $button Then
    GUICtrlSetData($button, "Stop")
    For $i = $s To 100
    If GUICtrlRead($progressbar1) = 50 Then MsgBox(0, "Info", "Die Hälfte ist fertig ...", 1)
    $m = GUIGetMsg()

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

    If $m = -3 Then ExitLoop

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

    If $m = $button Then
    GUICtrlSetData($button, "Weiter")
    $s = $i ; Speichere aktuelle Balkenposition in $s
    ExitLoop
    Else
    $s = 0
    GUICtrlSetData($progressbar1, $i)
    GUICtrlSetData($progressbar2, (100 - $i))
    Sleep($wait)
    EndIf
    Next
    If $i > 100 Then
    ; $s=0
    GUICtrlSetData($button, "Start")
    EndIf
    EndIf
    Until $msg = $GUI_EVENT_CLOSE
    EndFunc ;==>Example

    [/autoit]

    mfg autoBert

  • Synatxproblem GuiCtrlRead - GuiCtrlSetData und Konsorten...

    • autoBert
    • 10. Oktober 2011 um 21:42

    Hallo ,

    zum 1. hast du vergessen den Rückgabewert von GuiCtrlRead in einer Variablen zu speichern. 2. benutzt Autoit den "." als Trennzeichen zwichen Vor- und Nachkomma. Mach das ganze also so:

    [autoit]

    Case $Msg = $Button5
    $UST1 = GUICtrlRead($EINN_IN) * 1.19
    GUICtrlSetData($UST_IN, $UST1)

    [/autoit]

    mfg autoBert

  • Synatxproblem GuiCtrlRead - GuiCtrlSetData und Konsorten...

    • autoBert
    • 10. Oktober 2011 um 17:57

    Hallo Mike280399,

    dein Problem ist dass du Select ... Endselect benutzt da lautetdie Syntax

    [autoit]

    Case $msg = $Button1
    $B1 = GUICtrlRead($Display)
    GUICtrlSetData($EINN_IN, $B1)

    [/autoit]

    Etwas geschickter ist hier die Verwendung von Switch ... EndSwitch,

    mfg autoBert

  • youtube html decodieren

    • autoBert
    • 10. Oktober 2011 um 17:44
    Zitat von chip

    Wo kein Kläger da kein Richter. Es ist und bleibt illegal von youtube Sachen runterzuladen/zuändern/zuzugreifen wenn dies nicht von google direkt genehmig wurde. Da kannst du noch soviel Suchen. Und wenn mal etwas genauer geschaut hättest dann hättest gemerkt das noch mehr recht dubiose Seiten auf diese "Firma" registriert sind ;).


    Auch hier täuscht du dich, es mag zwar nach amerikanischem Recht verboten sein, diese Seite zu nutzen. Nach deutschem Recht ist das D<ownloaden darüber legal, zumindest solange ich keine Titel herunterlade die gegen Urheber- oder anderes geltendes dt. Recht verstossen.
    Und was du unter dubiose Seite einordnest sieht eine grosse INet-Gemeinschaft anders: http://www.mywot.com/en/scorecard/youtube-mp3.org demnach ist die Seite ausserordentlich vertrauenswürdig.

    mfg autoBert

  • youtube html decodieren

    • autoBert
    • 10. Oktober 2011 um 16:18
    Zitat von chip

    Ja genau, wenn man eine illegale Seite nutzt ist das nicht illegal XD. Der war gut.

    Wie kommst du darauf dass eine in D ansässige Firma (eingetragen Registergericht: Amtsgericht Hannover Registernummer: HRB 206443) höchst offiziell eine illegale Seite betreibt. Wenn dem so wäre würden sie doch mit Strafanzeigen überzogen.
    Selbst Urheberrechtsschutzverletzungen werden, sofern gemeldet, für die Zukunft unmöglich gemacht:

    Zitat

    Sollten über unseren Proxy Urheberrechtsverletzungen begangen werden, so werden wir nach einer Mitteilung Ihrerseits sofort handeln und die betreffenden YouTube-Videos aus unserem System ausschließen, jedoch wird das Video weiterhin über YouTube erreichbar sein.

    mfg autoBert

  • youtube html decodieren

    • autoBert
    • 10. Oktober 2011 um 15:02
    Zitat von General Kaboom

    Und überhaupt: alle diese Programmedie du meinst sind höchstens teilweise aber NICHT 100%ig legal, die verstecken sich hinter einem legalen Video-Converter oder sowas ähnlichem und fallen auf den ersten Blick gar nicht auf, somit interessiert sich niemand dafür...in echt ist es aber etwas komplizierter du kannst für das Programieren solcher Software sehr hohe Geldstrafen bekommen. Sprich: höchst illegal und hat somit in diesem Forum nichts zu suchen ;)

    Deine Argumentation ist stark daneben, es gibt keinen einzigen Fall in dem ein Programmierer eines YouTube-Downloaders aich nur 1 Cent Strafe bekommen hätte.
    Es ist allerdings gegen die Forenregeln da YouTube es in seinen Nutzungsbedingungen verbietet. Es gibt hier aber eine Seite mit der du es realisieren kannst: http://www.youtube-mp3.org/ . Es gibt hier keine AGB's oder ähnliches die es verbieten würden. Sollte damit auch einfach zu realisieren sein einfach IE.au3 oder FF.ai3 benutzen,

    mfg autoBert

  • Reinfolge von Buttons, Labels, etc.

    • autoBert
    • 10. Oktober 2011 um 01:55

    Hallo SionS,

    Zitat

    Wird ein Bild als Hintergrundbild genutzt, während die anderen Controls dieses quasi überlappen, so ist es wichtig, das Bild-Control zu deaktivieren und es nach den anderen Controls zu erstellen: GuiCtrlSetState(-1,$GUI_DISABLE).

    Quelle: dt. Hilfe

    mfg autoBert

  • Iniwrite

    • autoBert
    • 9. Oktober 2011 um 22:28

    Hallo PowerCore,

    wenn du die Schülername als Sketionsnamen nimmst kannst du es so machen:

    Spoiler anzeigen
    [autoit]

    ; *** Start added by AutoIt3Wrapper ***
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    ; *** End added by AutoIt3Wrapper ***
    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_UseUpx=n
    #AutoIt3Wrapper_Add_Constants=n
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****

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

    Local $sIni = @ScriptDir & "\Meldungen.ini"

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

    $Form1_1 = GUICreate("Verstösse Melden", 764, 481, 335, 244)
    $idInpSchueler = GUICtrlCreateInput("Name", 136, 16, 617, 21)
    $Label1 = GUICtrlCreateLabel("Name des Schülers", 8, 16, 96, 17)
    $idCboVerstoss = GUICtrlCreateCombo("Verstoss", 136, 48, 617, 25)
    GUICtrlSetData(-1, "1 Körperverletzung|2 Rauferei (kleiner)|3 Diebstahl|4 Schwänzen|5 Zu spät erscheinen|6 Fluchen|7 Disziplin")
    $idEdtVerstoesse = GUICtrlCreateEdit("", 136, 72, 473, 337, BitOR($ES_AUTOHSCROLL, $ES_WANTRETURN), 0)
    GUICtrlSetData(-1, StringFormat("Zeile 1\r\nZeile 2"))
    $Label2 = GUICtrlCreateLabel("Anmerkungen zum Verstoss", 0, 72, 135, 17)
    $idBtnSave = GUICtrlCreateButton("Speichern", 144, 424, 81, 25, 0)
    $idBtnCancel = GUICtrlCreateButton("Cancel", 536, 424, 81, 25, 0)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    ;GUISwitch( $Form1 )
    GUIDelete($Form1_1)
    ExitLoop
    Case $idInpSchueler
    $sVerStoesse = ""
    $iVerNr = 0
    $sSchueler = GUICtrlRead($idInpSchueler)
    $aSchueler = IniReadSection($sIni, $sSchueler)
    If Not @error Then
    $iVerNr = $aSchueler[0][0]
    For $i = 1 To $aSchueler[0][0]
    $sVerStoesse &= $aSchueler[$i][1] & @CRLF
    Next
    EndIf
    GUICtrlSetData($idEdtVerstoesse, $sVerStoesse)
    Case $idBtnSave
    $sVerstoss = GUICtrlRead($idCboVerstoss)
    $sVerStoesse &= $sVerstoss & @CRLF
    GUICtrlSetData($idEdtVerstoesse, $sVerStoesse)
    IniWrite($sIni, $sSchueler, $iVerNr + 1, $sVerstoss)
    Case $idBtnCancel
    ;GUISwitch( $Form1 )
    GUIDelete($Form1_1)
    ExitLoop
    EndSwitch
    WEnd

    [/autoit]

    du solltest aber meines Erachtens dich mit SQLite beschäftigen um dort die Daten zu speichern. Ausserdem würde ich das Edit-Control gegen ein ListView-Control austauschen in dem du dann noch Datum und evtl. weitere Bemerkungen anzeigen kannst,

    mfg autoBert

  • Script wird nicht richtig ausgeführt bei ablegen des RDP Fensters

    • autoBert
    • 9. Oktober 2011 um 18:30

    Da ist ein RDP-Problem, denn ohne RDP-Sitzung (ob abgemeldet oder nicht) kann es nicht funktionieren,

    mfg autoBert

  • alle udp/tcp verbindungen eines prozesses... nur wie ?

    • autoBert
    • 9. Oktober 2011 um 01:22

    Hallo whiteLion,

    dein Link zu AIS funktioniert nicht,

    mfg autoBert

  • In WBBlite-Forum SB einfügen

    • autoBert
    • 26. September 2011 um 03:26

    Dann gehe zu Lima-City Dort ist es nicht grundsätzlich verboten,falls deine Shoutbox aber zu viel Traffic erzeugt wirst du von der Administration aufgefordert sie zu entfernen. Im Moment sind zwar keine Neuanameldungen möglich, ich rechne aber damit dass dies noch diese Woche geschieht.

    Zitat von Schnacko

    kann ich das dann inportieren, oder muss ich alles neu schreiben?

    Mit phpMaAdmin kannst du die Datenbank ja exportieren und auch wieder importieren.

  • AdlibRegister -> progi

    • autoBert
    • 25. September 2011 um 20:52

    @pestomitketchup: es ist unhöflich seine Skripte auf pastbin zu stellen anstatt sie direkt hier zu posten. Deshalb der Vollständigkeit halber:

    Spoiler anzeigen
    [autoit]

    do
    $anzahl = InputBox("Info","Geben sie die anzahl ein:","")
    Until Not @error

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

    $DauerGesammt = ($anzahl*7.2);sec
    ;--------------------------------------------------------------------------------

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

    AdlibRegister("_start",1000)

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

    While 1
    Sleep(250)
    WEnd

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

    Func _start()
    ToolTip("Restzeit: " & _Sek2StdMinSek($DauerGesammt),0,0)
    $DauerGesammt = $DauerGesammt - 1
    If $DauerGesammt = 0 Then _toDo()

    EndFunc

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

    Func _toDo()
    AdlibUnRegister("_start")
    Exit
    EndFunc

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

    Func _Sek2StdMinSek($value)

    $format1 = "%02d:%02d:%02d"
    $format2 = "%02d:%02d"
    $format3 = "%02d Std. %02d Min. %02d Sek."
    $format4 = "%02d Std. %02d Min."

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

    $std = Floor($value / (60*60))
    $value = $value - ((60*60) * $std)
    $min = Floor($value / (60))
    $sek = $value - ((60) * $min)

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

    Return StringFormat($format1,$std,$min,$sek)
    EndFunc

    [/autoit]

    mfg autoBert

  • Jährliche Foreninventarisierung

    • autoBert
    • 24. September 2011 um 04:13
    Zitat von Script-Bär

    Und was ist mit der SuFu und ihrem Ersatz (AutoBert)?


    was soll mit mir sein? Bin immer noch unter den Lebenden. Inventar sind üblicherweise Vermögensgegenstände und Schulden eines Unternehmens. Üblicherweise sind die Vermögensgegenstände nicht lebend, ich weis es gibt Ausnahmen z.B. bei : Schweinemastbetrieben, Rassehunde- bzw. Rassekatzen-Züchter. Wusste bisher nicht das AutoIt.de zu letzteren gehört,

    mfg autoBert

  • Schwierigkeiten mit dem Verstecken / Ausblenden einer Installation

    • autoBert
    • 24. September 2011 um 03:58

    schön, dann ist dein Problem ja gelöst, schön wäre es allerdings auch wenn du den Thread auf gelöst setzt. Einfach 1. Beitrag bearbeiten, Präfix (nähe Überschrift) ändern und speichern (absenden)

    mfg autoBert

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™