Discussion :

[devalender]

Bonjour a tous
j'ai des données avec photo que je veux imprimer a partir d'une table. cette table est alimenté a partir d'une base (Inerbase 7) qui contient un champ Blob

Donc dans l'initialisation de mon état voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
SI 	gsLENOMSERVEUR="OUI" ALORS
ChRepertoireTemp est une chaîne = ExtraitChaîne(SysEnvironnement("TEMP"),2,"=") //on recupere le chemin complet
chNomFichier1 est une chaîne = ChRepertoireTemp +"\Photo.jpg" 
macommande9 est une chaîne =ChaîneConstruit("SELECT "+...
"MESINFORMATIONS.STOCKPHOTO , "+...
"MESINFORMATIONS.STOCKSIGNATURE "+...
"FROM MESINFORMATIONS "+...
"WHERE MESINFORMATIONS.LACLE='%1'",FEN_Table_PERSONNES_TEST.Table.LACLE)
SQLExec(macommande9, "REQ1")
	TANTQUE SQLAvance("REQ1") = 0// Il y a encore une ligne à lire
		// Récupérer les données
		HExtraitMémo(SQLLitMémo("REQ1",1),chNomFichier1)
		IMG_Local=chNomFichier1
	FIN
	SQLFerme("REQ1")
FIN

En effet pour tous les lignes sélectionnées dans ma table je vais rechercher les photos dans la base pour affichage.
Mais je n'ai que la première photo qui s'affiche pour tout le reste.
d'ou mon besion d'aide :

1. Es que la méthode que j’utilise est correcte (optimisée)? car si le nombre de donnée augment ça peut être catastrophique.
2. Que dois-je modifier dans mon code pour afficher la photo de chaque ligne sélectionnée ?

Merci pour vos retours d'expériences

[frenchsting]

As-tu fais un pas à pas de l'exécution de ta requête, notamment au niveau du hextraitmémo ?
Regarde si à chaque extraction, ton image change (dans l'explorateur).

[Nicolas_Jeanneau]

Bonjour,

comment fais-tu l'affichage car je ne vois qu'une instruction :
IMG_Local=chNomFichier1

Or celle-ci est la même pour toutes les lignes, donc au final tu auras l'image de la dernière ligne lue.

à bientôt,

Nicolas

[wimbish]

Bonjour,

A mon avis ton code devrait se trouver dans le code "avant impression du bloc (corps ou itération etc.)" qui contient l'image et pas dans l'initialisation de l’état.
Il faut chercher l'image juste avant de l'afficher.

[devalender]

Effectivement frenchsting quand je regarde avec l'explorateur j'ai la même image.
Nicolas_Jeanneau

comment fais-tu l'affichage car je ne vois qu'une instruction :
IMG_Local=chNomFichier1
Or celle-ci est la même pour toutes les lignes, donc au final tu auras l'image de la dernière ligne lue.

Effectivement c'est là que je bloc car je suis dit que je dvais avoir un système d’itération

wimbish

A mon avis ton code devrait se trouver dans le code "avant impression du bloc (corps ou itération etc.)" qui contient l'image et pas dans l'initialisation de l’état.
Il faut chercher l'image juste avant de l'afficher.

Je vais de ce pas fouiller dans ce sens ! et ensuite faire un retour

[frenchsting]

J'avais loupé le code d'init...
En gros : tu mets ça dans le code d'init :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
SI gsLENOMSERVEUR="OUI" ALORS
ChRepertoireTemp est une chaîne = ExtraitChaîne(SysEnvironnement("TEMP"),2,"=") //on recupere le chemin complet
chNomFichier1 est une chaîne = ChRepertoireTemp +"\Photo.jpg" 
macommande9 est une chaîne =ChaîneConstruit("SELECT "+...
"MESINFORMATIONS.STOCKPHOTO , "+...
"MESINFORMATIONS.STOCKSIGNATURE "+...
"FROM MESINFORMATIONS "+...
"WHERE MESINFORMATIONS.LACLE='%1'",FEN_Table_PERSONNES_TEST.Table.LACLE)
SQLExec(macommande9, "REQ1")
si SQLAvance("REQ1") = 0// Il y a encore une ligne à lire
	// Récupérer les données
	HExtraitMémo(SQLLitMémo("REQ1",1),chNomFichier1)
	IMG_Local=chNomFichier1
FIN

et dans le bloc avant impression :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
si SQLAvance("REQ1") = 0// Il y a encore une ligne à lire
	// Récupérer les données
	HExtraitMémo(SQLLitMémo("REQ1",1),chNomFichier1)
	IMG_Local=chNomFichier1
FIN

et dans le code de fermeture :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Ferme("REQ1")

Mais, ton état me paraît un peu bancal car tu dis avoir un état sur table. Ne serait-il pas possible de faire une requête basée sur ta table qui prendrait la ligne en cours comme paramètre et ne renverrrait qu'une image... Du coup, tout le code serait dans le bloc avant impression corps.

[devalender]

OK je test tout ça et je fais un retour ! Merci