Scrollvorgang am Ende ermitteln

Windowsspezifisches Forum , API ,..
Beiträge, die plattformübergreifend sind, gehören ins 'Allgemein'-Forum.
Benutzeravatar
RSBasic
Admin
Beiträge: 8047
Registriert: 05.10.2006 18:55
Wohnort: Gernsbach
Kontaktdaten:

Scrollvorgang am Ende ermitteln

Beitrag von RSBasic »

Hallo ihr PB-User,
ich habe eine Frage.
Es ist so, ich habe ein EditorGadget und der User kann herunterscrollen.
Ich möchte ermitteln, ob es nicht mehr weiter geht nach unten zu scrollen.
Beispiel bei manchen Programmen/Setups man muss die Lizenz im EditorGadget nach unten scrollen und am Ende des Scrolls wird der Button "Akzeptieren" aktiviert.
Habt ihr eine Lösung?
Aus privaten Gründen habe ich leider nicht mehr so viel Zeit wie früher. Bitte habt Verständnis dafür.
Bild
Bild
Benutzeravatar
Frogger
Beiträge: 425
Registriert: 14.03.2006 19:27
Kontaktdaten:

Beitrag von Frogger »

eventuell damit?

Code: Alles auswählen

GetScrollPos_(...)

//EDIT
Hat mich eben auch interessiert.
Hier ist mein Ergebniss :allright:

Code: Alles auswählen

If OpenWindow(0, 0, 0, 600, 400, "")
  If CreateGadgetList(WindowID(0))
    EditorGadget(1, 5, 5, 500, 400)
  EndIf
EndIf

For i=0 To 100
  AddGadgetItem(1, -1, "")
Next

min.l = 0
max.l = 0
GetScrollRange_(GadgetID(1), #SB_VERT, @min, @max)

Repeat
  event.l = WaitWindowEvent() 
  pos.l = GetScrollPos_(GadgetID(1), #SB_VERT)
  If pos >= max-400 ;400 ist die Höhe des Editorgadget
    MessageRequester("Info", "Ende erreicht!")
    End
  EndIf
Until event = #PB_Event_CloseWindow
[PB4.20]
Benutzeravatar
RSBasic
Admin
Beiträge: 8047
Registriert: 05.10.2006 18:55
Wohnort: Gernsbach
Kontaktdaten:

Beitrag von RSBasic »

@Frogger
Vielen Dank für dein Code, sry für die Verspätung.
Ich habe somit dein Beispielcode übernommen.
Danke :allright:
Aus privaten Gründen habe ich leider nicht mehr so viel Zeit wie früher. Bitte habt Verständnis dafür.
Bild
Bild
Antworten