Aller au contenu

badaze

Membres
  • Compteur de contenus

    113
  • Inscription

  • Dernière visite

Réputation sur la communauté

0 Neutral

À propos de badaze

  • Rang
    Power Member

Contact Methods

  • AIM
    badazem
  • ICQ
    0

Profile Information

  • Localisation
    pas trop loin de Lyon
  1. Bon anniversaire Zéb. Zébulon a été le premier forum dans lequel je me suis inscrit et en plus ç'était au tout début ( je dois être le membre n°9 si je ne me trompe pas ). Je ne viens pas ici souvent mais tout de même de temps en temps ne serait-ce que grâce à la newsletter. Bonne continuation et longue vie à Zebulon !!!
  2. Voici un bout de code que j'ai publié sur un forum italien. Il est aussi possible de cliquer sur la ligne <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <title>Untitled</title> <style type="text/css"> <!-- .normal1 {font-family:tahoma;font-size:8pt;background-color:yellow} .normal2 {font-family:tahoma;font-size:8pt;background-color:white} .overTR {font-family:tahoma;font-size:8pt;background-color:blue;color:white} .clicked {font-family:tahoma;font-size:8pt;background-color:red;color:white} --> </style> <script language="JavaScript" type="text/javascript"> var savClass = ""; var savClass2 = ""; var lastTR = null; <!-- function rOver(aTR) { savClass = aTR.className; aTR.className = "overTR"; } // function rOver(aTR) function rOut(aTR) { if (aTR.className == "clicked") return; aTR.className = savClass; } // rOut(aTR) function rEvidenzia(tr) { for (i = 0; i < tr.cells.length; i++) { var tdata = tr.cells(i); if (tdata.style.sav_backgroundColor == null) { tdata.style.sav_backgroundColor = tdata.style.backgroundColor; tdata.style.sav_color = tdata.style.color; tdata.style.backgroundColor = 'green'; tdata.style.color = 'white'; } else { tdata.style.backgroundColor = tdata.style.sav_backgroundColor; tdata.style.color = tdata.style.sav_color; tdata.style.sav_backgroundColor = null; tdata.style.sav_color = null; } // if (tdata.style.sav_backgroundColor == null) } // for (i = 0; i < tr.cells.length; i++) } // function rEvidenzia(tr) //--> </script> </head> <body> <table summary="" cellpadding="0" > <tr class="normal1" onmouseover="rOver(this);" onmouseout="rOut(this);" onclick="rEvidenzia(this);"> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> </tr> <tr class="normal2" onmouseover="rOver(this);" onmouseout="rOut(this);" onclick="rEvidenzia(this);"> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> </tr> <tr class="normal1" onmouseover="rOver(this);" onmouseout="rOut(this);" onclick="rEvidenzia(this);"> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> </tr> <tr class="normal2" onmouseover="rOver(this);" onmouseout="rOut(this);" onclick="rEvidenzia(this);"> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> <td>AAAAAAAAAAAAAAAAAAAAA</td> </tr> </table> </body> </html>
  3. badaze

    besoin d'aide en php Svp

    Et que donne le code HTML généré ?
  4. badaze

    Erreur Delphi

    En fait, un exécutable Delphi n'a pas besoin de dll externes pour tourner comme c'était le cas avec VB 3 ou 4 avec les dll runtime VBRUNxxx.exe. Mais un programme Delphi peut faire appel à certaines routines contenues dans des dll il faut lors que ces dll soient présentes et accessibles. Comme la plupart du temps, ces dll (qu'elles soient système ou propriétaires) se trouvent dans un répertoire faisant partie du path c'est transparent pour l'utilisateur.
  5. badaze

    Erreur Delphi

    Cela signifie que ta dll n'est pas trouvée dans la liste des chemins d'accès indiquée. Copie la dans un de ces chemins et réessaie.
  6. ou bien en javascript <script language="javascript"> var aDate = new Date(); document.write(aDate.toLocaleString() ); </script>
  7. badaze

    ;-) ???

    Pas vraiment optimisé.
  8. badaze

    premier pas

    Je persiste à penser qu'il faut d'abord débuter avec un langage "normal" avant de passer aux langages objets.
  9. badaze

    premier pas

    La programmation ne se limite pas à la création d'un .exe !!!! Pour commencer à apprendre la programmation, il vaut mieux commencer avec un langage simple... ce qui sera un bon tremplin pour des langages plus compliqués !!! Mais bon s'il faut en prendre un dans ta liste, je choisis Delphi sans aucune hésitation.
  10. badaze

    premier pas

    Tout simplement PHP. Très puissant, facile à apprendre.... gratuit !!!
  11. badaze

    access/nombre de ligne?

    En Access basic tu ouvres le fichier comme un fichier texte, puis tu le parcours jusqu'à la fin en comptant le nombre de lectures.
  12. badaze

    ;-) ???

    Je ne sais pas si c'est ce que vous cherchez.... (c'est en php) <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <? $smiley[0] = array("oo","<img src=\"http://forum.zebulon.fr/html/emoticons/icon_eek.gif\">"); $smiley[1] = array(":D","<img src=\"http://forum.zebulon.fr/html/emoticons/icon_biggrin.gif\">"); $smiley[2] = array(":)","<img src=\"http://forum.zebulon.fr/html/emoticons/icon_lol.gif\">"); ?> <html> <head> <script language="JavaScript" type="text/javascript"> <!-- function addSmileyCode(code) { document.all.myTxt.value = document.all.myTxt.value + code; } //--> </script> <title>Untitled</title> </head> <body> <? $myTxt2 = ""; if ($validation == "Ok") { $myTxt2 = $myTxt; for($i=0;$i<=2;$i++) { $myTxt2 = str_replace($smiley[$i][0],$smiley[$i][1], $myTxt2); } }?> <table summary=""> <tr><td colspan="3">Cliquer sur un smiley</td></tr> <tr> <? for($i=0;$i<=2;$i++) { ?> <td onclick="addSmileyCode('<? print $smiley[$i][0] ?>');"><? print $smiley[$i][1] ?></td> <? } ?> </tr> </table> <form action="" method="post"> <textarea name="myTxt" cols="50" rows="20"><? print $myTxt ?></textarea> <br> <input type="submit" name="validation" value="Ok"> </form> <table border rules=none> <tr> <td><? print $myTxt2 ?></td> </tr> </table> </body> </html>
  13. document.write(navigator.browserLanguage);
  14. Ben TP sur windows je ne pense pas que cela existe.... Il y avait bien Borland Pascal pour windows mais c'est très vieux.... Le mieux c'est de passer à Delphi.
  15. procedure TForm1.Button1Click(Sender: TObject); var a : int64; begin a := StrToInt64(Edit1.Text); end;
×
×
  • Créer...