Texto de Edit a Image BMP?

[wolfran_hack]

Solucionado con

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
  var
    Rect: TRectF;
  begin
    with Image1.Bitmap do
      begin
        SetSize(Trunc(Image1.Width), Trunc(Image1.Height));
        Clear(TAlphaColors.White);
        Canvas.BeginScene();
        Canvas.Fill.Color := TAlphaColors.Black;
        Canvas.Font.Size := 60;
        Rect.Create(0, 0, Trunc(Image1.Width), Trunc(Image1.Height));
        Canvas.FillText(Rect,
                        Edit1.Text,
                        False,
                        100,
                        [],
                        TTextAlign.Center,
                        TTextAlign.Center);
        Canvas.EndScene();
      end;
  end;

[ecfisa]

Hola wolfran_hack.

Primero que nada me alegra que hayas encontrado una solución

Ignoraba que fuera para aplicar a esa version (y desconozco la misma), pero de tu primer mensaje, había entendido que deseabas reproducir fielmente la fuente del edit.
Y del último código me surge una duda: ¿ De donde o como, logras obtener las propiedades tales como negrita, tamaño, etc. que posee la fuente del TEdit ?

Por ejemplo desconozco la función de la línea:

Código Delphi [-]
Canvas.BeginScene();

Saludos

[wolfran_hack]

El TCanvas, es para básicamente dibujar, esta en otros lenguajes como CSS y Java, el BeginScene es para comenzar a dibujar y el EndScene indica que termino el dibujo. De igual manera se puede cambiar la fuente, color, tamaño, etc.

[Casimiro Notevi]

¿Eso es el Canvas estandar de delphi?

[ecfisa]

Hola wolfran_hack.

Si si, obviamente entiendo el cometido de TCanvas, es sólo que ignoraba la funcionalidad de BeginScene y EndScene gracias por la aclaración.
Entonces sigo sin explicarme como obtenes los valores de la propiedad Font del TEdit, da la impresión que son asignados de forma arbitraria.

¿ Estas usando VCL ?

Saludos

[[Delphius]]

BeginEscene y EndEscene proviene desde alguna edición XE. Posiblemente desde la XE5. Para los demás que estan con ediciones anteriores es totalmente natural desconocerlo.

Ya es hora de que cuando se pida asesoría se indique la versión de Delphi ¿no creen?. Ya es mayúscula la diferencia entre las ediciones XE5+ y las D7- En lo ques gráfica por sobre todo, con la llegada de FMX los cambios se multiplicaron.

[wolfran_hack]

Empezado por Delphius

BeginEscene y EndEscene proviene desde alguna edición XE. Posiblemente desde la XE5. Para los demás que estan con ediciones anteriores es totalmente natural desconocerlo.

Ya es hora de que cuando se pida asesoría se indique la versión de Delphi ¿no creen?. Ya es mayúscula la diferencia entre las ediciones XE5+ y las D7- En lo ques gráfica por sobre todo, con la llegada de FMX los cambios se multiplicaron.

Principalmente lo quería hacer en Delphi 7, por este motivo lo coloque en Gráficos, luego como funciono quice pasarlo a Delphi XE8, por eso no indique que versión era, de igual manera la información que aportaron fue muy útil. Aunque no se porque TImage se ve pequeño y no respeta tamaños en Android.

[[AgustinOrtu]]

Por como usa los enumerativos todo parece indicar que es FireMonkey

Código Delphi [-]
TAlphaColors.White  --> en VCL clWhite
TAlphaColors.Black  --> en VCL clBlack
TTextAlign.Center    --> en VCL alCenter
TTextAlign.Center

No solo indicar version de Delphi, sino tambien diferenciar en FMX y VCL, son dos framework que cada dia son mas diferentes

[ecfisa]

Hola wolfran_hack.

Toma en cuenta estas útiles sugerencias:

Empezado por Delphius

...
Ya es hora de que cuando se pida asesoría se indique la versión de Delphi ¿no creen?. Ya es mayúscula la diferencia entre las ediciones XE5+ y las D7- En lo ques gráfica por sobre todo, con la llegada de FMX los cambios se multiplicaron.

Empezado por AgustinOrtu

Por como usa los enumerativos todo parece indicar que es FireMonkey
...
No solo indicar version de Delphi, sino tambien diferenciar en FMX y VCL, son dos framework que cada dia son mas diferentes

Y además existe un foro dedicado a FireMonkey, motivo por el cuál he movido este hilo al mismo.

Saludos y gracias por tu colaboración