Saisie d' exercices à trous, puis un exemple d'utilisation

Description

Exercices à trous: logiciel de saisie et un exemple de logiciel d'application en CP
-----------------------------------------------------------------------------------

1 - logiciel de saisie pour créer des exos à trous (partie du maître) (pointe1r.vbp) "pointeur0.exe"
        • Il faut avoir, au préalable, créé puis sauvegardé l'exo à trous sous forme .jpg ( noter le dossier où on le sauvegarde ...)

(Souvent, j'ai utilisé word ou wordpad pour créer cette "image-exo" -(double ou triple espace entre les mots,surtout ceux qui seront cachés par l'étiquette)- , puis j'ai fait une copie d'écran -touche[Impr ecran]- que j'ai collée ds un logiciel de dessin (avec découpe des parties d'écran inutiles -et fignolage si nécessaire-)
.... Le scanneur est bien utile aussi !

Avec une boîte "Common Dialog", on recherche et on ouvre le dossier contenant l'(image exo).jpg
-> un fichier.som (sommaire) est créé ou complété
-> un fichier.txt de même radical que l'(image exo).jpg du texte,schéma ou carte à compléter se crée au fur et à mesure des saisies:
- On tape le mot-etq choisi, puis, par un clic de souris, on repère le coin haut gauche de l'etq (Cette étiquette cachera le mot marqué sur l'(image exo).jpg lors de l'exercice de l'élève.) et la sauvegarde s'effectue;

Pour finir le programme de saisie,cliquer sur la [croix sur fond rouge(coin droit haut)] ou sur le bouton [fin].Il vous sera demandé la taille de police,les dimensions de l'étiquette(la longueur est donnée pour un caractère; le programme se charge de multiplier par le nombre de caractères),l'emplacement de l'aide qui sera éventuellement affichée (liste des mots à choisir)
-Relevez le nom du fichier.txt que vous venez de créer et ouvrez-le pour d'éventuelles corrections -
remarque CORR:( le programme de tri place les mots qui commencent par une majuscule en début de liste et ceux parlettre accentuée en fin d'alphabet)
Lancez "CPlectatrou.exe":vous aurez peut-être alors à modifier certaines coordonnées -surtout au début, procéder à des ajustements pour la taille des caractères, la taille et la position des étiquettes -> Il suffira d'ajuster les valeurs correspondantes sur le fichier.txt .. (Pensez chaque fois à réenregistrer le fichier .txt modifié.)

En cas d'arrêt intempestif du programme, les mots saisis avant la coupure sont sauvegardés (mêmes dossier/nom que l'image-exo[.jpg], mais suffixe [.txt]): à vous de compléter manuellement:
police,ht étiqu,larg car,X aide,Y aide
(exemple:)14,500,250,100,7000

nb étiquettes aide,mot1,mot2...

nb étiquettes

(puis les saisies sauvegardées:X,Y,mot1 etc...)
    • (Par sécurité, les diverses saisies de mots et de leurs coordonnées sont sauvegardées dans un fichier "creatxtrou.txt" situé directement sur le lecteur ou clé où on a lancé "pointeur0.exe")
      • Pour l'utilisation présentée ici (lecture/écriture cP),

