Francky23012301
Messages postés400Date d'inscriptionsamedi 6 août 2005StatutMembreDernière intervention11 février 2016
-
25 mars 2007 à 00:48
cs_cyber37
Messages postés110Date d'inscriptionmardi 25 octobre 2005StatutMembreDernière intervention19 novembre 2010
-
25 mars 2007 à 14:07
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
cs_cyber37
Messages postés110Date d'inscriptionmardi 25 octobre 2005StatutMembreDernière intervention19 novembre 2010 25 mars 2007 à 14:07
waa merci ! tu a crée une source pour moi ! exelent ! je vais regarder
merci !
Francky23012301
Messages postés400Date d'inscriptionsamedi 6 août 2005StatutMembreDernière intervention11 février 20161 25 mars 2007 à 11:08
Salut,
Non pas de fautes pour le nombre de caractères : le signe "=" est un signe complémentaire (voir wikipedia et tu pourra faire un test OnLine ici : http://www.paulschou.com/tools/xlate/).
Pour le stream et les variables globales : ce code est tiré d'un composant que j'ai juste édulcoré pour répondre à la question du forum mais je pourrai effectivement rajouté et modifié des choses comme l'encodage QP. Je vais voir si j'ai le temps de le faire pour cet apres midi
Salut !
J'ai pas testé mais juste regardé le code. C'est vrai que c'est un peu compliqué mais pas si hard à comprendre.
Si tu trouves que ton code est un peu léger, je te propose de faire une procédure qui convertisse un stream de base N en n'importe quelle autre base N.
Du style: procedure ConvertBase(Input, Output: TStream; InputB, OutputB: Byte);
Sinon, à part ça, si c'est une base 64, c'est qu'il y a 64 combinaisons possibles pour une "unité".
Donc ton tableau B ne devrait-il pas être [0..63] ou alors [1..64] ???
Ah, et encore autre chose: pourquoi ne crée-tu pas de paramètre pour ta fonction Array_Encode64 au lieu d'utiliser des var globales ? (en paramètre "const" bien sûr)
++
Francky23012301
Messages postés400Date d'inscriptionsamedi 6 août 2005StatutMembreDernière intervention11 février 20161 25 mars 2007 à 00:48
Bien qu'un peu technique, ce source est peut être un peu léger pour être posté : j'ai hésité.
Si un admin le considère trop light pour rester, pas de blem en cas de delete.
25 mars 2007 à 14:07
merci !
25 mars 2007 à 11:08
Non pas de fautes pour le nombre de caractères : le signe "=" est un signe complémentaire (voir wikipedia et tu pourra faire un test OnLine ici : http://www.paulschou.com/tools/xlate/).
Pour le stream et les variables globales : ce code est tiré d'un composant que j'ai juste édulcoré pour répondre à la question du forum mais je pourrai effectivement rajouté et modifié des choses comme l'encodage QP. Je vais voir si j'ai le temps de le faire pour cet apres midi
Merci Flo
25 mars 2007 à 09:27
J'ai pas testé mais juste regardé le code. C'est vrai que c'est un peu compliqué mais pas si hard à comprendre.
Si tu trouves que ton code est un peu léger, je te propose de faire une procédure qui convertisse un stream de base N en n'importe quelle autre base N.
Du style: procedure ConvertBase(Input, Output: TStream; InputB, OutputB: Byte);
Sinon, à part ça, si c'est une base 64, c'est qu'il y a 64 combinaisons possibles pour une "unité".
Donc ton tableau B ne devrait-il pas être [0..63] ou alors [1..64] ???
Ah, et encore autre chose: pourquoi ne crée-tu pas de paramètre pour ta fonction Array_Encode64 au lieu d'utiliser des var globales ? (en paramètre "const" bien sûr)
++
25 mars 2007 à 00:48
Si un admin le considère trop light pour rester, pas de blem en cas de delete.
@+