Intégration de variables

Version imprimable

Salut les Javascripts (ou les javascripteurs Na ?? coment on dit ?? ;) )

Bon Voilà .. :
Je programme avec Delphi. Un moment j'intégre du HTML qui comporte dans son script du javascript....

Voici le code qui pose problème :
Code:

1 2 3 4 5 6 7 8 9 10 +'if('+ ProjetGM.Items[ProjetGM.ItemIndex] +')== "MB2"'#13 +'{'#13 +'alert("zazzz");'#13 // +'plop=3;'#13 +'}'#13 +'else'#13 +'{'#13 blablabla reblablabla +'}'#13
Je ne sais pas si vous saurez la soluce mais Delphi me dit qu'il y a un problème sur cette ligne :
+'if('+ ProjetGM.Items[ProjetGM.ItemIndex] +')== "MB2"'#13

normalement elle est correct ... Mais peut-être que le HTML ne voit pas le résultat de (ProjetGM.Items[ProjetGM.ItemIndex] )
Cela m'étonnerai car auparavant j'ai dèjà essayé ce genre de chose (d'intégrer des variable Delphi dans le javascript=> et ca marché niquel)....

Merci pour les aides ...

04/12/2008, 09h08
SpaceFrog

Peut être la parenthèse fermante de la condition mal placée ?

Code:

+'if('+ ProjetGM.Items[ProjetGM.ItemIndex] +'== "MB2")'#13
04/12/2008, 09h36
Jijudu
Yop, Salut,

Je n'avais pas du tout pensé à cela ...
je précis vite fait la chose :
Dans mon application Delphi j'ai un composant combobox. Il comprend plusieurs "item" comme par exemple MB2 ...
Lorsque je compile :
Code:

1 2 3 4 5 +'if('+ ProjetGM.Items[ProjetGM.ItemIndex] +'=="MB2")'#13 +'{'#13 +'alert("zazzz");'#13 +'plop=3;'#13 +'}'#13
en ayant pris soin de mettre l'item à MB2 Delphi me dit que
'MB2' non définie
Mais il n'y a rien à définir sur les item du combobox ...... ?

merci!
04/12/2008, 09h44
SpaceFrog

Peux tu nous montrer le code html / javascript généré ?

affichage source ...

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
CodeHTML := '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"'
  +'"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">'#13
+'<html xmlns="http://www.w3.org/1999/xhtml">'#13
  +'<head>'#13
    +'<meta http-equiv="content-type" content="text/html; charset=utf-8"/>'#13
    +'<title>Google Maps JavaScript API Example</title>'#13
    +'<script src="http://maps.google.com/maps?file=api&amp;v=2&amp;key=ABQIAAAAFw0lDRKsdCra15LPvIxvehS3Kl_ZRrzIrsFqDz8GBXIeW1O52xQh3P31Xg2eTvqFRAyuOMY4dQrRQw" type="text/javascript"></script>'#13
    +'<script type="text/javascript">'#13
 
+'if (GBrowserIsCompatible()) {'#13
      +'function load() { '#13
 
         +'if('+ ProjetGM.Items[ProjetGM.ItemIndex] +'=="MB2")'#13
         +'{'#13
                 +'alert("zazzz");'#13
                +'plop=3;'#13
              +'}'#13
 
+'var map = new GMap2(document.getElementById("map"));'#13
 
 
        +'map.setCenter(new GLatLng(46.636226,2.709890),6);'#13
                           +'}'#13
 
 
   +'}'#13
 
    +'</script>'#13
  +'</head>'#13
 
  +'<body onload="load()" onunload="GUnload()">'#13
 
    +'<div id="map" style="width: 900px; height: 550px"></div>'#13
  +'</body>'#13
+'</html>'#13

Voilà le code.
Comme je le disais mon combobox n'appartient pas au HTML mais à Delphi
A+

04/12/2008, 10h39
SpaceFrog

non mais le code généré !!! celui qui est interprété par le navigateur ...

Ah d'accord. Toutes mes excuse. jsuis aller sur la page WEB j'ai fait ouvrir avec fichier txt et voilà la partie du code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN""http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8"/>
<title>Google Maps JavaScript API Example</title>
<script src="http://maps.google.com/maps?file=api&amp;v=2&amp;key=ABQIAAAAFw0lDRKsdCra15LPvIxvehS3Kl_ZRrzIrsFqDz8GBXIeW1O52xQh3P31Xg2eTvqFRAyuOMY4dQrRQw" type="text/javascript"></script>
<script type="text/javascript">
if (GBrowserIsCompatible()) {
function load() { 
if(==MB2)  // <<<<<<<<<<<<<<<<<<<<<<<<<<< ic problème na ?
{
alert("zazzz");
plop=3;
}

En espérant que c'est ce que tu voulais .

04/12/2008, 11h06
SpaceFrog

visiblement ton turc n'est pas passé à javascript, c'est docne coté Delphi qu'il faut regler le problème

Code:

if(==MB2)

il manque en plus les quotes autour des strings ...

Code:

if("????????"=="MB2")
04/12/2008, 11h17
Bovino

Tu as essayé avec :

Code:

+'if("'+ ProjetGM.Items[ProjetGM.ItemIndex] +'"=="MB2")'#13
04/12/2008, 11h27
Jijudu

RoooooooH les gars vous être trop balézes ^^

En effet maintenant sa marche perfecto !!!!!
voici la super syntaxe !!! :

Code:

+'if("'+ ProjetGM.Items[ProjetGM.ItemIndex] +'"=="MB2")'#13

En effet il fallait mettre des quotes. C bien mais je ne sais pq. quel est l'utilité ?!

Merci bcp !!
04/12/2008, 11h37
SpaceFrog

ben pour comparer deux strings ....
sinon javascript pense qu'il s'agit de variables ...