[[Lepe]]

En este hilo tienes algo simple:
http://www.clubdelphi.com/foros/show...near#post65920

En este otro un componente algo más sofisticado, el richview, yo uso la version gratis del mismo, aunque ahora no puedo decirte si acepta subindices superindices. http://es.trichview.com/

Otra opción sería pintar en un paintbox con cierta delicadeza.... ,me explico:

Supongamos que tienes un paintbox con un alto de 60, empiezas a escribir a una altura de 40, si necesitas un subindices, continuas en la coordenada 55,dandóle a la fuente un tamaño menor, y ya tienes el subindice.

Creo que con un simple Textout no puedes hacer el tamaño de letra más pequeña, pero puedes valerte de esto:

Código Delphi [-]

    canvas.Font.Assign(Fuente); 
   // la fuente con un tamaño menor
  // para el subindice 

  canvas.Textout(Texto);

No lo he probado, pero creo que podría llegarse a algo con esto.
Por supuesto necesitas un canvas, ahora no recuerdo si el Paintbox lo tiene, supongo que si, sino... pues quizás el Tscrollbox u otro componente.

saludos