Delphi - Como inseto texto en un componente Timage

Saludos y Gracias... cuento un una version 5 de Delphi y quiero editar texto en un componente timage como se hace en Paint Brush e podido inserta figuras (cuadros, lineas etc) pero no texto... agradesco su ayuda.

Estoy iniciando en el manejo de imagenes donde puedo encontrar mas ayuda o componentes.

Te hablo de memoria, ya que no tengo el Delphi en este equipo y no puedo consultar la ayuda, pero el TImage tiene una propiedad Canvas y ésta (es del tipo TCanvas) tiene un método que si mal no recuerdo se llama TextOut que creo que te servirá.

Un saludo.

De echo utilizo la propiedad canvas para las imagenes geometricas y ya utilize el medo de TextOut, pero esto lo hice pasandole al parametro directamente la variable del texto y lo que yo quiero lograra es que en el componente imagen este yo escribiendo texto y este se quede en las coordenadas que seleccione, algo similar a lo que se hace en paint brush. gracias...

Una salida relativamente fácil sería que le pidas el texto al usuario en un cuadro de diálogo tipo "fsStayOnTop" y que muestres el texto en una etiqueta (TLabel) con fondo transparente sobre la imagen (TImage), y recién cuando el usuario confirma, "pintas" el texto sobre el Canvas con TextOut (y haces invisible la etiqueta) .

La solución más compleja sería mostrar un "caret" (cursor "|" de los cuadros de texto) sobre la misma imagen y atender los eventos de teclado como hace el PBrush, pero ya sería demasiado complicado creo yo...

Ernesto