[R] Control Edit et tabulations

[papami]

Bonsoir

Dans un GuiCtrl EDIT on peut charger un texte comportant des tabulations,
mais il ne parait pas possible d'en ajouter.
Or avec une fonte autre que l'affreux Courier travailler dans l'Edit avec des espaces pour aligner du texte est très approximatif !
Pas de solution autre que ma méthode basique : (re)travailler le texte par l'intermédiaire de Notepad ?

Merci

[mikell]

Ctrl+Tab

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>

$txt = "ligne1" & @crlf & _
          @TAB & "ligne2" & @crlf & _
          @TAB & "ligne3"

$gui = GUICreate("edit", 400, 300)  
$edit = GUICtrlCreateEdit("", 10, 10, 380, 280)
GUISetState()
GUICtrlSetData($edit, $txt)

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    If GuiCtrlGetHandle($edit) = ControlGetHandle($gui, '', ControlGetFocus($gui)) Then
        Sleep(20)
        HotKeySet("{TAB}", "TabPress")
    Else
        HotKeySet("{TAB}")
    EndIf
WEnd

Func TabPress()
    Send("^{TAB}") 
EndFunc
 

[papami]

Ctrl+Tab

Ah ben ton grand-père a bien raison !
Quoi de plus simple en effet ... j'ai honte ...
Mais ... heu ... on les trouve où ces raccourcis clavier ?
Merci, je peux enterrer ma recette
à+ ...

[mikell]

Trouvé sur le forum US, et l'auteur du message n'a pas cité ses sources

[papami]

Trouvé sur le forum US, et l'auteur du message n'a pas cité ses sources

C'est tout de même bon à prendre...
Moi j'avais trouvé TAB /TAB qui sélectionne tout ... j'échange

Merci

[mikell]

Merci de passer le sujet en [R] résolu

[papami]

Merci de passer le sujet en [R] résolu

oublié !

[ZDS]

(Bien joué Mikell, je le cherchais depuis un bail ce Control-Tab, ça va simplifier pas mal les choses ^^)

[papami]

[quote="mikell"]Ctrl+Tab

suite ...
on peut aussi ajouter Ctrl + Entrée pour inclure un retour à la ligne

[ZDS]

Désolé Papami, mais "Entrée" ajoute déjà un saut de ligne dans un élément Edit, le "Control" est totalement superflu (même avec différentes combinaisons de styles $ES_WANTRETURN, $ES_MULTILINE, etc...).
Alors que "Tab" seul, au lieu d'ajouter une tabulation dans le Edit, passait à l'élément suivant; là ça a une utilité.

[papami]

Désolé Papami, mais "Entrée" ajoute déjà un saut de ligne dans un élément Edit, le "Control" est totalement superflu (même avec différentes combinaisons de styles $ES_WANTRETURN, $ES_MULTILINE, etc...).
Alors que "Tab" seul, au lieu d'ajouter une tabulation dans le Edit, passait à l'élément suivant; là ça a une utilité.

désolé à mon tour d'avoir un Autoit ou un Win d'occas ( ) ... car chez moi Entrée ne produit RIEN (pas de saut de ligne) ... et j'en ai fait des essais !
je charge un texte simple (.txt de Notepad) dans un GUICtrlCreateEdit avec style $ES_AUTOVSCROLL + $WS_VSCROLL

mais je suis peut-être 'un cas' ?

[ZDS]

Oui c'est un cas justement : car si tu forces les styles WSScroll et compagnie, tu sembles en oublier le ESWantReturn, qui fait pourtant partie des éléments du style -1 par défaut. Et donc il te manque fatalement les sauts de ligne (erreur classique, comme avec le style Notify sur les labels).

Montre ton code d'exemple, celui que tu dis ne pas pouvoir faire fonctionner avec la touche Entrée

[papami]

Désolé Papami, mais "Entrée" ajoute déjà un saut de ligne dans un élément Edit, le "Control" est totalement superflu (même avec différentes combinaisons de styles $ES_WANTRETURN, $ES_MULTILINE, etc...).
Alors que "Tab" seul, au lieu d'ajouter une tabulation dans le Edit, passait à l'élément suivant; là ça a une utilité.

ben OUI ! merci ami de m'avoir remis sur rails
effectivement c'est $ES_WANTRETURN que j'ai 'oublié' (alors qu'au contraire il ne me faut pas $ES_AUTOVSCROLL dans mon cas puisque je veux forcer le scroll vertical. Et je n'ai pas utilisé le style par défaut car je ne veux pas du scroll horizontal) ...

voilà, c'est bon.
Merci