Page 1 sur 1

Renvoyer le nombre de caractères sélectionné dans un éditor

Publié : mar. 13/oct./2020 9:31
par Shadow
Salut,

J'ai pas trouver comment Renvoyer le nombre de caractères sélectionné dans un editor gadget, dans les tutos, ni dans mes affaires.
Une cht'ite idée svp ?

Re: Renvoyer le nombre de caractères sélectionné dans un édi

Publié : mar. 13/oct./2020 21:12
par falsam
Avec API Windows

Code : Tout sélectionner

EnableExplicit 

Enumeration window
  #mf
EndEnumeration

Enumeration gadget
  #editor
EndEnumeration

Enumeration shortcut
  #ctrlC
EndEnumeration

Procedure GetSelectString()
  Protected Range.CHARRANGE, Size

  SendMessage_(GadgetID(#editor), #EM_EXGETSEL, 0, Range)
  Size = (Range\cpMax - Range\cpMin)
  Debug Size
EndProcedure

If OpenWindow(#mf, 0, 0, 322, 150, "EditorGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) 
  EditorGadget(#editor, 8, 8, 306, 133)
  
  ; Interception de la touche Ctrl-C
  AddKeyboardShortcut(#mf, #PB_Shortcut_Control | #PB_Shortcut_C, #ctrlC)
  
  ; Evenement Ctrl-C
  BindEvent(#PB_Event_Menu, @GetSelectString(), #mf, #ctrlC)
  
  Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
@Olivier : Oui Size n'est pas signé !!! Et alors hein ? :mrgreen:

Re: Renvoyer le nombre de caractères sélectionné dans un édi

Publié : mer. 14/oct./2020 2:08
par Shadow
Merci Falsam :)