Markierten Txt in EditorGadget ermitteln
Verfasst: 18.11.2006 21:12
Hi ihr, ich habe eine Frage und brauche eure Hife. Wie kann ich ein markierten Text ermitteln? Bitte helft mir 

Das deutsche PureBasic-Forum
https://www.purebasic.fr/german/
Code: Alles auswählen
Define.CHARRANGE sel
Define.s buffer
If OpenWindow(0, #PB_Ignore, 0, 640, 450, "Test") And CreateGadgetList(WindowID(0))
EditorGadget(0, 0, 0, 640, 400)
ButtonGadget(1, 280, 410, 80, 30, "Get Select")
Repeat
Select WaitWindowEvent()
Case #PB_Event_CloseWindow : Break
Case #PB_Event_Gadget
If EventGadget() = 1
SendMessage_(GadgetID(0), $0434, 0, @sel)
buffer = Space((sel\cpMax - sel\cpMin) + 1)
SendMessage_(GadgetID(0), $043E, 0, @buffer)
Debug buffer
EndIf
EndSelect
ForEver
EndIf
Code: Alles auswählen
#EM_EXGETSEL = $0434
#EM_GETSELTEXT = $043E