Phsyco
Messages postés14Date d'inscriptionmercredi 28 juin 2006StatutMembreDernière intervention21 mars 2008 1 oct. 2006 à 15:43
Il y a un gros probleme dans les deux Dialog !!!!
Dragounix
Messages postés36Date d'inscriptiondimanche 16 juillet 2006StatutMembreDernière intervention 3 juillet 2007 20 juil. 2006 à 18:20
erf dans la fenetre je voi pas le nom, mon pseudo, le server, le port et tou comment faire ?
n0man
Messages postés25Date d'inscriptionjeudi 23 février 2006StatutMembreDernière intervention30 octobre 2007 26 mars 2006 à 14:42
Ripage mdrr j ai deja vus cette source ailleur tu aurais quand meme pus mettre un autre style de mac os cela aurait été moin flagrant
cs_J3rK
Messages postés31Date d'inscriptionvendredi 29 juillet 2005StatutMembreDernière intervention23 mars 2006 2 mars 2006 à 19:58
Bon, après étude du code(sans dll) j'ai fait ma version : comment passer de 117 lignes de code a 69 ? Comme ça.
dialog conex {
title "Connexions"
icon system\images\image4.ico
size -1 -1 300 270
button "Connexion",1, 10 10 90 20
button "Ajouter",2, 100 10 70 20
list 3, 10 40 280 200, extsel size
button "Modifier",4, 172 10 60 20
button "Supprimer",5, 235 10 60 20
button "Close",6, 100 245 100 20, ok
}
on *:DIALOG:conex:*:*: {
if ($devent == init) refresh.conex
elseif ($devent == sclick) {
if ($did == 3) set %n $calc($did($dname,3).sel)
elseif ($did == 1) { tokenize 157 $read($ltxt,%n) | server $iif($status != disconnected,-m) $3 $4 $iif($5,$5) -i $2 $2 $+ - $iif($6,-j $6) }
elseif ($did == 2) dialog -m ajouconex ajouconex
elseif ($did == 4) dialog -m modifconex modifconex
elseif ($did == 5) { write -dl $+ %n $ltxt | refresh.conex }
}
}
alias -l refresh.conex { did -r conex 3 | var %nn 1, %nnmax $lines($ltxt) | while (%nn <= %nnmax) { tokenize 157 $read($ltxt,%nn) | did -a conex 3 $str($chr(9),5) $1 | inc %nn } }
dialog modifconex {
title "Config Connexions"
size -1 -1 300 180
edit "",4, 110 28 100 15
text "Adresse Serveur :",1, 10 50 100 15
edit "",6, 110 48 100 15, autohs
text "Port :",3, 10 70 50 15
edit "6667",8, 110 68 100 15
text "Cle Irc :",5, 10 90 100 15
edit "",11, 110 88 100 15, autohs
text "AutoJoin** :",7, 10 110 80 15
edit "",2, 110 108 100 15
text "*Seulement si Pseudo reservé. **Separé par des virgules",9, 10 130 300 15
text "Pseudo",10, 10 30 100 15
text "Profil",12, 10 10 100 15
text "",13, 110 10 100 15
button "Ok",14, 210 150 80 20, ok
}
on *:DIALOG:modifconex:*:*: {
if ($devent == init) { tokenize 157 $read($ltxt,%n) | did -i $dname 6 1 $3 | did -i $dname 8 1 $4 | did -i $dname 11 1 $5 | did -i $dname 2 1 $6 | did -i $dname 4 1 $2 | did -i $dname 13 1 $1 }
if ($devent $did == sclick 14) { write -l $+ %n $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(2),$did(2),$chr(32)) | refresh.conex }
}
dialog ajouconex {
title "Config Connexions"
size -1 -1 300 180
edit "",2, 110 10 100 15
edit "",4, 110 28 100 15
text "Adresse Serveur :",1, 10 50 100 15
edit "",6, 110 48 100 15, autohs
text "Port :",3, 10 70 50 15
edit "6667",8, 110 68 100 15
text "Cle Irc :",5, 10 90 100 15
edit "",11, 110 88 100 15, autohs
text "AutoJoin** :",7, 10 110 80 15
edit "",13, 110 108 100 15
text "*Seulement si Pseudo reservé. **Separé par des virgules",9, 10 130 300 15
text "Pseudo",10, 10 30 100 15
text "Nom",12, 10 10 100 15
button "Ok",14, 210 150 80 20, ok
}
on *:DIALOG:ajouconex:sclick:14:{ write $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(2),$did(2),$chr(32))) | refresh.conex }
alias -l ltxt return $+(",$scriptdirconex.txt,")
on *:START:dialog -m conex conex
menu * {
Connexion:dialog -m conex conex
}
De plus, tu as oublié une parenthèse dans le dernier $+.
Pour finir, le dialog est moche. Fait une box avec des boutons moins gros, plus clairs, un PETIT peu espacés.. enfin bon ;)
A revoir.
cs_J3rK
Messages postés31Date d'inscriptionvendredi 29 juillet 2005StatutMembreDernière intervention23 mars 2006 5 févr. 2006 à 12:53
Nan mais ou vas le monde? on donne le code et pi ils ont la fleme de c/c le code ci dessus -_-
ralalala...
fjxokt
Messages postés840Date d'inscriptionvendredi 28 janvier 2005StatutMembreDernière intervention25 février 20091 4 févr. 2006 à 20:47
dans le cas ou on a plusieurs did ou devent, ta disposition serait correcte, mais si ton on dialog ne se résume qu'a une seule action, il vaut mieux faire comme l'a dit jerk
Alex_974
Messages postés29Date d'inscriptionlundi 16 janvier 2006StatutMembreDernière intervention14 février 2006 4 févr. 2006 à 19:59
Bah j3rk on m'a toujours dit de mettre tout dans le mm on dialog (ou on text on input) dc je fais ce qu'on m'a dit. Et jprefere kom ca aussi car ca m'evite de retaper on dialog nanananana. Pour les elseif jremplaceré quand j'aurais ltps (et l'envie :p) parce que la je suis sur autre chose :).
Tu dis quoi Lamzzz j'ai pas comprendu !! :(
cs_J3rK
Messages postés31Date d'inscriptionvendredi 29 juillet 2005StatutMembreDernière intervention23 mars 2006 4 févr. 2006 à 17:30
Puis pour ca:
on *:DIALOG:ajouconex:*:*: {
if ( $devent == sclick ) {
if ( $did == 14 ) {
write $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(2),$did(2),$chr(32))
refresh.conex
}
}
}
Met directement l'evenement et l'id, ca te feras moins de lignes de code ;)
(on *:DIALOG:ajouconex:sclick:14:write $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(2),$did(2),$chr(32)) | refresh.conex)
Voila qui allegera ton code et pi c'est plus beau ^^
Lamzzz
Messages postés1Date d'inscriptionsamedi 4 février 2006StatutMembreDernière intervention 4 février 2006 4 févr. 2006 à 00:33
T le meilleur. Je vais être obligé de marké ton nom dans tous mes remotes. t chiant :)
Merci pour ton travail :)
Alex_974
Messages postés29Date d'inscriptionlundi 16 janvier 2006StatutMembreDernière intervention14 février 2006 2 févr. 2006 à 17:42
Ah ui j'ai oublié de modifier ca j3rk. Vais le faire de suite ;)
cs_J3rK
Messages postés31Date d'inscriptionvendredi 29 juillet 2005StatutMembreDernière intervention23 mars 2006 2 févr. 2006 à 17:16
Ca fait peut être plus chaud a comprendre mais ca vaut le coup de connaître $+() ;)
Voila, sinon vu et revu..
fjxokt
Messages postés840Date d'inscriptionvendredi 28 janvier 2005StatutMembreDernière intervention25 février 20091 2 févr. 2006 à 16:26
bah le larrousse te l'a peut être dit pour ton code, mais visiblement pas pour le titre que tu as donné à ta source ;-)
Alex_974
Messages postés29Date d'inscriptionlundi 16 janvier 2006StatutMembreDernière intervention14 février 2006 2 févr. 2006 à 00:00
Voila j'ai mis une version sans dll dans la section source. Et Connexion avec un 'x' oui et ? C'est bien comme ca que ca s'ecris c'est la $+ rousse qui me l'a dit :p. Mais dites moi il y a des problemes avec la source même ? Jveux parler de bug .. ?
fjxokt
Messages postés840Date d'inscriptionvendredi 28 janvier 2005StatutMembreDernière intervention25 février 20091 1 févr. 2006 à 22:40
connexion avec un 'x'
sinon autant de fichiers externes pr un simple dialog de connexion, très peu pour moi
cs_KiNdErMaXi
Messages postés1052Date d'inscriptionsamedi 10 juillet 2004StatutMembreDernière intervention30 novembre 20092 1 févr. 2006 à 20:41
les edits pour l'ajout d'un profil sont un peu gros a mon gout ;o)
//blague
1 oct. 2006 à 15:43
20 juil. 2006 à 18:20
26 mars 2006 à 14:42
2 mars 2006 à 19:58
dialog conex {
title "Connexions"
icon system\images\image4.ico
size -1 -1 300 270
button "Connexion",1, 10 10 90 20
button "Ajouter",2, 100 10 70 20
list 3, 10 40 280 200, extsel size
button "Modifier",4, 172 10 60 20
button "Supprimer",5, 235 10 60 20
button "Close",6, 100 245 100 20, ok
}
on *:DIALOG:conex:*:*: {
if ($devent == init) refresh.conex
elseif ($devent == sclick) {
if ($did == 3) set %n $calc($did($dname,3).sel)
elseif ($did == 1) { tokenize 157 $read($ltxt,%n) | server $iif($status != disconnected,-m) $3 $4 $iif($5,$5) -i $2 $2 $+ - $iif($6,-j $6) }
elseif ($did == 2) dialog -m ajouconex ajouconex
elseif ($did == 4) dialog -m modifconex modifconex
elseif ($did == 5) { write -dl $+ %n $ltxt | refresh.conex }
}
}
alias -l refresh.conex { did -r conex 3 | var %nn 1, %nnmax $lines($ltxt) | while (%nn <= %nnmax) { tokenize 157 $read($ltxt,%nn) | did -a conex 3 $str($chr(9),5) $1 | inc %nn } }
dialog modifconex {
title "Config Connexions"
size -1 -1 300 180
edit "",4, 110 28 100 15
text "Adresse Serveur :",1, 10 50 100 15
edit "",6, 110 48 100 15, autohs
text "Port :",3, 10 70 50 15
edit "6667",8, 110 68 100 15
text "Cle Irc :",5, 10 90 100 15
edit "",11, 110 88 100 15, autohs
text "AutoJoin** :",7, 10 110 80 15
edit "",2, 110 108 100 15
text "*Seulement si Pseudo reservé. **Separé par des virgules",9, 10 130 300 15
text "Pseudo",10, 10 30 100 15
text "Profil",12, 10 10 100 15
text "",13, 110 10 100 15
button "Ok",14, 210 150 80 20, ok
}
on *:DIALOG:modifconex:*:*: {
if ($devent == init) { tokenize 157 $read($ltxt,%n) | did -i $dname 6 1 $3 | did -i $dname 8 1 $4 | did -i $dname 11 1 $5 | did -i $dname 2 1 $6 | did -i $dname 4 1 $2 | did -i $dname 13 1 $1 }
if ($devent $did == sclick 14) { write -l $+ %n $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(2),$did(2),$chr(32)) | refresh.conex }
}
dialog ajouconex {
title "Config Connexions"
size -1 -1 300 180
edit "",2, 110 10 100 15
edit "",4, 110 28 100 15
text "Adresse Serveur :",1, 10 50 100 15
edit "",6, 110 48 100 15, autohs
text "Port :",3, 10 70 50 15
edit "6667",8, 110 68 100 15
text "Cle Irc :",5, 10 90 100 15
edit "",11, 110 88 100 15, autohs
text "AutoJoin** :",7, 10 110 80 15
edit "",13, 110 108 100 15
text "*Seulement si Pseudo reservé. **Separé par des virgules",9, 10 130 300 15
text "Pseudo",10, 10 30 100 15
text "Nom",12, 10 10 100 15
button "Ok",14, 210 150 80 20, ok
}
on *:DIALOG:ajouconex:sclick:14:{ write $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(2),$did(2),$chr(32))) | refresh.conex }
alias -l ltxt return $+(",$scriptdirconex.txt,")
on *:START:dialog -m conex conex
menu * {
Connexion:dialog -m conex conex
}
De plus, tu as oublié une parenthèse dans le dernier $+.
Pour finir, le dialog est moche. Fait une box avec des boutons moins gros, plus clairs, un PETIT peu espacés.. enfin bon ;)
A revoir.
5 févr. 2006 à 12:53
ralalala...
4 févr. 2006 à 20:47
4 févr. 2006 à 19:59
Tu dis quoi Lamzzz j'ai pas comprendu !! :(
4 févr. 2006 à 17:30
Remplace tes if par des elseifs:
if ( $did == 3 ) {
set %n $calc($did($dname,3).sel)
}
elseif ( $did == 1 ) {
tokenize 157 $read($ltxt,%n)
server $iif($status != disconnected,-m) $3 $4 $iif($5,$5) -i $2 $2 $+ - $iif($6,-j $6)
}
elseif ($did == 2) {
dialog -m ajouconex ajouconex
}
elseif ($did == 4) {
dialog -m modifconex modifconex
}
elseif ($did == 5) {
write -dl $+ %n $ltxt
refresh.conex
}
Puis pour ca:
on *:DIALOG:ajouconex:*:*: {
if ( $devent == sclick ) {
if ( $did == 14 ) {
write $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(2),$did(2),$chr(32))
refresh.conex
}
}
}
Met directement l'evenement et l'id, ca te feras moins de lignes de code ;)
(on *:DIALOG:ajouconex:sclick:14:write $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(2),$did(2),$chr(32)) | refresh.conex)
Voila qui allegera ton code et pi c'est plus beau ^^
4 févr. 2006 à 00:33
Merci pour ton travail :)
2 févr. 2006 à 17:42
2 févr. 2006 à 17:16
- write $ltxt $did(2) $+ $chr(157) $+ $did(4) $+ $chr(157) $+ $did(6) $+ $chr(157) $+ $did(8) $+ $chr(157) $+ $iif($did(11),$did(11),$chr(32)) $+ $chr(157) $+ $iif($did(13),$did(13),$chr(32))
-> write $ltxt $+($did(2),$chr(157),$did(4),$chr(157),$did(6),$chr(157),$did(8),$chr(157),$iif($did(11),$did(11),$chr(32)),$chr(157),$iif($did(13),$did(13),$chr(32)))
Ca fait peut être plus chaud a comprendre mais ca vaut le coup de connaître $+() ;)
Voila, sinon vu et revu..
2 févr. 2006 à 16:26
2 févr. 2006 à 00:00
1 févr. 2006 à 22:40
sinon autant de fichiers externes pr un simple dialog de connexion, très peu pour moi
1 févr. 2006 à 20:41
//blague