Beiträge von Tweaky

**Tweaky**

so ist der Syntax korrekt

[autoit]

#include <IE.au3>

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

_IECreate("http://" & _
@IPAddress1)

[/autoit]

**Tweaky**

Oh man glaubt ihr wir sind Hellseher
Wo ist dein Skript
Was für ein Formular
Was verstehst du unter falsch formatiert
...

**Tweaky**

Ohja, Raupis Vorschlag ist besser in Bezug auf das Kontextmenü

**Tweaky**

OK, danke habs verbessert, wusste ich nicht

**Tweaky**

Dies ist gar nicht schwer.
Schau dir vor allem den letzten Teil des Skripts an

Spoiler anzeigen

[autoit]

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

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

;~ Opt('MustDeclareVars', 1)

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

;Rechtsklick auf das listview
GUIRegisterMsg($WM_NOTIFY, "WM_Notify_Events")

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

Global $Finished = IniRead("Settings.ini", "Path", "Finished", ""), $count = 1
Dim $lol[1], $list[1], $Size[1], $Date[1]
Dim $listview

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

$search = FileFindFirstFile($Finished & "\*.*")

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

; Check if the search was successful
If $search = -1 Then
MsgBox(0, "Error", "No files/directories matched the search pattern")
Exit
EndIf

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

; Dateien im Verzeichnis $Finished finden und arrays bei jeder gefundenen Datei ReDim'en
While 1
$file = FileFindNextFile($search)
If @error Then ExitLoop
ReDim $lol[$count + 1], $list[$count + 1], $Size[$count + 1], $Date[$count + 1]
$lol[$count] = $file
$count += 1
WEnd

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

