DelphiCool
Messages postés455Date d'inscriptionmardi 24 juillet 2001StatutMembreDernière intervention10 mars 2009
-
8 août 2002 à 21:38
mokhoss
Messages postés1Date d'inscriptiondimanche 10 décembre 2006StatutMembreDernière intervention10 décembre 2006
-
10 déc. 2006 à 16:02
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
mokhoss
Messages postés1Date d'inscriptiondimanche 10 décembre 2006StatutMembreDernière intervention10 décembre 2006 10 déc. 2006 à 16:02
slt, dsl je suis new sur cette site mais je peux savoir avec quel genre de logiciel vous utilisez pour lire les fichiers qui sont dans le zip.
Expliké moi svp un peut.
ciao
smugglershe
Messages postés1Date d'inscriptionsamedi 17 avril 2004StatutMembreDernière intervention17 avril 2004 17 avril 2004 à 16:58
aidez moi, je voulais avoir un code source pour pirater un compte banacier , c'est àd ire avoir le mot de ^passe de ce compte.mon maiol : mister_unknown1@hotmail.com
balgrim
Messages postés52Date d'inscriptionvendredi 26 avril 2002StatutMembreDernière intervention28 octobre 2003 27 oct. 2002 à 11:40
PS: c a titre educatif que je balance ces sources. le reso code source ne sera pas ten responsable de la mauvaise utilisation du logicel...(Ni moi d'ailleurs)
Voila, ct pour dire sa :o)
DelphiCool
Messages postés455Date d'inscriptionmardi 24 juillet 2001StatutMembreDernière intervention10 mars 2009 8 août 2002 à 21:38
plus on est de fou, et plus on rit
Bienvenue ;-)
balgrim
Messages postés52Date d'inscriptionvendredi 26 avril 2002StatutMembreDernière intervention28 octobre 2003 8 août 2002 à 21:04
L'ancien programmeur basic dit:Arf, je suis demasquer!!!!.Par contre j'avais pas vue qu'il existé deja une source pour se code :- enfin, un proverbe dit "mieux vaut plus que pas assez"
cs_Delphiprog
Messages postés4297Date d'inscriptionsamedi 19 janvier 2002StatutMembreDernière intervention 9 janvier 201332 8 août 2002 à 14:48
Pour information :
NewNumber:='0';Total:='0';
if length(number)<>16 then goto Fin;
Result := False goto Fin;
peut-être remplacé par :
NewNumber:='0';
Total:='0';
Result := False;
if Length(Number) < 16 then
exit;
En effet, il est souhaitable d'initialiser le résultat d'une fonction dès le départ, au cas où tu oublierais de le faire par la suite.
Et ici, çà t'évite d'utiliser des GOTO qui sont la honte pour un programmeur Pascal ...
10 déc. 2006 à 16:02
Expliké moi svp un peut.
ciao
17 avril 2004 à 16:58
27 oct. 2002 à 11:40
Voila, ct pour dire sa :o)
8 août 2002 à 21:38
Bienvenue ;-)
8 août 2002 à 21:04
8 août 2002 à 14:48
NewNumber:='0';Total:='0';
if length(number)<>16 then goto Fin;
Result := False goto Fin;
peut-être remplacé par :
NewNumber:='0';
Total:='0';
Result := False;
if Length(Number) < 16 then
exit;
En effet, il est souhaitable d'initialiser le résultat d'une fonction dès le départ, au cas où tu oublierais de le faire par la suite.
Et ici, çà t'évite d'utiliser des GOTO qui sont la honte pour un programmeur Pascal ...