Center Text in Vector Image with DCL and Adjust Font Size

Monday at 04:14 PM

I'm trying to add a larger text to my DCL, and for that, I created a custom function that generates a vector_image:

(defun _dialogtext (key str)
    (set_tile key str)
    (start_image key)
    (vector_image 0 (1- (dimy_tile key)) (dimx_tile key) (1- (dimy_tile key)) -15)
    (end_image)
)

In AutoCAD, when using width = 50.5, the result is perfect. However, in BricsCAD, the text appears smaller and is not fully displayed, as shown below:

BricsCAD:

When I increase the length, the text is no longer centered and part of it sticks out. My question is: how can I center this text in this context? Also, is it possible to increase the font size to make the text larger?

(defun c:demo ()
  
  (defun _dialogtext ( key str )
    (set_tile key str)
    (start_image key)
    (vector_image 0 (1- (dimy_tile key)) (dimx_tile key) (1- (dimy_tile key)) -15)
    (end_image)
  )
  
  (setq dcl_id (load_dialog "demo.dcl"))
  (if (not (new_dialog "demo" dcl_id))
    (progn
      (alert "Erro")
      ; (exit)
    )
  )
  (_dialogtext "active_text_1" "Create ideas, innovate, and transform your future!")
  (setq value (start_dialog))
  (if (eq value 1)
    (prompt "OK!")
  )  
)

demo : dialog
{
    label = "Demo";
    : column
    {
        // width = 90;
        spacer;
        : image
        {
            key = "active_text_1";
            fixed_width = true;
            fixed_height = true;
            alignment = centered;
            height = 1.3;
            width = 60.5;
            aspect_ratio = 1.2;         
            color = 1;            
        }
        spacer;
        ok_cancel;
    }
}