pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

Exemples évolués

Chaque exemple montre une utilisation pratique de la fonction du WLangage.

Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.

Revenir à la page des exemples évolués


HLit("ANIMAL", NumEnr)

Ch = BinaireInfo (ANIMAL.MEMO)

//Récupérer le type du mémo

Ch = ExtraitChaine(Ch, 1, TAB)

SELON Ch

CAS "IMG" //afficher l'image

IMAGE1 = ANIMAL.MEMO

CAS "WAV" //jouer le son

Son(ANIMAL.MEMO)

Autre cas

Erreur("Format incorrect")

Fin