; Dateigröße der gefunden Dateien ermitteln
For $i = 1 To UBound($lol) - 1
$Size[$i] = FileGetSize($Finished & "\" & $lol[$i])
Next

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

;Erstelldatum ermitteln und in DD.MM.YYYY umwandeln
For $i = 1 To UBound($lol) - 1
$Date[$i] = FileGetTime($Finished & "\" & $lol[$i], 1, 1)
$new = StringTrimRight($Date[$i], 6)
$Date[$i] = StringRight($new, 2) & "." & StringTrimLeft(StringLeft($new, 6), 4) & "." & StringTrimRight($new, 4)
Next

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

; Close the search handle
FileClose($search)

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

_Gui()

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

Func _Gui()
Local $hGui, $item1, $item2, $item3, $nMsg

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

$hGui = GUICreate("listview items", 500, 500, -1, $WS_EX_ACCEPTFILES) ; Erstellt die MainGui
GUISetBkColor(0x00E0FFFF) ; will change background color

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

$listview = GUICtrlCreateListView(" Dateiname | Erstelldatum | Größe ", 10, 10, 400, 400) ; Hier wird das ListView erstellt

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

; Name, Datum, und Größe in das ListView eintragen
For $i = 1 To UBound($list) - 1
$list[$i] = GUICtrlCreateListViewItem($lol[$i] & "|" & $Date[$i] & "|" & $Size[$i] & " kb", $listview)
Next

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

GUISetState() ; Gui anzeigen

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

;Endlosschleife um die Gui aufrecht zu halten
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $listview
MsgBox(0, "listview", "clicked=" & GUICtrlGetState($listview), 2)
EndSwitch
WEnd
EndFunc ;==>_Gui

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

;********************************************
; Rechtsklick auf das listview *
;********************************************

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

; WM_NOTIFY event handler
Func WM_Notify_Events($hWndGUI, $MsgID, $wParam, $lParam)
#forceref $hWndGUI, $MsgID, $wParam
Local $tagNMHDR, $event, $hwndFrom, $code
$tagNMHDR = DllStructCreate("int;int;int", $lParam)
If @error Then Return
$event = DllStructGetData($tagNMHDR, 3)
Select
Case $wParam = $listview
Select
Case $event = $NM_RCLICK
$contextmenu = GUICtrlCreateContextMenu($listview)
$button = GUICtrlCreateButton("OK", 100, 100, 70, 20)
$buttoncontext = GUICtrlCreateContextMenu($button)
$buttonitem = GUICtrlCreateMenuItem("Über Button", $buttoncontext)

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

$newsubmenu = GUICtrlCreateMenu("Neu", $contextmenu)
$textitem = GUICtrlCreateMenuItem("Text", $newsubmenu)

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

$fileitem = GUICtrlCreateMenuItem("Öffnen", $contextmenu)
$saveitem = GUICtrlCreateMenuItem("Speichern", $contextmenu)
GUICtrlCreateMenuItem("", $contextmenu) ; Trennstrich

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

$infoitem = GUICtrlCreateMenuItem("Info", $contextmenu)
Case $event = $NM_DBLCLK
Consolewrite( "Doppelklick" & @crlf)
EndSelect
EndSelect
$tagNMHDR = 0
$event = 0
$lParam = 0
EndFunc ;==>WM_Notify_Events

[/autoit]

**Tweaky**

Bitte nicht so viel Infos
Die Kugel sagt mir

[autoit]

ControlClick

[/autoit]

**Tweaky**

Hi,
leider fehlen in der englischen Hilfe zu 3.3.8.1 noch etliche Beispiele zu Funktionen .
Falls einer Lust hat oder schon ein Beispiel parat hat, kann er es gerne hier posten.
Ich werde es dann in der Hilfe ergänzen.

Bei folgenden Funktionen fehlt ein Beispiel. Steht ein Name und eine Zahl dahinter, so existiert ein Beispiel eines Users

Spoiler anzeigen

Code

NoAutoIt3Execute
_EventLog__DeregisterSource
_EventLog__RegisterSource
_FTP_Command
_FTP_DirCreate			autoBert 23
_FTP_DirDelete			autoBert 32
_FTP_DirGetCurrent
_FTP_DirPutContents			autoBert 25
_FTP_DirSetCurrent			autoBert 23
_FTP_FileClose
_FTP_FileDelete
_FTP_FileGet			autoBert Fehlerthread
_FTP_FileOpen
_FTP_FilePut			autoBert 23
_FTP_FileRead
_FTP_FileRename			autoBert 26
_FTP_FileTimeLoHiToStr
_FTP_GetLastResponseInfo
_FTP_ProgressDownload			autoBert 22
_FTP_ProgressUpload
_GDIPlus_BitmapCreateFromGraphics			name22 31
_GDIPlus_BitmapDispose			Tweaky
_GDIPlus_BitmapLockBits			eukalyptus 8
_GDIPlus_BitmapUnlockBits			eukalyptus 8
_GDIPlus_CustomLineCapDispose
_GDIPlus_GraphicsGetDC
_GDIPlus_GraphicsGetSmoothingMode			name22 31
_GDIPlus_GraphicsReleaseDC
_GDIPlus_GraphicsSetSmoothingMode			name22 31
_GDIPlus_PenGetColor			Tweaky
_GDIPlus_PenSetColor			Tweaky
_GUICtrlMenu_LoadMenu
_GUICtrlTab_ActivateTab
_GUICtrlToolbar_Customize
_GUICtrlToolbar_SetDrawTextFlags
_GUICtrlToolbar_SetParent
_GUICtrlToolbar_SetWindowTheme
_GUIToolTip_Activate
_GUIToolTip_AddTool
_GUIToolTip_AdjustRect
_GUIToolTip_BitsToTTF
_GUIToolTip_Create
_GUIToolTip_DelTool
_GUIToolTip_Destroy
_GUIToolTip_EnumTools
_GUIToolTip_GetBubbleHeight
_GUIToolTip_GetBubbleSize
_GUIToolTip_GetBubbleWidth
_GUIToolTip_GetCurrentTool
_GUIToolTip_GetDelayTime
_GUIToolTip_GetMargin
_GUIToolTip_GetMarginEx
_GUIToolTip_GetMaxTipWidth
_GUIToolTip_GetText
_GUIToolTip_GetTipBkColor
_GUIToolTip_GetTipTextColor
_GUIToolTip_GetTitleBitMap
_GUIToolTip_GetTitleText
_GUIToolTip_GetToolCount
_GUIToolTip_GetToolInfo
_GUIToolTip_HitTest
_GUIToolTip_NewToolRect
_GUIToolTip_Pop
_GUIToolTip_PopUp
_GUIToolTip_SetDelayTime
_GUIToolTip_SetMargin
_GUIToolTip_SetMaxTipWidth
_GUIToolTip_SetTipBkColor
_GUIToolTip_SetTipTextColor
_GUIToolTip_SetTitle
_GUIToolTip_SetToolInfo
_GUIToolTip_SetWindowTheme
_GUIToolTip_ToolExists
_GUIToolTip_ToolToArray
_GUIToolTip_TrackActivate
_GUIToolTip_TrackPosition
_GUIToolTip_TTFToBits
_GUIToolTip_Update
_GUIToolTip_UpdateTipText
_MemGlobalAlloc
_MemGlobalFree
_MemGlobalLock
_MemGlobalSize
_MemGlobalUnlock
_MemMoveMemory
_MemVirtualAlloc
_MemVirtualAllocEx
_MemVirtualFree
_MemVirtualFreeEx
_NamedPipes_CallNamedPipe
_NamedPipes_ConnectNamedPipe
_NamedPipes_CreateNamedPipe
_NamedPipes_CreatePipe
_NamedPipes_DisconnectNamedPipe
_NamedPipes_GetNamedPipeHandleState
_NamedPipes_GetNamedPipeInfo
_NamedPipes_PeekNamedPipe
_NamedPipes_SetNamedPipeHandleState
_NamedPipes_TransactNamedPipe
_NamedPipes_WaitNamedPipe
_ScreenCapture_SetJPGQuality				AutoBert 10
_ScreenCapture_SetTIFColorDepth
_ScreenCapture_SetTIFCompression
_SendMessageA
_VersionCompare			Tweaky
_viInteractiveControl
_WinAPI_AttachConsole
_WinAPI_AttachThreadInput
_WinAPI_BitBlt				eukalyptus 8
_WinAPI_CallNextHookEx
_WinAPI_CommDlgExtendedError
_WinAPI_CopyIcon				eukalyptus 8
_WinAPI_CreateBitmap
_WinAPI_CreateCompatibleBitmap			progandy separat
_WinAPI_CreateCompatibleDC			progandy separat
_WinAPI_CreateEvent			seukalyptus 37
_WinAPI_CreateFontIndirect
_WinAPI_CreateProcess
_WinAPI_CreateSolidBitmap
_WinAPI_CreateSolidBrush	Greenhorn 5
_WinAPI_CreateWindowEx	Greenhorn 5
_WinAPI_DefWindowProc
_WinAPI_DeleteDC
_WinAPI_DestroyIcon				eukalyptus 8
_WinAPI_DestroyWindow
_WinAPI_DrawEdge
_WinAPI_DrawFrameControl
_WinAPI_DrawIcon				eukalyptus 8
_WinAPI_DrawIconEx				eukalyptus 8
_WinAPI_EnableWindow
_WinAPI_FatalAppExit			Tweaky
_WinAPI_FillRect		Greenhorn 5
_WinAPI_FindWindow
_WinAPI_FlushFileBuffers
_WinAPI_FormatMessage
_WinAPI_FrameRect
_WinAPI_GetAsyncKeyState
_WinAPI_GetCurrentProcess			Tweaky
_WinAPI_GetCurrentThread
_WinAPI_GetDeviceCaps
_WinAPI_GetDIBits
_WinAPI_GetGuiResources
_WinAPI_GetLastError
_WinAPI_GetLastErrorMessage
_WinAPI_GetObject
_WinAPI_GetOverlappedResult
_WinAPI_GetParent
_WinAPI_GetProcessAffinityMask
_WinAPI_GetStdHandle
_WinAPI_GetStockObject
_WinAPI_GetSysColorBrush
_WinAPI_GetSystemMetrics
_WinAPI_GetTextMetrics
_WinAPI_GetWindow
_WinAPI_GetWindowDC
_WinAPI_GetWindowHeight			Tweaky
_WinAPI_GetWindowLong
_WinAPI_GetWindowRect		 SEuBo 18
_WinAPI_GetWindowRgn
_WinAPI_GetWindowText		Greenhorn 5
_WinAPI_GetWindowThreadProcessId
_WinAPI_GetWindowWidth		Greenhorn 5
_WinAPI_GetXYFromPoint
_WinAPI_GlobalMemoryStatus
_WinAPI_GUIDFromString
_WinAPI_GUIDFromStringEx
_WinAPI_InProcess
_WinAPI_InvalidateRect		Greenhorn 5
_WinAPI_IsClassName
_WinAPI_IsWindow
_WinAPI_IsWindowVisible
_WinAPI_LoadBitmap
_WinAPI_LoadImage
_WinAPI_LoadLibrary
_WinAPI_LoadShell32Icon				eukalyptus 8
_WinAPI_LocalFree
_WinAPI_MAKELANGID
_WinAPI_MAKELCID
_WinAPI_MakeLong
_WinAPI_MakeQWord
_WinAPI_MessageBeep			Tweaky
_WinAPI_Mouse_Event			Tweaky
_WinAPI_MoveWindow			Tweaky
_WinAPI_MsgBox				Greenhorn 5
_WinAPI_MulDiv
_WinAPI_MultiByteToWideChar
_WinAPI_MultiByteToWideCharEx
_WinAPI_OpenProcess
_WinAPI_PointFromRect
_WinAPI_PostMessage
_WinAPI_PrimaryLangId
_WinAPI_PtInRect		 SEuBo 18
_WinAPI_ReadProcessMemory
_WinAPI_RectIsEmpty
_WinAPI_RedrawWindow
_WinAPI_RegisterWindowMessage
_WinAPI_ReleaseCapture
_WinAPI_SetCapture
_WinAPI_SetCursor			Tweaky
_WinAPI_SetDefaultPrinter
_WinAPI_SetDIBits
_WinAPI_SetEvent
_WinAPI_SetFocus
_WinAPI_SetFont
_WinAPI_SetHandleInformation
_WinAPI_SetLastError
_WinAPI_SetParent				eukalyptus 8
_WinAPI_SetProcessAffinityMask
_WinAPI_SetWindowLong				eukalyptus 8
_WinAPI_SetWindowPos			Tweaky
_WinAPI_SetWindowText
_WinAPI_ShowCursor			Tweaky
_WinAPI_ShowError			Tweaky
_WinAPI_ShowMsg			Tweaky
_WinAPI_ShowWindow			Greenhorn 5
_WinAPI_StringFromGUID
_WinAPI_SubLangId
_WinAPI_SystemParametersInfo
_WinAPI_TwipsPerPixelX
_WinAPI_TwipsPerPixelY
_WinAPI_UpdateLayeredWindow
_WinAPI_UpdateWindow			Greenhorn 5
_WinAPI_WaitForInputIdle
_WinAPI_WaitForMultipleObject			seukalyptus 37
_WinAPI_WaitForSingleObject
_WinAPI_WideCharToMultiByte
_WinAPI_WriteConsole
_WinAPI_WriteProcessMemory
_WinNet_AddConnection
_WinNet_AddConnection2
_WinNet_AddConnection3
_WinNet_CancelConnection
_WinNet_CancelConnection2
_WinNet_CloseEnum
_WinNet_ConnectionDialog
_WinNet_ConnectionDialog1
_WinNet_DisconnectDialog
_WinNet_DisconnectDialog1
_WinNet_EnumResource
_WinNet_GetConnection
_WinNet_GetConnectionPerformance
_WinNet_GetLastError
_WinNet_GetNetworkInformation
_WinNet_GetProviderName
_WinNet_GetResourceInformation
_WinNet_GetResourceParent
_WinNet_GetUniversalName
_WinNet_GetUser
_WinNet_OpenEnum
_WinNet_RestoreConnection
_WinNet_UseConnection

Alles anzeigen

Edit: Liste bis inklusive Post 37

**Tweaky**

alles fehlerfrei

**Tweaky**

Du muß bei Filegettime schon den kompletten Pfad angeben .
Es hilft sehr, wenn man sich den Pfad testweise mit Consolewrite ausgeben läßt

Spoiler anzeigen

[autoit]

#include <File.au3>

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

$pfad = @ScriptDir & "\logs\"

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

$logup = @ScriptDir & "\logup.ini"
$array = _FileListToArray($pfad)
For $i = 1 To $array[0]
$t = FileGetTime($pfad & $array[$i], 0)
$yyyymdhms = $t[0] & $t[1] & $t[2] & $t[3] & $t[4] & $t[5]
IniWrite($logup, $array[$i], "time", $yyyymdhms)
Next

[/autoit]

Edit: zu spät

**Tweaky**

Hier mal meine Variante

Spoiler anzeigen

[autoit]

#include <Array.au3>
#include <GuiComboBox.au3>
#include <GUIConstantsEx.au3>

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

;Array damit die Zuordnung zwischen Namen und Pfad besser ist
Dim $array_programme[6][2]
$array_programme[1][0] = "ICQ"
$array_programme[1][1] = "C:\Programme\ICQ\icq.exe"
$array_programme[2][0] = "MSN"
$array_programme[2][1] = "C:\Programme\MSN\msn.exe"
$array_programme[3][0] = "Skype"
$array_programme[3][1] = "C:\Programme\Skype\skype.exe"
$array_programme[4][0] = "Firefox"
$array_programme[4][1] = "C:\Programme\FireFox\firefox.exe"
$array_programme[5][0] = "Winamp"
$array_programme[5][1] = "C:\Programme\WinAmp\winamp.exe"

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

GUICreate("Dennis's Toolbox", 400, 50)

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

$combo = GUICtrlCreateCombo("ICQ", 10, 10, -1, -1, 0x0003)

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

;ComboBox füllen
For $i = 1 To UBound($array_programme) - 1
_GUICtrlComboBox_AddString($combo, $array_programme[$i][0])
Next

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

GUISetState()

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

Opt("GUICoordMode", 2)
$Button_1 = GUICtrlCreateButton("Run", 215, 0, 75)

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

GUISetState()

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

While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Button_1
$ausgewaehlt = GUICtrlRead($combo) ;ausgewählt
$search = _ArraySearch($array_programme, $ausgewaehlt, 1) ;im Array nach dem Namen suchen
If $search <> -1 Then ;falls der Name gefunden wurde
ConsoleWrite($array_programme[$search][1] & @CRLF)
Run($array_programme[$search][1]) ;im Array den Pfad des ausgewählten Programms raussuchen
EndIf
EndSelect
WEnd

[/autoit]

**Tweaky**

Hi BugFix,
kannst du deine

[autoit]

_Array2DSortFree

[/autoit]

noch um einen optionalen Parameter erweitern?
Er wäre super, wenn man den Index des Beginns des Sortierens (meistens ja 1 und nicht 0) selbst wählen könnte.

**Tweaky**

Hi,
was wird dies denn, wenn man fragen darf

**Tweaky**

Wo ist dein Code
Probier mal

[autoit]

_GUICtrlListView_GetSelectedIndices
_GUICtrlListView_GetItemText

[/autoit]

Kennst du die deutsche Hilfe

**Tweaky**

Bei den Bemerkungen wird alles hintereinander geschrieben
z. B. hier

**Tweaky**

Spalten

Meinst du so

Spoiler anzeigen

[autoit]

#include <File.au3>
$datei = "C:\test.txt"

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

AdlibEnable("_auslesen", 60000) ;alle 60 Sekunden aufrufen

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

Func _auslesen()
$file = FileOpen($datei, 0)

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

If $file = -1 Then
MsgBox(0, "Fehler", "Die Datei konnte nicht geöffnet werden.")
Exit
EndIf

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

$zeilen = _FileCountLines($file) - 1 ;Anzahl Zeilen
$letzte_zeile = FileReadLine($file, $zeilen) ;auslesen
$letzte_zeile = StringLeft($letzte_zeile, 54) ;rechts wegtrimmen
$letzte_zeile = StringTrimLeft($letzte_zeile, 41) ;links wegtrimmen
ConsoleWrite($letzte_zeile & @CRLF)

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

FileClose($file)
EndFunc ;==>_auslesen

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

While 1
Sleep(10)
WEnd

[/autoit]

**Tweaky**

So kannst du es machen, damit du feststellen kannst, wenn sich die Auswahl ändert

Spoiler anzeigen

[autoit]

#include <GuiListBox.au3>
#include <GUIConstantsEx.au3>
#include <ListBoxConstants.au3>
#include <WindowsConstants.au3>
#include <Array.au3>

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

GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")

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

#Region ### START Koda GUI section ### Form=
;--------Den folgenen Abschnitt weiß ich--------
$Hauptfenster = GUICreate("Program1", 513, 358, 195, 126)
$Willkomen = GUICtrlCreateLabel("Moin!", 8, 8, 190, 28)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
$Text = GUICtrlCreateLabel("Hier kommt noch was:", 304, 232, 162, 17)
$Text = GUICtrlCreateLabel("...", 304, 264, 192, 81)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Kalender = GUICtrlCreateMonthCal("2009/10/01", 304, 40, 180, 164)
GUICtrlSetState(-1, $GUI_DISABLE)
$Kalender_Text = GUICtrlCreateLabel("Kalender:", 304, 16, 81, 17)
$MainGroup = GUICtrlCreateGroup("Programme", 8, 40, 281, 313)
;--------Aber jetzt nicht mehr -------------
$Programme = GUICtrlCreateList("", 16, 64, 209, 162) ;Liste
GUICtrlSetData($Programme, "Programm 1")
GUICtrlSetData($Programme, "Programm 2")
$Selectet_Pro = GUICtrlCreateLabel("Kein Programm ausgewählt!", 16, 248, 247, 17)
$Starten = GUICtrlCreateButton("Starten", 16, 272, 169, 41, 0)
$Hilfe = GUICtrlCreateButton("Hilfe", 192, 272, 89, 41, 0)
$Beschreibung = GUICtrlCreateButton("Beschreibung", 16, 320, 129, 25, 0)
GUICtrlSetState(-1, $GUI_DISABLE)
$Erstellt = GUICtrlCreateButton("Erstellt", 152, 320, 129, 25, 0)
$Auswaehlen = GUICtrlCreateButton("Wählen", 232, 64, 49, 161, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

$msg = 0
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()

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

Select
Case $msg = $Auswaehlen
MsgBox(0, "", "'Auswählen' wurde geklickt")
;--------------------Und die kann ich wieder selber-----------
Case $msg = $Starten
MsgBox(0, "", "'Starten' wurde geklickt")
Case $msg = $Hilfe
MsgBox(0, "", "'Hilfe' wurde geklickt")
Case $msg = $Erstellt
MsgBox(0, "", "'Erstellt' wurde geklickt")
Case $msg = $Beschreibung
MsgBox(0, "", "'Beschreibung' wurde geklickt")
EndSelect
WEnd

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

;Funktion die bei einer Änderung der Auswahl reagiert
Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
#forceref $hWnd, $iMsg
Local $hWndFrom, $iIDFrom, $iCode, $hWndListBox
If Not IsHWnd($Programme) Then $hWndListBox = GUICtrlGetHandle($Programme)
$hWndFrom = $ilParam
$iIDFrom = BitAND($iwParam, 0xFFFF) ; Niederwertiges Wort (WORD)
$iCode = BitShift($iwParam, 16) ; Höherwertiges Wort (WORD)

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

Switch $hWndFrom
Case $Programme, $hWndListBox
Switch $iCode
Case $LBN_SELCHANGE ; Wird gesendet, wenn die Auswahl in einer ListBox geändert wurde
$aus = _GUICtrlListBox_GetCurSel($Programme) ;Index der Auswahl
$Text = _GUICtrlListBox_GetText($Programme, $aus) ;Text der Auswahl
If $aus <> -1 Then ;falls ein Programm angeklickt wurde
GUICtrlSetData($Selectet_Pro, $Text & " ausgewählt")
Else
GUICtrlSetData($Selectet_Pro, "nix")
EndIf
MsgBox(0, 0, "Programm starten")
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_COMMAND

[/autoit]

Schau dir dazu mal die _GuictrlListBox Funktionen an

**Tweaky**

Hi,
danke für das melden der Fehler.
Ich habe es hierverbessert.

Soweit passt alles was du geändert haben wolltest.

Zitat von Dr.Doktor

Unterpunkt "Skripte ausführen" und "Kommandozeilenparameter" verlinken auf diesselbe Datei, ist das gewünscht?

Dies ist so OK

**Tweaky**

zu 1) meinst du ExitLoop?

zu 6) siehe meine Signatur. Da findest du alle Links

**Tweaky**

Geht es nicht auch so?

[autoit]

$pfad = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Hotfix\"
$i = 1

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

Do
$updates = RegEnumKey($pfad, $i)
If @error <> 0 Then ExitLoop
ConsoleWrite($updates & @CRLF)
$i += 1
Until $updates = "" ;Egal was hier steht, Die Schleife wird durch @error beendet

[/autoit]

**Tweaky**

Ja es liegt an der Funktion "_GUICtrlListView_GetItemText()".
Der Rückgabewert ist nix, leer
Aber warum

Beiträge von Tweaky

iecreate mit @ipadress1

problem mit geb einfügen

ListView Item - Rechtsklick Menü öffnen

ListView Item - Rechtsklick Menü öffnen

ListView Item - Rechtsklick Menü öffnen

Button drücken

Deutsche Hilfe - Funktionen ohne Beispiel

Fehler in der deutschen Hilfe bitte hier melden Basis: Hilfedatei 3.3.0.0 2009.12.19

_FileListToArray

Einfaches GUI erstellen [mit Drop Down Menü]

ArrayMore.au3

Taste in einer Schleife nur einmal drücken

Listview auslesen

HTML-Renderer

txt daten auslesen

GUI Fenster aktuallisieren?

Entdeckte Fehler

ContinueCase,/ErrorStdOut,etc

Windows Updates auflisten

Einfaches Skript - läuft als 32bit nicht auf 64bit