Accueil > > > SELPOS - SELECTION ET POSITION !
 SELPOS - SELECTION ET POSITION !
 Information sur la source
 Description
Snippet permettant de selectionner une partie facilement du texte dans une editbox de dialog.Vous pouvez selectionner du texte sur une ou plusieur lignes facilement et très rapidement.Il y a même juste une option pour uniquement déplacer le curseur sur la ligne que l'on veut, au Nieme char. On utilise les objet com et notamment sendkey pour reproduire le clavier.Pas forcément utile, pas forcément inutile...
 Source
- alias selpos {
- dialog -v $$1 | did -f $$1 $$2
- var %1 $1 ,%2 $2 ,%4 $4 ,%5 $5 ,%{ $({,0) ,%} $(},0) ,%r $iif($regex($3,/l(\d+)-(\d+)/),$regml(1) $regml(2)) ,%r $iif(!%r && $regex($3,/l(\d+)/),$regml(1),%r) ,%ud = $+(%{,up $did($$1,$$2).lines,%},$iif($calc($token(%r,1,32) -1) > 0 || !$5,$+(%{,down $iif(!%r,$calc($iif(!$show,$3,$did($1,$2,1).sel) -1),$calc($token(%r,1,32) -1)),%})))
- var %r4 $iif($iif(%r,$4,$3),$+({right $v1,%})) ,%t2 $token(%r,2,32) ,%str $str(a,$calc(1 + %t2 - $token(%r,1,32))) ,%l = $!did(%1,%2,$calc($token(%r,1,32) + ( \n -1 ))).len ,%rse = $regsubex(%str,/(a)/g,$+(+,%{,right $calc( [ %l ] + 1 - $iif(\n == \0,$iif(%5,$calc( [ %l ] - %5 +1),$did(%1,%2,%l).len),$iif(\n == 1,%4))),%}))
- var %> $iif(!$show,{right $4},$iif(%t2,$+(%r4,%rse),$iif(%r,$+(%r4,+,%{,right $iif($5,$5,$calc($did($1,$2,%r).len - $4)),%}),$+(%r4,$iif($show,+),$+({right $iif(%5,$5,$iif($4,$v1,$calc($did($1,$2,$did($1,$2,1).sel).len - $3))),%})))))
- .comopen x WScript.Shell | .comclose x $com(x,sendkeys,3,bstr,$+(%ud,{home},%>))
- }
alias selpos {
dialog -v $$1 | did -f $$1 $$2
var %1 $1 ,%2 $2 ,%4 $4 ,%5 $5 ,%{ $({,0) ,%} $(},0) ,%r $iif($regex($3,/l(\d+)-(\d+)/),$regml(1) $regml(2)) ,%r $iif(!%r && $regex($3,/l(\d+)/),$regml(1),%r) ,%ud = $+(%{,up $did($$1,$$2).lines,%},$iif($calc($token(%r,1,32) -1) > 0 || !$5,$+(%{,down $iif(!%r,$calc($iif(!$show,$3,$did($1,$2,1).sel) -1),$calc($token(%r,1,32) -1)),%})))
var %r4 $iif($iif(%r,$4,$3),$+({right $v1,%})) ,%t2 $token(%r,2,32) ,%str $str(a,$calc(1 + %t2 - $token(%r,1,32))) ,%l = $!did(%1,%2,$calc($token(%r,1,32) + ( \n -1 ))).len ,%rse = $regsubex(%str,/(a)/g,$+(+,%{,right $calc( [ %l ] + 1 - $iif(\n == \0,$iif(%5,$calc( [ %l ] - %5 +1),$did(%1,%2,%l).len),$iif(\n == 1,%4))),%}))
var %> $iif(!$show,{right $4},$iif(%t2,$+(%r4,%rse),$iif(%r,$+(%r4,+,%{,right $iif($5,$5,$calc($did($1,$2,%r).len - $4)),%}),$+(%r4,$iif($show,+),$+({right $iif(%5,$5,$iif($4,$v1,$calc($did($1,$2,$did($1,$2,1).sel).len - $3))),%})))))
.comopen x WScript.Shell | .comclose x $com(x,sendkeys,3,bstr,$+(%ud,{home},%>))
}
 Conclusion
