Fórmulas químicas con Delphi

[Deiv]

Lepe,
He probado tu código y funciona de maravilla,
solo un par de preguntas más por favor, para mis pobres conocimientos no puedo deducir donde está el problema en:
1.- Ya sea tal como me enviaste: TForm1.FormMouseDown(..), ya sea que el código le coloco en un Button: TForm1.Button1Click(..), ¿no sé por qué razón responde SOLO al DOBLE CLICK? y no a UNO.
2.- Y si hago un tercer click este me vuelve a dibujar otro y se sobrepone cual si fuera un label con sombra.
¿A que se debe todo ello?
Un saludo