Foros Club Delphi - Alinear texto a la derecha en un Edit

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)

- - Alinear texto a la derecha en un Edit (https://www.clubdelphi.com/foros/showthread.php?t=78890)

lmpadron

23-05-2012 14:58:17

Alinear texto a la derecha en un Edit

Saludos

Queridos amigos hoy trate de alinear un texto a la derecha y no pude hacerlo, encontré un ejemplo para delphi lo traduje a c++ pero aun asi no me funcionó. Les dejo el código para que lo vean.

Código:

SysLocale.MiddleEast == true;

Edit1->BiDiMode = bdRightToLeft;

En esencia lo que necesito es alinear el texto a la derecha. Gracias de antemano por su ayuda.

Casimiro Notevi

23-05-2012 15:10:00

Mira los enlaces que hay al final de esta página, justo abajo del todo.

lmpadron

23-05-2012 15:25:58

Cita:

Empezado por Casimiro Notevi (Mensaje 433286)

Mira los enlaces que hay al final de esta página, justo abajo del todo.

Ya lo hice y antes mirar esos enlaces realicé una busqueda en el foro (con el incomodo capcha y todo :D) En los enlaces que estan debajo de la página no hay nada de c++ y los ejemplos usan la mayoría de las veces el que puse en mi pregunta. :mad::mad::mad: y por supuesto ese no me funciona :mad::mad::mad:

ecfisa

23-05-2012 15:43:09

Hola Impadron.

Esta propuesta de Marcos: Alinear Edit, me funciona perfectamente.

Código:

void __fastcall TForm1::Button1Click(TObject *Sender)

{

TSysLocale SL = SysLocale;

  SysLocale.MiddleEast = true;

  Edit1->BiDiMode = bdRightToLeft;

  SysLocale = SL;

}

Saludos.

lmpadron

23-05-2012 21:43:15

Pues no me funciona, primero escribi el codigo en el create del form y luego al ver que no funcionaba pues lo puse en un button pero tampoco !!! :(

ecfisa

23-05-2012 22:03:02

Hola Impadrón.

Que extraño...

Podrías probar de este modo:

Código:

void RightJustifyText(TWinControl *Sender)

{

 SetWindowLong(Sender->Handle, GWL_STYLE,

    GetWindowLong(Sender->Handle, GWL_STYLE) | ES_RIGHT);

}

Pero en una oportunidad (en Delphi) vimos que dependiendo de algunas configuraciones de windows no funcionaba.

Saludos.

lmpadron

23-05-2012 22:50:27

use el codigo que me facilito y no funciono tampoco :( lo puse debajo de los includes y en un boton lo llame pasando como parametro el edit pero nada !!! no me explico q es lo que pasa uffff :(:(:(:(

ecfisa

24-05-2012 00:11:37

Hola Impadron.

A ver... revisa esta prueba que a mi me funciona bién.

Saludos.

escafandra

24-05-2012 08:15:52

Cita:

Empezado por lmpadron (Mensaje 433285)

Código:

SysLocale.MiddleEast == true;

Edit1->BiDiMode = bdRightToLeft;

¿Eso lo has usado tal cual?. Si es así, no está bien.

Código:

SysLocale.MiddleEast = true;

Edit1->BiDiMode = bdRightToLeft;

Así me funciona en todas las máquinas donde lo he probado.

Saludos

La franja horaria es GMT +2. Ahora son las 14:29:14.