Post by Ahk_fan » 09 Dec 2018, 05:45
Hallo zusammen,
evtl hat jemand einen Tip oder eine Idee? Ich will in einer ListView die Symbole darstellen lassen mit einer nicht Standardbreite. die Bilder werden ja immer auf Systemgröße 16x16 oder 32x32 skaliert. ich habe aber 32x96 weil da mehrere Infos rein sollen. BEsser wäre noch 3 Spalten mit Symbolen zu erstellen, aber das bekomme ich auch nicht hin. Sowas wie
LV_Add("Icon" 2 . "Icon " 1,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index) wäre praktisch.
Im Form habe ich leider nichts passendes gefunden, auser dass man über LV_Ex evtl die Spalten farblich gestalten könnte.
Wäre für Hilfe sehr dankbar.
hier ein Beispielcode:
Code: Select all
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn ; Enable warnings to assist with detecting common errors.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
Gui, ListeView:new
gui, ListeView:Font, s14, Arial
Gui, ListeView:Add, ListView, w800 +0x4000 r20 vLV_Sample HWNDListTypeN Hdr AltSubmit Grid Section, Status|ProgNr11|NeuerEintrag|Messergebnis
ImageListID := IL_Create(8)
LV_SetImageList(ImageListID)
IL_Add(ImageListID, A_WorkingDir "\011_neu_iO.png", 0xFFFFFF, 0) ;1
IL_Add(ImageListID, A_WorkingDir "\012_neu_niO.png", 0xFFFFFF, 0) ;2
IL_Add(ImageListID, A_WorkingDir "\031_neu_PDF_iO.png", 0xFFFFFF, 0) ;3
IL_Add(ImageListID, A_WorkingDir "\032_neu_PDF_niO.png", 0xFFFFFF, 0) ;4
IL_Add(ImageListID, A_WorkingDir "\041_nix_PDF_iO.png", 0xFFFFFF, 0) ;5
IL_Add(ImageListID, A_WorkingDir "\042_nix_PDF_niO.png", 0xFFFFFF, 0) ;6
IL_Add(ImageListID, A_WorkingDir "\051_nix_iO.png", 0xFFFFFF, 0) ;7
IL_Add(ImageListID, A_WorkingDir "\052_nix_niO.png", 0xFFFFFF, 0) ;8
loop, 10
{
Random, NeuerEintrag , 0, 1
Random, ProgNr11_rnd , 0, 1
Random, PDF , 0, 1
if ProgNr11_rnd = 0
ProgNr11 = n
if ProgNr11_rnd = 1
ProgNr11 = y
If NeuerEintrag = 1
{
If ProgNr11 = y ;i.O
{
If PDF = 1
{
LV_Add("Icon" 3,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
else
{
LV_Add("Icon" 1,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
}
else ; nicht i.O
{
If PDF = 1
{
LV_Add("Icon" 4,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
else
{
LV_Add("Icon" 2,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
}
}
If NeuerEintrag = 0
{
If ProgNr11 = y ;i.O
{
If PDF = 1
{
LV_Add("Icon" 5,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
else
{
LV_Add("Icon" 7,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
}
else ; nicht i.O
{
If PDF = 1
{
LV_Add("Icon" 6,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
else
{
LV_Add("Icon" 8,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
}
}
}
LV_ModifyCol( 1, 80)
LV_ModifyCol( 2 )
LV_ModifyCol( 3 )
gui, ListeView:Font, s12, Arial
Gui, ListeView:add, button, xs w300 h20 gAbbrechenListe, Zurück
Gui, ListeView:add, button, xs w300 h20 gNeuLaden, reload
Gui, ListeView:show, , Liste Eingaben
return
ListeViewGuiClose:
AbbrechenListe:
Gui, ListeView:Destroy
return
NeuLaden:
reload
und die Bilder
- pix.zip
- (6.82 KiB) Downloaded 228 times
Hallo zusammen,
evtl hat jemand einen Tip oder eine Idee? Ich will in einer ListView die Symbole darstellen lassen mit einer nicht Standardbreite. die Bilder werden ja immer auf Systemgröße 16x16 oder 32x32 skaliert. ich habe aber 32x96 weil da mehrere Infos rein sollen. BEsser wäre noch 3 Spalten mit Symbolen zu erstellen, aber das bekomme ich auch nicht hin. Sowas wie [c]LV_Add("Icon" 2 . "Icon " 1,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)[/c] wäre praktisch.
Im Form habe ich leider nichts passendes gefunden, auser dass man über LV_Ex evtl die Spalten farblich gestalten könnte.
Wäre für Hilfe sehr dankbar.
hier ein Beispielcode:
[code]#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn ; Enable warnings to assist with detecting common errors.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
Gui, ListeView:new
gui, ListeView:Font, s14, Arial
Gui, ListeView:Add, ListView, w800 +0x4000 r20 vLV_Sample HWNDListTypeN Hdr AltSubmit Grid Section, Status|ProgNr11|NeuerEintrag|Messergebnis
ImageListID := IL_Create(8)
LV_SetImageList(ImageListID)
IL_Add(ImageListID, A_WorkingDir "\011_neu_iO.png", 0xFFFFFF, 0) ;1
IL_Add(ImageListID, A_WorkingDir "\012_neu_niO.png", 0xFFFFFF, 0) ;2
IL_Add(ImageListID, A_WorkingDir "\031_neu_PDF_iO.png", 0xFFFFFF, 0) ;3
IL_Add(ImageListID, A_WorkingDir "\032_neu_PDF_niO.png", 0xFFFFFF, 0) ;4
IL_Add(ImageListID, A_WorkingDir "\041_nix_PDF_iO.png", 0xFFFFFF, 0) ;5
IL_Add(ImageListID, A_WorkingDir "\042_nix_PDF_niO.png", 0xFFFFFF, 0) ;6
IL_Add(ImageListID, A_WorkingDir "\051_nix_iO.png", 0xFFFFFF, 0) ;7
IL_Add(ImageListID, A_WorkingDir "\052_nix_niO.png", 0xFFFFFF, 0) ;8
loop, 10
{
Random, NeuerEintrag , 0, 1
Random, ProgNr11_rnd , 0, 1
Random, PDF , 0, 1
if ProgNr11_rnd = 0
ProgNr11 = n
if ProgNr11_rnd = 1
ProgNr11 = y
If NeuerEintrag = 1
{
If ProgNr11 = y ;i.O
{
If PDF = 1
{
LV_Add("Icon" 3,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
else
{
LV_Add("Icon" 1,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
}
else ; nicht i.O
{
If PDF = 1
{
LV_Add("Icon" 4,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
else
{
LV_Add("Icon" 2,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
}
}
If NeuerEintrag = 0
{
If ProgNr11 = y ;i.O
{
If PDF = 1
{
LV_Add("Icon" 5,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
else
{
LV_Add("Icon" 7,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
}
else ; nicht i.O
{
If PDF = 1
{
LV_Add("Icon" 6,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
else
{
LV_Add("Icon" 8,"", ProgNr11,NeuerEintrag , "Messergebnis " A_Index)
}
}
}
}
LV_ModifyCol( 1, 80)
LV_ModifyCol( 2 )
LV_ModifyCol( 3 )
gui, ListeView:Font, s12, Arial
Gui, ListeView:add, button, xs w300 h20 gAbbrechenListe, Zurück
Gui, ListeView:add, button, xs w300 h20 gNeuLaden, reload
Gui, ListeView:show, , Liste Eingaben
return
ListeViewGuiClose:
AbbrechenListe:
Gui, ListeView:Destroy
return
NeuLaden:
reload[/code]
und die Bilder
[attachment=0]pix.zip[/attachment]