Une illustration est prévue pour chaque étiquette-mot:
il faut la créer et la charger dans le même dossier que "CPlectatrou.exe" sous le même nom que l'étiquette-mot(avec accents ou majuscule -totalement identique au mot-) sous le format [.jpg]
Si l'illustration est absente,l'illustration présente restera affichée.
(C'est la recherche des illustrations qui prend le plus de temps: on peut ...en cas d'urgence... charger une illustration générale sous le nom de la 1ère étiquette-mot:elle restera affichée pour tout l'exercice.)

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

2 - Exemple de logiciel d'utilisation d'exos à trous ainsi créés:(partie de l'élève)

"CPlectatrou.exe""
exercices de lecture-écriture-dictée pour le CP:

Soit l'ordi donne le focus à l'etq N° 0, soit l'utilisateur clique sur une étiquette; une illustration du mot apparaît, le mot est prononcé et l'utilisateur doit l'écrire correctement.
un bouton d'aide permet d'afficher la liste des mots à compléter ds une frame: Si l'utilisateur clique sur un des mots, ce mot s'affiche ds l'etq qui a le focus.
(un enregistrement des réponses de l'utilisateur pour analyse des erreurs n'a pas encore été joint, mais est facile à réaliser.)

remarque: si l'image cache une partie du texte, il suffit de cliquer sur cette image pour réduire les deux dimensions de moitié. (Au mot suivant, elle reprend sa taille normale.)

Il est facile de modifier le logiciel pour faire traiter les erreurs, apporter des aides différentes:
exemple 1:exo carte muette (ou schéma à compléter) --> On peut permettre de visualiser la carte remplie un court instant
exemple 2: entraînement à l'anglais ou l'espagnol: on peut faire apparaître le vocabulaire nécessaire , donner une traduction, illustrer, etc...
pour grammaire, ortho ou conj, aides spécifiques qui guident progressivement, rappellent les règles, donnent des exemples-types,...
(**** Si c'est utile, il faudra que je légende ces diverses adaptations avant de les transmettre !!!***)


Pour que les logiciels "pointeur0.exe" et "CPlectatrou.exe" fonctionnent, il faut bien entendu avoir chargé les ".dll.ocaocx,etc.." de visual basic dans [system32] de windows
ainsi que -pour "CPlectatrou.exe"- la synthèse vocale:Pour la prononciation, charger au préalable (sur internet): MSReaderSetupFRA.exe; readerTTSInstallFRA.exe; spchapi.EXE ; [posséder, outre LH Pierre(Fr), LH Veronique(Fr), la voix Virginie. - Sinon, modifier le programme pour changer de voix ou supprimer la prononciation -Vérifiez que les références nécessaires sont présentes ds le projet.-

Les exe sont joints avec le suffixe [.exo] qu'il suffit de modifier ... en espérant qu'ils fonctionnent...

Source / Exemple :


- Voir le zip (j'avais oublié le son "echec.wav"...Je le joins.)

'A toutes fins utiles, pour quelqu'un qui a vb6, voilà le logiciel simplissime _
de saisie que j'ai fait et utilisé pendant des années, en le variant pour l'adapter _
aux diverses utilisations (toutes matières):
Dim a(100), b(100), c(100), n
'penser à taper d'abord le mot avant de cliquer sur l'endroit où le placer
Private Sub Form_Load()
Text1.Text = ""
'c:\vbtxt\math\"c:\vbgb\action1.jpg"
'c:\vbgb\a6u3l3\
'c:\vbtxt\français\
'c:\vbtxt\geo\vbtxt\geo\axbdi0
Form1.Picture = LoadPicture("c:\vbgb\there.jpg")
End Sub
Private Sub form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
'Label1.Visible = True: Label1.Caption = "x=" + Str$(X) + " , " + "y=" + Str$(Y)
Open "c:\vbtxt\aaarep.txt" For Append As #1
Print #1, Trim(Str$(X)) + "," + Trim(Str$(Y)) + "," + Text1.Text
Close #1
n = n + 1
End Sub

Private Sub Form_Unload(Cancel As Integer)
Open "c:\vbtxt\aaarep.txt" For Append As #1
Print #1, Trim(Str$(n))
Close #1
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
car = Chr$(KeyAscii)
If InStr(" -éèàîôâêûï'+/()€.,<>?:!" + Chr(34) + Chr$(8) + Chr(3) + Chr$(22) _
+ Chr$(13), car) <> 0 Or (car >= "A" And car <= "z") Or (car >= "0" _
And car <= "9") Then
If car = Chr$(13) Then KeyAscii = 0: repe = Trim(Text1.Text): Exit Sub
KeyAscii = Asc(car)
Else
KeyAscii = 0
End If

End Sub

Conclusion :


Exercice commun,; son intérêt réside ds la possibilité de créer rapidement des exos à trous [rapidement..., sauf la création des différentes illustrations associées aux mots... à moins de se mettre à plusieurs utilisateurs de la même méthode de lecture (Léo et Léa ici) pour créer une banque d'images.]

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.