Seite 1 von 1

EditorGadget und Cursor

Verfasst: 05.10.2018 18:46
von lite
Hallo

Wie kann ich im einem des EditorGadget den Cursor unsichtbar machen ?
Ein TextGadet möchte ich nicht nehmen, weil es da nicht so einfach ist, formatierten Text auszugeben.
Mit DisableGadget geht es ohne Probleme, nur werden dann die Farben nicht mehr richtig dargestellt.
Eine Lösung ohne Callback wäre wünschenswert.

Code: Alles auswählen

If OpenWindow(0,0,0,500,550,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  EditorGadget(1,10,10,480,230,0)
  EditorGadget(2,10,260,480,230,0)
  DestroyCaret_()
    
  Repeat
  Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf


Grüße
Lite

Re: EditorGadget und Cursor

Verfasst: 05.10.2018 18:54
von RSBasic
DestroyCaret_() muss soweit ich weiß dauerhaft in der Event-Schleife ausgeführt werden:

Code: Alles auswählen

EnableExplicit

Define Event

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  EditorGadget(1, 0, 0, 500, 400, 0)
  
  Repeat
    Event = WaitWindowEvent()
    DestroyCaret_()
    Until Event = #PB_Event_CloseWindow
EndIf
Callback wäre glaube ich besser.

Ansonsten gibt es auch diese Möglichkeit: https://www.rsbasic.de/aktualisierung/w ... tierung.pb
Leider funktioniert es nur ohne Unicode. Wenn jemand den Code Unicode-fähig machen kann, wäre das sehr nett.