Listviewgadget Scollbalken ?

[amiga123]

Hallo
Bräuchte mal Hilfe.
Mein Problem ist der Scrollbalken im Listviewgadget.

1.) kann man den Immer einblenden und nicht nur wenn zuviele Einträge vorhanden sind.

2.) wie kann ich die Anzeige automatisch hochscrollen.
Also wenn die Liste länger wird und der Scrollbalken erscheint verschwinden die neuen Einträge unten der Scrollbalken bleibt aber oben.
Es sollen also die neuen Einträge unten angezeigt werden und der Balken müßte nach unten wandern.

Hat jemand eine Idee.

mfg Herb

[Andesdaf]

zu 2):
Probiers mal mit SetScrollPos_():

Code: Alles auswählen

SetScrollPos_(#Window,#SB_VERT,Position,#True) 

[Kiffi]

zu 2):

Wenn Du nach AddGadgetItem() ein SetGadgetState() auf das zuletzt
hinzugefügte Item ausführst, dann schiebt sich der Scrollbar automatisch
nach oben.

Grüße ... Kiffi

[Andesdaf]

auf das einfache komm ich wieder nicht

[amiga123]

zu 2):

Wenn Du nach AddGadgetItem() ein SetGadgetState() auf das zuletzt
hinzugefügte Item ausführst, dann schiebt sich der Scrollbar automatisch
nach oben.

Grüße ... Kiffi

Hab ich schon probiert, wenn ich das mache ist allerdings der Inhalt nicht mehr zu lesen. warum ?
Erst wen ich ein anderes Fenster drüberlege wird der text sichbar.???
Muß ich das Gadget neu Zeichen lassen ?

Gruß Herb

[Fluid Byte]

1.) kann man den Immer einblenden und nicht nur wenn zuviele Einträge vorhanden sind.

Code: Alles auswählen

OpenWindow(0,0,0,240,320,"void",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ListViewGadget(0,0,0,0,0,#LBS_DISABLENOSCROLL)
SetWindowLong_(GadgetID(0),#GWL_STYLE,#WS_CHILD | #WS_VISIBLE | #WS_VSCROLL)
ResizeGadget(0,0,0,240,320)

For i=1 To 10 : AddGadgetItem(0,-1,"Gadget Item #" + Str(i)) : Next

While WaitWindowEvent() ! #PB_Event_CloseWindow : Wend

[amiga123]

1.) kann man den Immer einblenden und nicht nur wenn zuviele Einträge vorhanden sind.

Code: Alles auswählen

OpenWindow(0,0,0,240,320,"void",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ListViewGadget(0,0,0,0,0,#LBS_DISABLENOSCROLL)
SetWindowLong_(GadgetID(0),#GWL_STYLE,#WS_CHILD | #WS_VISIBLE | #WS_VSCROLL)
ResizeGadget(0,0,0,240,320)

For i=1 To 10 : AddGadgetItem(0,-1,"Gadget Item #" + Str(i)) : Next

While WaitWindowEvent() ! #PB_Event_CloseWindow : Wend

Danke für den code . Bekomme leider eine Fehlermeldung.

Line 2 Constant not found:#LBS_Disablenoscroll.

mfg. Herb[/img]

[Kiffi]

Line 2 Constant not found:#LBS_Disablenoscroll.

dann solltest Du auf jeden Fall Deine PB-Version in Deine Signatur schreiben.

Grüße ... Kiffi

[Andesdaf]

du könntest es auch am Anfang des Codes

Code: Alles auswählen

#LBS_DISABLENOSCROLL = $1000

anfügen. Dann sollte PB den Wert eigentlich kennen.

[amiga123]

zu deiner Meldung : PB 4.30 Demo (X86)
Fang gerade erst wieder an zu Programmieren.


Erst mal besten Dank für die Hilfe.

Problem ist gelöst

SetGadgetState(2,Pos)
SetGadgetColor(2, #PB_Gadget_BackColor, $00FFFF)

jetzt hab ich das so wie ich wollte.
Einzig wäre noch der Scrollbalken permanent einzublenden.

mfg. Herb