Beiträge von Eistee

  • [GUI] Hintergrundbild

    Du musst das "Hintergrundbild" als letztes aller bilder in der GUI einfügen und mit $WS_Disabled abschalten hier mal ein beispiel


    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <ListBoxConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #NoTrayIcon

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

    $Form1 = GUICreate("", 601, 401, -1, -1,$WS_Popup)
    $Pic1 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Administrator\Desktop\CarData\NE.jpg", 344, 80, 175, 40, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    GUICtrlSetCursor (-1, 0)
    $Pic2 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Administrator\Desktop\CarData\Loe.jpg", 384, 128, 175, 40, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    GUICtrlSetCursor (-1, 0)
    $Pic3 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Administrator\Desktop\CarData\Close.jpg", 547, 363, 30, 30, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    GUICtrlSetCursor (-1, 0)
    $Pic4 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Administrator\Desktop\CarData\BG.jpg", 0, 0, 600, 400, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS,$WS_Disabled))
    $List1 = GUICtrlCreateList("", 24, 88, 225, 292)
    GUICtrlSetCursor (-1, 0)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Pic1
    _AnimButton ($Form1, $Pic1)
    _1 ()
    Case $Pic2
    _AnimButton ($Form1, $Pic2)
    _2 ()
    Case $Pic3
    _AnimButton ($Form1, $Pic3)
    _3 ()
    EndSwitch
    WEnd

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

    Func _1 ()
    Exit
    EndFunc

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

    Func _2 ()
    Exit
    EndFunc

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

    Func _3 ()
    Exit
    EndFunc

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

    Func _AnimButton($IDgui, $IDbtn, $delay=100) ;nicht von mir hatt mir freundlicherweise jemand ausm forum hier geschrieben dan gehen die bilder genau wie ein button kurz nachunten sieht realistischer aus.
    Local $pos = ControlGetPos($IDgui, '', $IDbtn)
    Local $pWin = WinGetPos($IDgui)
    ControlMove($IDgui, '', $IDbtn, $pos[0], $pos[1]+2, $pos[2]-2, $pos[3]-2)
    Sleep($delay)
    ControlMove($IDgui, '', $IDbtn, $pos[0], $pos[1], $pos[2], $pos[3])
    EndFunc

    [/autoit]

    Falls du es mit den bildern testen willst die sind im Anhang

    MFG Eistee

  • Auto Datenbank mit bild ? Ansätze ?

    Hallo Auto It Gemeinde

    Ich habe eine Frage und zwar : Ein freund von mir lern KFZ-Mechatroniker und bräuchte ein Programm bei dem er sozusagen eine Datenbank anlegen kann Folgende sachen sollen eingefügt werden können :

    Ein bild vom Auto, der name des Autos,verschiedene Informationen (Ps,kw,hubraumusw.) und noch einige notizen. das ganze hätte er gerne in einer GUI
    Jetzt mein Problem , mir fällt kein Lösungsansatz ein da ich nicht weiss wie ich z.b. dafür sorgen kann das ein skript die daten die er eingibt (das wäre ja kein thema) in einen eigenen skript schreibt und wen er diesen aufruft alles anzeigt
    das Grundprinzip ist klar aber wie erstelle ich mit einem skript einen neuen skript der immer wieder andere informationen hatt ?
    ich weiss meine Lösungsansatz sollte bereits hier stehen aber wie gesagt mir fällt leider keiner ein und auch mit der hilfe kam ich nicht weit
    für Jegliche Ideen wäre ich euch sehr verbunden

    Vielen Dank Im Vorraus

    Mfg Eistee

  • Betriebssystem in Autoit

    es vereinfacht auszudrücken : autoit ist nichts weiter als eine möglichkeit windows zu manipulieren somit ist es nicht in der Lage so komplexe aufgaben wie ein eigenständiges system zu verarbeiten, da es im grunde auf dem windows kernel und den verschiedenen integrierten funktionen aufbaut
    wenn du tatsächlich ein Richtiges Betriebssystem schreiben willst musst du eine andere sprache wählen welch eigenständig arbeiten kann ohne vorhandene Funktionen in einer windows umgebung zu nutzen

    MFG

  • Blutdruck Zucker Datenbank

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #NoTrayIcon

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

    $Form1 = GUICreate("Form1", 255, 92, 193, 115)
    $Input1 = GUICtrlCreateInput("Zuckerwert", 0, 0, 121, 21)
    $Input2 = GUICtrlCreateInput("Blutdruck", 128, 0, 121, 21)
    $Button1 = GUICtrlCreateButton("Speichern", 56, 40, 123, 25, 0)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    _1 ()
    EndSwitch
    WEnd

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

    Func _1 ()
    IniWrite("test.txt","1","Zucker" ,GUICtrlRead($Input1))
    sleep (500)
    IniWrite("test.txt","2","Blutdruck" ,GUICtrlRead($Input2))
    Exit
    EndFunc

    [/autoit]

    damit sollteste was anfangen können ^^

  • gui in gui verbesserungen möglich ?

    Vielen dank ich werde mich jetzt ersmal damit auseinander setzen und sehen was sich machen lässt danke dir nochmal wenn ich wiedererwarten ein problem habe melde ich mich nochmal ^^

    Edit : Eine frage kann man theorethisch auch sowas wie eine Taskleiste integrieren ?
    das man von den verschiedenen childs wechseln kann ? ^^

    Mfg

  • gui in gui verbesserungen möglich ?

    Hallo Leute habe eben einen beitrag gelesen das man eine gui in einer Sogenannten eltern gui erstellen kann ich habe ein paar fragen dazu :

    1. Kann man dafür sorgen das nur ein fenster sich am anfang öffnet und das man durch klicken auf einen butten erst das childgui aufruft ?
    2. kann man der Eltern bzw. Parent gui sagen das sie auch mehrere childs haben kann ?


    Ich würde nähmlich gerne ein kundenverwaltungssystem schreiben das ich zwar auch so lösen könnte aber wenn alles sauber in einer gui wäre dann wäre das echt klasse
    hier nochmal der bisherige stand den ich von GTASpider kopiert habe

    Spoiler anzeigen
    [autoit]

    #include<WindowsConstants.au3>
    Opt("GUIOnEventMode",1)

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

    $hGUI = GUICreate("Test", 500, 500, -1, -1, BitOR($WS_MINIMIZEBOX, $WS_CAPTION, $WS_POPUP, $WS_SYSMENU, $WS_CLIPCHILDREN))
    GUISetOnEvent(-3,"_exit")
    $hChildGUI = GUICreate("Test2", 300, 300, 10, 10, $WS_MAXIMIZEBOX)
    GUISetOnEvent(-3,"_closeChild")

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

    $nExStyle = DllCall("user32.dll", "int", "GetWindowLong", "hwnd", $hChildGUI, "int", 0xEC)
    DllCall("user32.dll", "int", "SetWindowLong", "hwnd", $hChildGUI, "int", 0xEC, "int", BitOR($nExStyle[0], $WS_EX_MDICHILD))
    DllCall("user32.dll", "int", "SetParent", "hwnd", $hChildGUI, "hwnd", $hGUI)
    GUISetState()

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

    GUISetState(@SW_SHOW, $hGUI)

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

    While 1
    Sleep(100)

    WEnd

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

    Func _closeChild()
    GUIDelete($hChildGUI)
    EndFunc

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

    Func _exit()
    Exit
    EndFunc

    [/autoit]


    MFG ?(

  • Warum AutoIt?

    Ganz einfach weil man mit Autoit (fast) alles realisieren kann und die Syntax an sich auch relativ einfach zu verstehen ist
    man kann vor allem viele Kleinigkeiten machen die einem im alltag helfen

  • Runder Button

    Auch wenn man es hier im Forum irgendwo findet muss ich zugeben ich habe es über die hilfe auch nicht gefunden
    aber ich habe noch einen alten script von mir gefunden mit dem passenden code ich poste ihn dir mal damit sollte es gehen ist ne Beispiel gui


    Spoiler anzeigen
    [autoit]

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

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

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 377, 442, 377, 192,$WS_POPUP)
    _GuiRoundCorners($Form1, 0, 0, 65, 65)
    $Button1 = GUICtrlCreateButton("XXXXXXX", 160, 152, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("XXXXXXX", 128, 296, 75, 25, 0)
    $Button3 = GUICtrlCreateButton("XXXXXXX", 72, 80, 75, 25, 0)
    $Button4 = GUICtrlCreateButton("XXXXXXX", 288, 56, 75, 25, 0)
    $Button5 = GUICtrlCreateButton("X", 344, 416, 27, 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 $Button1
    _e ()
    Case $Button2
    _e ()
    Case $Button3
    _e ()
    Case $Button4
    _e ()
    Case $Button5
    _e ()
    EndSwitch
    WEnd

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

    Func _e ()
    Exit
    EndFunc

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

    Func _GuiRoundCorners($hWnd, $x1, $y1, $x3, $y3)
    Dim $pos, $ret, $ret2
    $pos = WinGetPos($hWnd)
    $ret = DllCall('gdi32.dll', 'long', 'CreateRoundRectRgn', _
    'long', $x1, _
    'long', $y1, _
    'long', $pos[2], _
    'long', $pos[3], _
    'long', $x3, _
    'long', $y3)
    If $ret[0] Then
    $ret2 = DllCall('user32.dll', 'long', 'SetWindowRgn', 'hwnd', $hWnd, 'long', $ret[0], 'int', 1)
    If $ret2[0] Then
    Return 1
    Else
    Return 0
    EndIf
    Else
    Return 0
    EndIf
    EndFunc

    [/autoit]


    Mfg Eistee


    Edit : habe grade erst gesehen das oben auch ein Beispiel ist bin wohl zu spät xD ^^

  • Runder Button

    Tut mir ja leid wenn ich mich jetzt mal einmische aber :
    Erstens Ja ansprüche sind echt gut da haste ja recht aber mann muss seine Ansprüche selbst verfolgen und in die Tat umsetzen denn nur so lernt man auch wirklich was dazu !!!
    Ich weiss ebenso das ich der Falsche bin um dir das zu sagen da ich selber so einer war der nicht machen aber alles haben wollte nur bei mir war das so das ich hier im forum dann von allen zugetextet wurde es selber zu machen , die hilfe zu benutzen und so weiter
    also würde ich dir empfehlen lerne es selber frage nur wenn du nicht mehr weiter weisst und in notfällen oder höre auf zu scripten denn so macht das keinen sinn tut mir leid das ich das sage aber so ist es nun einmal


    Mfg Eistee

  • Problem mit GUI

    ich denke mal das lieg hier dran :

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 316, 135, 193, 125)
    $Button1 = GUICtrlCreateButton("Prozess hinzufügen", 24, 16, 105, 41, 0)
    $Button2 = GUICtrlCreateButton("Prozess löschen", 24, 72, 105, 41, 0)
    $List1 = GUICtrlCreateList("", 144, 16, 145, 97)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    $readPro =IniReadSection ("rolf.txt","PROCESS")
    GUICtrlSetData ($List1,StringFormat($readPro))
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    $ProAdd = InputBox ("Prozess hinzufügen","Geben Sie ihren Prozess ein der zur Liste hinzugefügt werden soll.","Geben Sie einen Prozess ein.")
    GUICtrlSetData($List1,StringFormat($ProAdd,$ProAdd))
    IniWrite ("rolf.txt","PROCESS",$ProAdd,1)
    case $Button2
    $ProDel = InputBox ("Prozess löschen","Geben Sie ihren Prozess ein der von der Liste gelöscht werden soll.","Geben Sie hier ihren Prozess ein.")
    IniDelete ("rolf.txt","PROCESS",$ProDel); ersetze 4pordel durch $Proadd denn das willste ja löschen odder nicht ?
    EndSwitch
    WEnd

    [/autoit]