1 2 3 4 5 6 7 8 9 10 11 12
| sChaine est une chaîne
//sChaine = fSélecteurImage(SAISIE_IMAGE,"","Sélectionnez une image...",fFiltreImage())
sChaine = fSélecteurImage("C:\Documents and Settings","","Sélectionnez une image.....",fFiltreImage())
// Vérification du format de l'image
SI ExtraitChaîne(InfoBitmap(sChaine),1)<>"BAD" ALORS
// Code permettant de remplir le champ SAISIE_IMAGE par rapport à l'emplacement de l'image
SAISIE_Image=sChaine
// Code permettant de remplir le champ LSI_PhotoDuPelerin par rapport au chemin specifié dans le champ SAISIE_IMAGE
LSI_PhotoDuPelerin = SAISIE_Image
HModifie(Pelerins)
FIN |
Partager