Hola.
Si como mencionas es de uso eventual, tal vez la solución mas simple sea usar en su reemplazo un componente
TMemo ajustando su propiedad
Alignment, v. gr.:
Código PHP:
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Memo1->Height = 21;
Memo1->Width = 120;
Memo1->Alignment = taRightJustify;
Memo1->WantReturns = false;
Memo1->Text = "3.141592654"; // un ej.
}
Muestra:
Saludos