by garry » 02 Aug 2020, 06:43
@just me , danke , ich hatte dies :
Code: Select all
;- ListView: nur ein Teil der ausgewählten Zeilen wird übernommen
;- https://www.autohotkey.com/boards/viewtopic.php?f=9&t=79354
#warn
#NoEnv
setworkingdir,%a_scriptdir%
Gui, Add, ListView, r20 w700 gMeineListView vvMeineListView, Name|Größe (KB)
Loop, C:\Windows\*.*
LV_Add("", A_LoopFileName, A_LoopFileSizeKB)
LV_ModifyCol() ;- Passt die Breiten der Spalten an den Inhalt der Reihen an.
LV_ModifyCol(2, "Integer") ;- Kennzeichnet aus Sortierungsgründen die Spalte 2 als Integer.
Menu, MeinKontextmenue, Add, Öffnen , Oeffnen
Menu, MeinKontextmenue, Add, Schließen, Schliessen
Gui, Show,,TEST
return
;--------------
GuiClose:
ExitApp
;--------------
MeineListView:
if (A_GuiEvent = "DoubleClick")
{
LV_GetText(Reihentext, A_EventInfo) ;- Ermittelt den Text aus dem ersten Feld der Reihe.
ToolTip Sie haben die Reihe %A_EventInfo% doppelt angeklickt. Text: "%Reihentext%"
}
return
;--------------
GuiContextMenu:
if (A_GuiControl <> "vMeineListView")
return
Menu, MeinKontextmenue, Show, %A_GuiX%, %A_GuiY%
return
;--------------
Oeffnen:
SpalteEins := AusWahlFelderHolen(1)
MsgBox, % SpalteEins
Return
;--------------
Schliessen:
SpalteZwei := AusWahlFelderHolen(2)
MsgBox, % SpalteZwei
Return
;----- FUNCTION ---------
AusWahlFelderHolen(Spalte)
{
KomplettAuswahl := ""
rnx:=""
Anfang := 0
GuiControl, -Redraw, vMeineListView
Loop
{
Anfang := LV_GetNext(Anfang)
if not Anfang
break
Rnx = %anfang%|%rnx%
LV_GetText(AusgewaehlteSpalte, Anfang, Spalte)
KomplettAuswahl .= AusgewaehlteSpalte "`n"
}
Loop, parse,rnx, `|
LV_Delete(A_LoopField)
GuiControl, +Redraw, vMeineListView
Return % KomplettAuswahl
}
;==========================
[mention]just me[/mention] , danke , ich hatte dies :
[code];- ListView: nur ein Teil der ausgewählten Zeilen wird übernommen
;- https://www.autohotkey.com/boards/viewtopic.php?f=9&t=79354
#warn
#NoEnv
setworkingdir,%a_scriptdir%
Gui, Add, ListView, r20 w700 gMeineListView vvMeineListView, Name|Größe (KB)
Loop, C:\Windows\*.*
LV_Add("", A_LoopFileName, A_LoopFileSizeKB)
LV_ModifyCol() ;- Passt die Breiten der Spalten an den Inhalt der Reihen an.
LV_ModifyCol(2, "Integer") ;- Kennzeichnet aus Sortierungsgründen die Spalte 2 als Integer.
Menu, MeinKontextmenue, Add, Öffnen , Oeffnen
Menu, MeinKontextmenue, Add, Schließen, Schliessen
Gui, Show,,TEST
return
;--------------
GuiClose:
ExitApp
;--------------
MeineListView:
if (A_GuiEvent = "DoubleClick")
{
LV_GetText(Reihentext, A_EventInfo) ;- Ermittelt den Text aus dem ersten Feld der Reihe.
ToolTip Sie haben die Reihe %A_EventInfo% doppelt angeklickt. Text: "%Reihentext%"
}
return
;--------------
GuiContextMenu:
if (A_GuiControl <> "vMeineListView")
return
Menu, MeinKontextmenue, Show, %A_GuiX%, %A_GuiY%
return
;--------------
Oeffnen:
SpalteEins := AusWahlFelderHolen(1)
MsgBox, % SpalteEins
Return
;--------------
Schliessen:
SpalteZwei := AusWahlFelderHolen(2)
MsgBox, % SpalteZwei
Return
;----- FUNCTION ---------
AusWahlFelderHolen(Spalte)
{
KomplettAuswahl := ""
rnx:=""
Anfang := 0
GuiControl, -Redraw, vMeineListView
Loop
{
Anfang := LV_GetNext(Anfang)
if not Anfang
break
Rnx = %anfang%|%rnx%
LV_GetText(AusgewaehlteSpalte, Anfang, Spalte)
KomplettAuswahl .= AusgewaehlteSpalte "`n"
}
Loop, parse,rnx, `|
LV_Delete(A_LoopField)
GuiControl, +Redraw, vMeineListView
Return % KomplettAuswahl
}
;==========================
[/code]