Fonction Undo sur du texte

Bonjour à tous,

Depuis des heures, je cherche ce qu'il manque afin que le code ci-dessous se compile :

With RichEdit1 do
IF HandleAllocated Then SendMessage(Handle, EN_UNDO, 0, 0);

Merci d'avance de votre aide avant que je ne dévore tout cru mon mulot

Bonsoir et merci à toi, j'étais prêt à me la taper... ouffffff !

Ça fonctionne nickel chrôme.

N'empêche que dans l'exemple "RichEdit" de Delphi, il s'agit bien du EN_...

Mais seul le résultat compte merci encore !

Grrrrrrreeuuuuu, je crois que je suis bon pour le dévorer (le mulot), car je viens de me rendre compte de mon erreur de code.

Dans mon premier message, j'ai écrit un N en lieu et place d'un M !

Pourtant je fais bien gaffe aux erreurs d'inattention.

Résultat des courses,  les deux passent  EM_... et  WM _... mais pô le EN_...

J'ai au moins appris une chose ; d'une erreur doit ressortir une chose positive, et c'est le cas.

astuce pour toi, lors d'une erreur de compilation, place le curseur de souris sur l'identifiant qui pourrait etre la cause du probleme.

un hint apparait alors avec l'unité et la declaration de l'element ...
en cas de probleme il te renvois le nom de ton unité et place erroneous type (type erroné) a la place de la declaration de l'element.

si cela ne donne rien, regarde le code des lignes precedente en verifiant qu'un ; n'a pas été remplacer par un :
on les confond rapidement avec la police courrier new en taille 8 - 9 et comme les touches sont cote a cote sur un clavier AZERTY ...

la preuve :
declaration:
declaration;

J'ai refait (simulée cette fois) cette erreur avec le curseur... mais no hint, seulement une ligne d'erreur pourtant significative, mais à force de penser que tout est bien plus compliqué qu'une simple petite faute de frappe...

Merci de tous ces compléments la prochaine fois, cette méthode de vérification figurera sur ma checklist virtuelle et en bonne place