Alternativa a TEXTOUT que soporte Unicode

[[ArdiIIa]]

Entonces la forma de operar tal vez tenga que ser diferente....
En vez de trabajando directamente con el Canvas del Bitmap seguramente obtengas otros resultados trabajando con otra llamada del gdi32...

Código Delphi [-]
TextOutW((DC, 0, 0, PWideChar(Texto), Length(Texto));

[MDSato]

Perdona por mi absoluta ignoracia en el tema ArdiIIa, pero, ¿de qué forma podría "enlazar" ese DC con un bitmap?
Es la primera vez que veo eso del Device Context... :S

Muchas gracias.

[[ArdiIIa]]

El DC (device context) se obtiene mediante la función GetDC y sirve para obtener el handle del objeto sobre el que queremos operar.
En tu caso ya lo tienes.... y no es necesario hacer nada mas..

Código Delphi [-]
TextOutW(AuxBitmap.Canvas.Handle, 0, 0, PWideChar(Texto), Length(Texto));

Perdona que anteriormente no te lo pusiera mas claro...

[MDSato]

Me respondo a mí mismo... He utilizado tu llamada y en lugar del DC he puesto el Handle del canvas del bitmap de esta forma:

TextOutW(AuxBitmap.Canvas.Handle, 0, 0, PWideChar(Texto), Length(Texto));

Por lo visto en pantalla el resultado parece correcto
Muchísimas gracias.

[MDSato]

MUCHISIMAS GRACIAS!!!!
TODO PERFECTO ENTONCES...

Mil gracias por tu respuesta... Veía el asunto muy negro (o en chino, para seguir con la temática unicode)...

[[seoane]]

Pues vaya, mientras estaba creando un ejemplo me pisaron la respuestaa

Código Delphi [-]
var
  Bitmap: TBitmap;
  Size: TSize;
  Texto: WideString;
begin
  Texto:= #$06E9 + #$06E9; // Caracteres arabes
  Bitmap:= TBitmap.Create;
  try
    Bitmap.Canvas.Font.Name:= 'Arial';
    Bitmap.Canvas.Font.Size:= 16;
    Bitmap.Canvas.Font.Style := [];
    // Version Unicode de GetTextExtentPoint32
    GetTextExtentPoint32W(Bitmap.Canvas.Handle,PWideChar(Texto),
      Length(Texto),Size);
    Bitmap.Width:= Size.cx;
    Bitmap.Height:= Size.cy;
    // Version Unicode de TextExtent
    ExtTextOutW(Bitmap.Canvas.Handle, 0, 0, 0, nil, PWideChar(Texto),
      Length(Texto), nil);
    // Aqui yo lo dibujo para ver el resultado
    Canvas.Draw(0,0,Bitmap);
  finally
    Bitmap.Free;
  end;
end;

Hasta tenia preparada una explicación:

La mayoria de la funciones de la API que tienen que tratar con texto tienen dos versiones la ANSI y la Unicode. El metodo TextOut del Canvas utiliza la funcion ExtTextOut en su version ANSI (ExtTextOutA), si necesitas trabajar con Unicode tendras que usar la otra version (ExtTextOutW).

Tengo que ser mas rápido

[[ArdiIIa]]

Empezado por seoane

:
Tengo que ser mas rápido

Sabía que estabas tardando demasiado en aparecer...
Y pensaba... "verás cuando venga seoane. "

[MDSato]

De todas formas, gracias a los dos...
Seguro que servirá a algún novato como yo en estos temas...