Syntax : /selpos dialog id [lN-N] N [N2]
dialog : nom du dialog
id : id de l'editbox
Des exemples sont mieux que mon français pourris :
/selpos dialog id 5 3 (selectionnera dans la ligne courante du 6e caractère jusqu'au 8e)
/selpos dialog id l5 2 12 (selectionnera sur la ligne 5, du 3e caractère jusqu'au 15e)
/selpos dialog id 0 (selectionnera tout la ligne courante.)
/selpos dialog id l1-35 19 42 (selectionnera du 19e char sur la premiere ligne jusqu'au 42e char de la 35eme
/selpos dialog id l3-8 (selectionnera de toute la ligne 3 jusqu'a toute la ligne 8
/.selpos dialog id 5 6 (déplacera le curseur sur la 5e lignes, jusqu'au 6e char)
Maintenant ce code commence a être sympa...
J'ai pas recommenté le code parce que c'est très bordelique et délicats.
 Historique
- 05 janvier 2008 02:29:48 :
- bug du site, je voulais pas faire de modif, il me force !
- 05 janvier 2008 03:20:14 :
- J'ai rajouté un = pour une des déclaration /var, ils ne sont plus nécéssaire depuis la 6.31 ou 6.3 mais je l'ai rajouté car il provoquera une erreur sur une version ancienne sinon
- 03 février 2008 04:57:49 :
- Ajout de la fonction de selection de plusieurs lignes d'un coup + une fonction pour déplacer uniquement le curseur
 Sources du même auteur
 Sources de la même categorie
 Commentaires et avis
 Discussions en rapport avec ce code source dans le forum
Text dialog [ par koko ]
J'aimerais savoir comment mettre dans un text d'un dialog un texte ou une variable... mercihttp://www.forumscvh.be.tf-]CVH[-@|_p]-[@
j'ai un blem avec un dialog [ par Djo21 ]
Bonjour tout le monde.Alors voila mon problem, j'ai fait une fenetre dialog pour un systeme d'auto join mais quand "j'appelle" ma fenetre, pour qu'ell
Prog Dialog DL [ par TroXsA ]
Salut allvous savez ou je peut trouver des progs pour faire des dialog en francais, si sa existe biensur :pj'ai le prog Dialog Studio il est bien je d
Dialog prog ! [ par TroXsA ]
Salut allvous savez ou je peut trouver des progs pour faire des dialog en francais, si sa existe biensur :pj'ai le prog Dialog Studio il est bien je d
Tuto ?? Dialog VF !!! [ par TroXsA ]
Qui connais un site mortelement bien expliquer pour faire des dialog et les actions sur un check, bouton, radio ext ....Google G trouver mais pas en f
Dialog Fonction check ? help [ par TroXsA ]
salut allvoila G besoin d'un ti coup de main pour faire un bout de script je vous laisse looker le script et j'esplique plus bas----------------------
Help problème Dialog !!!! [ par Ziboo ]
Voilà je joue a counter strike et je fais des train et il faut a chaque fois que je donne l'IP de notre server avec le pass.Bon voilà mon scriptServeu
/DID avec $nick comment faire ? [ par TroXsA ]
salut all :pj'ai besoin d'un coup de main sur un dialogsa fait deux jour que je me tire les cheveux, oui il m'en reste pas beaucoup ;)bon mon probleme
Rafraichir un dialog [ par Ziboo ]
Voilà je fais mon lecteur MP3G un bouton CHOISIR pour demander ou est le MP:button "Choisir", 6, 185 3 37 12if ( $did == 6 ) { /set %chemin $sfile(C:
Dialog mIRC [ par wbr ]
Bonjour, je voudrais savoir comment faire pour sauvegarder les valeurs de ce dialog dans des variables et comment cocher des options par défaut pour c
|
Derniers Blogs
 ETENDRE LE TEAM WEB ACCESS DE TFS 2012 - STEP 0ETENDRE LE TEAM WEB ACCESS DE TFS 2012 - STEP 0 par Philess
L'extensibilité du Team Web Access
Le Web Access (site d'équipe) de Team Foundation Server a été complètement réécrit dans la version 2012 avec pas moins de 400.000 lignes de JavaScript. Ce nouveau modèle a été pensé pour offrir de grandes...
Cliquez pour lire la suite de l'article par Philess SIMULER FACILEMENT L'ENVOI DE MAILSIMULER FACILEMENT L'ENVOI DE MAIL par JeremyJeanson
il m'a été demandé, à plusieurs reprises, comment je faisais pour simuler l'envoi de mail lors de mes démos de Workflow Foundation. Ma solution est plutôt simple : j'utilise la configuration par défaut du SmtpClient et j'oriente les mails vers un dossier ...
Cliquez pour lire la suite de l'article par JeremyJeanson VOTEZ POUR LE TOP 10 DES INFLUENCEURS SHAREPOINT FRANCOPHONES !VOTEZ POUR LE TOP 10 DES INFLUENCEURS SHAREPOINT FRANCOPHONES ! par Patrick Guimonet
Si ce n'est déjà fait (comme plus de 600 personnes déjà), il est encore temps de voter pour le concours TOP 10 des influenceurs SharePoint francophones ! Il est organisé par harmon.ie et accessible ici : http://harmon.ie/top-...
Cliquez pour lire la suite de l'article par Patrick Guimonet [CONF'SHAREPOINT] DERNIER RAPPEL ! :-)[CONF'SHAREPOINT] DERNIER RAPPEL ! :-) par Patrick Guimonet
La Conf'SharePoint en chiffres c'est : 3 jours de SharePoint ! 4 parcours et 60 sessions 17 partenaires représentant toutes les fac...
Cliquez pour lire la suite de l'article par Patrick Guimonet
Forum
 LANGAGE 4DLANGAGE 4D par wvalter
Cliquez pour lire la suite par wvalter PROBLEME MIRCPROBLEME MIRC par PaTaTe
Cliquez pour lire la suite par PaTaTe PERFECTIONPERFECTION par gorby10
Cliquez pour lire la suite par gorby10
Logiciels
 Easy-Planning (4.5.0.11)EASY-PLANNING (4.5.0.11)Easy-Planning permet de créer des plannings sous la représentation de diagrammes et est adapté a... Cliquez pour télécharger Easy-Planning CVEasy (3.1.0.51)CVEASY (3.1.0.51)PHMSD-CVEasy est un logiciel d'aide à la rédaction de CV d'une simplicité déconcertante.
PHMSD-C... Cliquez pour télécharger CVEasy LettresFaciles 2011 (8.6.0.31)LETTRESFACILES 2011 (8.6.0.31)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles 2011 sDEVIS-FACTURES vlPRO (8.4.2.62)SDEVIS-FACTURES VLPRO (8.4.2.62)sDEVIS-FACTURES vlPRO a été mis au point pour les particuliers, créateurs, entrepreneurs, artisa... Cliquez pour télécharger sDEVIS-FACTURES vlPRO Devis-Factures PHMSD (2.1.0.11)DEVIS-FACTURES PHMSD (2.1.0.11)Configuration minimale
Nécessite Windows™ 2000, XP, Windows 7, 8, Vista (Service Pack à... Cliquez pour télécharger Devis-Factures PHMSD
|